123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595 |
- /*
- /* From: https://chromium.googlesource.com/chromium/src.git/+/4.1.249.1050/third_party/sqlite/src/os_symbian.cc
- * https://github.com/spsoft/spmemvfs/tree/master/spmemvfs
- * http://www.sqlite.org/src/doc/trunk/src/test_demovfs.c
- * http://www.sqlite.org/src/doc/trunk/src/test_vfstrace.c
- * http://www.sqlite.org/src/doc/trunk/src/test_onefile.c
- * http://www.sqlite.org/src/doc/trunk/src/test_vfs.c
- **/
- #include <stdio.h>
- #include <stddef.h>
- #include <string.h>
- #include <stdint.h>
- #include <osapi.h>
- #include <vfs.h>
- #include <time.h>
- #include <spi_flash.h>
- #include <sqlite3.h>
- #undef dbg_printf
- #define dbg_printf(...) 0
- #define CACHEBLOCKSZ 64
- #define ESP8266_DEFAULT_MAXNAMESIZE 32
- static int esp8266_Close(sqlite3_file*);
- static int esp8266_Lock(sqlite3_file *, int);
- static int esp8266_Unlock(sqlite3_file*, int);
- static int esp8266_Sync(sqlite3_file*, int);
- static int esp8266_Open(sqlite3_vfs*, const char *, sqlite3_file *, int, int*);
- static int esp8266_Read(sqlite3_file*, void*, int, sqlite3_int64);
- static int esp8266_Write(sqlite3_file*, const void*, int, sqlite3_int64);
- static int esp8266_Truncate(sqlite3_file*, sqlite3_int64);
- static int esp8266_Delete(sqlite3_vfs*, const char *, int);
- static int esp8266_FileSize(sqlite3_file*, sqlite3_int64*);
- static int esp8266_Access(sqlite3_vfs*, const char*, int, int*);
- static int esp8266_FullPathname( sqlite3_vfs*, const char *, int, char*);
- static int esp8266_CheckReservedLock(sqlite3_file*, int *);
- static int esp8266_FileControl(sqlite3_file *, int, void*);
- static int esp8266_SectorSize(sqlite3_file*);
- static int esp8266_DeviceCharacteristics(sqlite3_file*);
- static void* esp8266_DlOpen(sqlite3_vfs*, const char *);
- static void esp8266_DlError(sqlite3_vfs*, int, char*);
- static void (*esp8266_DlSym (sqlite3_vfs*, void*, const char*))(void);
- static void esp8266_DlClose(sqlite3_vfs*, void*);
- static int esp8266_Randomness(sqlite3_vfs*, int, char*);
- static int esp8266_Sleep(sqlite3_vfs*, int);
- static int esp8266_CurrentTime(sqlite3_vfs*, double*);
- static int esp8266mem_Close(sqlite3_file*);
- static int esp8266mem_Read(sqlite3_file*, void*, int, sqlite3_int64);
- static int esp8266mem_Write(sqlite3_file*, const void*, int, sqlite3_int64);
- static int esp8266mem_FileSize(sqlite3_file*, sqlite3_int64*);
- static int esp8266mem_Sync(sqlite3_file*, int);
- typedef struct st_linkedlist {
- uint16_t blockid;
- struct st_linkedlist *next;
- uint8_t data[CACHEBLOCKSZ];
- } linkedlist_t, *pLinkedList_t;
- typedef struct st_filecache {
- uint32_t size;
- linkedlist_t *list;
- } filecache_t, *pFileCache_t;
- typedef struct esp8266_file {
- sqlite3_file base;
- int fd;
- filecache_t *cache;
- char name[ESP8266_DEFAULT_MAXNAMESIZE];
- } esp8266_file;
- static sqlite3_vfs esp8266Vfs = {
- 1, // iVersion
- sizeof(esp8266_file), // szOsFile
- FS_OBJ_NAME_LEN, // mxPathname
- NULL, // pNext
- "esp8266", // name
- 0, // pAppData
- esp8266_Open, // xOpen
- esp8266_Delete, // xDelete
- esp8266_Access, // xAccess
- esp8266_FullPathname, // xFullPathname
- esp8266_DlOpen, // xDlOpen
- esp8266_DlError, // xDlError
- esp8266_DlSym, // xDlSym
- esp8266_DlClose, // xDlClose
- esp8266_Randomness, // xRandomness
- esp8266_Sleep, // xSleep
- esp8266_CurrentTime, // xCurrentTime
- 0 // xGetLastError
- };
- static const sqlite3_io_methods esp8266IoMethods = {
- 1,
- esp8266_Close,
- esp8266_Read,
- esp8266_Write,
- esp8266_Truncate,
- esp8266_Sync,
- esp8266_FileSize,
- esp8266_Lock,
- esp8266_Unlock,
- esp8266_CheckReservedLock,
- esp8266_FileControl,
- esp8266_SectorSize,
- esp8266_DeviceCharacteristics
- };
- static const sqlite3_io_methods esp8266MemMethods = {
- 1,
- esp8266mem_Close,
- esp8266mem_Read,
- esp8266mem_Write,
- esp8266_Truncate,
- esp8266mem_Sync,
- esp8266mem_FileSize,
- esp8266_Lock,
- esp8266_Unlock,
- esp8266_CheckReservedLock,
- esp8266_FileControl,
- esp8266_SectorSize,
- esp8266_DeviceCharacteristics
- };
- static uint32_t linkedlist_store (linkedlist_t **leaf, uint32_t offset, uint32_t len, const uint8_t *data) {
- const uint8_t blank[CACHEBLOCKSZ] = { 0 };
- uint16_t blockid = offset/CACHEBLOCKSZ;
- linkedlist_t *block;
- if (!memcmp(data, blank, CACHEBLOCKSZ))
- return len;
- block = *leaf;
- if (!block || ( block->blockid != blockid ) ) {
- block = sqlite3_malloc ( sizeof( linkedlist_t ) );
- if (!block)
- return SQLITE_NOMEM;
- memset (block->data, 0, CACHEBLOCKSZ);
- block->blockid = blockid;
- }
- if (!*leaf) {
- *leaf = block;
- block->next = NULL;
- } else if (block != *leaf) {
- if (block->blockid > (*leaf)->blockid) {
- block->next = (*leaf)->next;
- (*leaf)->next = block;
- } else {
- block->next = (*leaf);
- (*leaf) = block;
- }
- }
- memcpy (block->data + offset%CACHEBLOCKSZ, data, len);
- return len;
- }
- static uint32_t filecache_pull (pFileCache_t cache, uint32_t offset, uint32_t len, uint8_t *data) {
- uint16_t i;
- float blocks;
- uint32_t r = 0;
- blocks = ( offset % CACHEBLOCKSZ + len ) / (float) CACHEBLOCKSZ;
- if (blocks == 0.0)
- return 0;
- if (( blocks - (int) blocks) > 0.0)
- blocks = blocks + 1.0;
- for (i = 0; i < (uint16_t) blocks; i++) {
- uint16_t round;
- float relablock;
- linkedlist_t *leaf;
- uint32_t relaoffset, relalen;
- uint8_t * reladata = (uint8_t*) data;
- relalen = len - r;
- reladata = reladata + r;
- relaoffset = offset + r;
- round = CACHEBLOCKSZ - relaoffset%CACHEBLOCKSZ;
- if (relalen > round) relalen = round;
- for (leaf = cache->list; leaf && leaf->next; leaf = leaf->next) {
- if ( ( leaf->next->blockid * CACHEBLOCKSZ ) > relaoffset )
- break;
- }
- relablock = relaoffset/((float)CACHEBLOCKSZ) - leaf->blockid;
- if ( ( relablock >= 0 ) && ( relablock < 1 ) )
- memcpy (data + r, leaf->data + (relaoffset % CACHEBLOCKSZ), relalen);
- r = r + relalen;
- }
- return 0;
- }
- static uint32_t filecache_push (pFileCache_t cache, uint32_t offset, uint32_t len, const uint8_t *data) {
- uint16_t i;
- float blocks;
- uint32_t r = 0;
- uint8_t updateroot = 0x1;
- blocks = ( offset % CACHEBLOCKSZ + len ) / (float) CACHEBLOCKSZ;
- if (blocks == 0.0)
- return 0;
- if (( blocks - (int) blocks) > 0.0)
- blocks = blocks + 1.0;
- for (i = 0; i < (uint16_t) blocks; i++) {
- uint16_t round;
- uint32_t localr;
- linkedlist_t *leaf;
- uint32_t relaoffset, relalen;
- uint8_t * reladata = (uint8_t*) data;
- relalen = len - r;
- reladata = reladata + r;
- relaoffset = offset + r;
- round = CACHEBLOCKSZ - relaoffset%CACHEBLOCKSZ;
- if (relalen > round) relalen = round;
- for (leaf = cache->list; leaf && leaf->next; leaf = leaf->next) {
- if ( ( leaf->next->blockid * CACHEBLOCKSZ ) > relaoffset )
- break;
- updateroot = 0x0;
- }
- localr = linkedlist_store(&leaf, relaoffset, (relalen > CACHEBLOCKSZ) ? CACHEBLOCKSZ : relalen, reladata);
- if (localr == SQLITE_NOMEM)
- return SQLITE_NOMEM;
- r = r + localr;
- if (updateroot & 0x1)
- cache->list = leaf;
- }
- if (offset + len > cache->size)
- cache->size = offset + len;
- return r;
- }
- static void filecache_free (pFileCache_t cache) {
- pLinkedList_t this = cache->list, next;
- while (this != NULL) {
- next = this->next;
- sqlite3_free (this);
- this = next;
- }
- }
- static int esp8266mem_Close(sqlite3_file *id)
- {
- esp8266_file *file = (esp8266_file*) id;
- filecache_free(file->cache);
- sqlite3_free (file->cache);
- dbg_printf("esp8266mem_Close: %s OK\n", file->name);
- return SQLITE_OK;
- }
- static int esp8266mem_Read(sqlite3_file *id, void *buffer, int amount, sqlite3_int64 offset)
- {
- sint32_t ofst;
- esp8266_file *file = (esp8266_file*) id;
- ofst = (sint32_t)(offset & 0x7FFFFFFF);
- filecache_pull (file->cache, ofst, amount, buffer);
- dbg_printf("esp8266mem_Read: %s [%ld] [%d] OK\n", file->name, ofst, amount);
- return SQLITE_OK;
- }
- static int esp8266mem_Write(sqlite3_file *id, const void *buffer, int amount, sqlite3_int64 offset)
- {
- sint32_t ofst;
- esp8266_file *file = (esp8266_file*) id;
- ofst = (sint32_t)(offset & 0x7FFFFFFF);
- filecache_push (file->cache, ofst, amount, buffer);
- dbg_printf("esp8266mem_Write: %s [%ld] [%d] OK\n", file->name, ofst, amount);
- return SQLITE_OK;
- }
- static int esp8266mem_Sync(sqlite3_file *id, int flags)
- {
- esp8266_file *file = (esp8266_file*) id;
- dbg_printf("esp8266mem_Sync: %s OK\n", file->name);
- return SQLITE_OK;
- }
- static int esp8266mem_FileSize(sqlite3_file *id, sqlite3_int64 *size)
- {
- esp8266_file *file = (esp8266_file*) id;
- *size = 0LL | file->cache->size;
- dbg_printf("esp8266mem_FileSize: %s [%d] OK\n", file->name, file->cache->size);
- return SQLITE_OK;
- }
- static int esp8266_Open( sqlite3_vfs * vfs, const char * path, sqlite3_file * file, int flags, int * outflags )
- {
- int rc;
- char *mode = "r";
- esp8266_file *p = (esp8266_file*) file;
- if ( path == NULL ) return SQLITE_IOERR;
- if( flags&SQLITE_OPEN_READONLY ) mode = "r";
- if( flags&SQLITE_OPEN_READWRITE || flags&SQLITE_OPEN_MAIN_JOURNAL ) {
- int result;
- if (SQLITE_OK != esp8266_Access(vfs, path, flags, &result))
- return SQLITE_CANTOPEN;
- if (result == 1)
- mode = "r+";
- else
- mode = "w+";
- }
- dbg_printf("esp8266_Open: 1o %s %s\n", path, mode);
- memset (p, 0, sizeof(esp8266_file));
- strncpy (p->name, path, ESP8266_DEFAULT_MAXNAMESIZE);
- p->name[ESP8266_DEFAULT_MAXNAMESIZE-1] = '\0';
- if( flags&SQLITE_OPEN_MAIN_JOURNAL ) {
- p->fd = 0;
- p->cache = sqlite3_malloc(sizeof (filecache_t));
- if (! p->cache )
- return SQLITE_NOMEM;
- memset (p->cache, 0, sizeof(filecache_t));
- p->base.pMethods = &esp8266MemMethods;
- dbg_printf("esp8266_Open: 2o %s %d MEM OK\n", p->name, p->fd);
- return SQLITE_OK;
- }
- p->fd = vfs_open (path, mode);
- if ( p->fd <= 0 ) {
- return SQLITE_CANTOPEN;
- }
- p->base.pMethods = &esp8266IoMethods;
- dbg_printf("esp8266_Open: 2o %s %d OK\n", p->name, p->fd);
- return SQLITE_OK;
- }
- static int esp8266_Close(sqlite3_file *id)
- {
- esp8266_file *file = (esp8266_file*) id;
- int rc = vfs_close(file->fd);
- dbg_printf("esp8266_Close: %s %d %d\n", file->name, file->fd, rc);
- return rc ? SQLITE_IOERR_CLOSE : SQLITE_OK;
- }
- static int esp8266_Read(sqlite3_file *id, void *buffer, int amount, sqlite3_int64 offset)
- {
- size_t nRead;
- sint32_t ofst, iofst;
- esp8266_file *file = (esp8266_file*) id;
- iofst = (sint32_t)(offset & 0x7FFFFFFF);
- dbg_printf("esp8266_Read: 1r %s %d %d %lld[%ld] \n", file->name, file->fd, amount, offset, iofst);
- ofst = vfs_lseek(file->fd, iofst, VFS_SEEK_SET);
- if (ofst != iofst) {
- dbg_printf("esp8266_Read: 2r %ld != %ld FAIL\n", ofst, iofst);
- return SQLITE_IOERR_SHORT_READ /* SQLITE_IOERR_SEEK */;
- }
- nRead = vfs_read(file->fd, buffer, amount);
- if ( nRead == amount ) {
- dbg_printf("esp8266_Read: 3r %s %u %d OK\n", file->name, nRead, amount);
- return SQLITE_OK;
- } else if ( nRead >= 0 ) {
- dbg_printf("esp8266_Read: 3r %s %u %d FAIL\n", file->name, nRead, amount);
- return SQLITE_IOERR_SHORT_READ;
- }
- dbg_printf("esp8266_Read: 4r %s FAIL\n", file->name);
- return SQLITE_IOERR_READ;
- }
- static int esp8266_Write(sqlite3_file *id, const void *buffer, int amount, sqlite3_int64 offset)
- {
- size_t nWrite;
- sint32_t ofst, iofst;
- esp8266_file *file = (esp8266_file*) id;
- iofst = (sint32_t)(offset & 0x7FFFFFFF);
- dbg_printf("esp8266_Write: 1w %s %d %d %lld[%ld] \n", file->name, file->fd, amount, offset, iofst);
- ofst = vfs_lseek(file->fd, iofst, VFS_SEEK_SET);
- if (ofst != iofst) {
- return SQLITE_IOERR_SEEK;
- }
- nWrite = vfs_write(file->fd, buffer, amount);
- if ( nWrite != amount ) {
- dbg_printf("esp8266_Write: 2w %s %u %d\n", file->name, nWrite, amount);
- return SQLITE_IOERR_WRITE;
- }
- dbg_printf("esp8266_Write: 3w %s OK\n", file->name);
- return SQLITE_OK;
- }
- static int esp8266_Truncate(sqlite3_file *id, sqlite3_int64 bytes)
- {
- esp8266_file *file = (esp8266_file*) id;
- dbg_printf("esp8266_Truncate:\n");
- return 0 ? SQLITE_IOERR_TRUNCATE : SQLITE_OK;
- }
- static int esp8266_Delete( sqlite3_vfs * vfs, const char * path, int syncDir )
- {
- sint32_t rc = vfs_remove( path );
- if (rc == VFS_RES_ERR)
- return SQLITE_IOERR_DELETE;
- dbg_printf("esp8266_Delete: %s OK\n", path);
- return SQLITE_OK;
- }
- static int esp8266_FileSize(sqlite3_file *id, sqlite3_int64 *size)
- {
- esp8266_file *file = (esp8266_file*) id;
- *size = 0LL | vfs_size( file->fd );
- dbg_printf("esp8266_FileSize: %s %u[%lld]\n", file->name, vfs_size(file->fd), *size);
- return SQLITE_OK;
- }
- static int esp8266_Sync(sqlite3_file *id, int flags)
- {
- esp8266_file *file = (esp8266_file*) id;
- int rc = vfs_flush( file->fd );
- dbg_printf("esp8266_Sync: %d\n", rc);
- return rc ? SQLITE_IOERR_FSYNC : SQLITE_OK;
- }
- static int esp8266_Access( sqlite3_vfs * vfs, const char * path, int flags, int * result )
- {
- struct vfs_stat st;
- sint32_t rc = vfs_stat( path, &st );
- *result = ( rc != VFS_RES_ERR );
- dbg_printf("esp8266_Access: %d\n", *result);
- return SQLITE_OK;
- }
- static int esp8266_FullPathname( sqlite3_vfs * vfs, const char * path, int len, char * fullpath )
- {
- struct vfs_stat st;
- sint32_t rc = vfs_stat( path, &st );
- if ( rc == VFS_RES_OK ){
- strncpy( fullpath, st.name, len );
- } else {
- strncpy( fullpath, path, len );
- }
- fullpath[ len - 1 ] = '\0';
- dbg_printf("esp8266_FullPathname: %s\n", fullpath);
- return SQLITE_OK;
- }
- static int esp8266_Lock(sqlite3_file *id, int lock_type)
- {
- esp8266_file *file = (esp8266_file*) id;
- dbg_printf("esp8266_Lock:\n");
- return SQLITE_OK;
- }
- static int esp8266_Unlock(sqlite3_file *id, int lock_type)
- {
- esp8266_file *file = (esp8266_file*) id;
- dbg_printf("esp8266_Unlock:\n");
- return SQLITE_OK;
- }
- static int esp8266_CheckReservedLock(sqlite3_file *id, int *result)
- {
- esp8266_file *file = (esp8266_file*) id;
- *result = 0;
- dbg_printf("esp8266_CheckReservedLock:\n");
- return SQLITE_OK;
- }
- static int esp8266_FileControl(sqlite3_file *id, int op, void *arg)
- {
- esp8266_file *file = (esp8266_file*) id;
- dbg_printf("esp8266_FileControl:\n");
- return SQLITE_OK;
- }
- static int esp8266_SectorSize(sqlite3_file *id)
- {
- esp8266_file *file = (esp8266_file*) id;
- dbg_printf("esp8266_SectorSize:\n");
- return SPI_FLASH_SEC_SIZE;
- }
- static int esp8266_DeviceCharacteristics(sqlite3_file *id)
- {
- esp8266_file *file = (esp8266_file*) id;
- dbg_printf("esp8266_DeviceCharacteristics:\n");
- return 0;
- }
- static void * esp8266_DlOpen( sqlite3_vfs * vfs, const char * path )
- {
- dbg_printf("esp8266_DlOpen:\n");
- return NULL;
- }
- static void esp8266_DlError( sqlite3_vfs * vfs, int len, char * errmsg )
- {
- dbg_printf("esp8266_DlError:\n");
- return;
- }
- static void ( * esp8266_DlSym ( sqlite3_vfs * vfs, void * handle, const char * symbol ) ) ( void )
- {
- dbg_printf("esp8266_DlSym:\n");
- return NULL;
- }
- static void esp8266_DlClose( sqlite3_vfs * vfs, void * handle )
- {
- dbg_printf("esp8266_DlClose:\n");
- return;
- }
- static int esp8266_Randomness( sqlite3_vfs * vfs, int len, char * buffer )
- {
- int rc = os_get_random(buffer, len);
- dbg_printf("esp8266_Randomness: %d\n", rc);
- return SQLITE_OK;
- }
- static int esp8266_Sleep( sqlite3_vfs * vfs, int microseconds )
- {
- dbg_printf("esp8266_Sleep:\n");
- return SQLITE_OK;
- }
- static int esp8266_CurrentTime( sqlite3_vfs * vfs, double * result )
- {
- // This is stubbed out until we have a working RTCTIME solution;
- // as it stood, this would always have returned the UNIX epoch.
- // time_t t = time(NULL);
- // *result = t / 86400.0 + 2440587.5;
- *result = 2440587.5;
- dbg_printf("esp8266_CurrentTime: %g\n", *result);
- return SQLITE_OK;
- }
- int sqlite3_os_init(void){
- sqlite3_vfs_register(&esp8266Vfs, 1);
- return SQLITE_OK;
- }
- int sqlite3_os_end(void){
- return SQLITE_OK;
- }
|