blob: 73508bdef89ab9bdfb779fcc61ab305dd8c5daeb [file] [log] [blame]
drha3152892007-05-05 11:48:52 +00001/*
2** 2001 September 15
3**
4** The author disclaims copyright to this source code. In place of
5** a legal notice, here is a blessing:
6**
7** May you do good and not evil.
8** May you find forgiveness for yourself and forgive others.
9** May you share freely, never taking more than you give.
10**
11*************************************************************************
drhfec00ea2008-06-14 16:56:21 +000012**
drha3152892007-05-05 11:48:52 +000013** Memory allocation functions used throughout sqlite.
drha3152892007-05-05 11:48:52 +000014*/
15#include "sqliteInt.h"
drha3152892007-05-05 11:48:52 +000016#include <stdarg.h>
drha3152892007-05-05 11:48:52 +000017
18/*
drhb21c8cd2007-08-21 19:33:56 +000019** This routine runs when the memory allocator sees that the
20** total memory allocation is about to exceed the soft heap
21** limit.
22*/
23static void softHeapLimitEnforcer(
24 void *NotUsed,
danielk197762c14b32008-11-19 09:05:26 +000025 sqlite3_int64 NotUsed2,
drh153c62c2007-08-24 03:51:33 +000026 int allocSize
drhb21c8cd2007-08-21 19:33:56 +000027){
danielk197762c14b32008-11-19 09:05:26 +000028 UNUSED_PARAMETER2(NotUsed, NotUsed2);
drhb21c8cd2007-08-21 19:33:56 +000029 sqlite3_release_memory(allocSize);
30}
31
32/*
danielk197784680242008-06-23 11:11:35 +000033** Set the soft heap-size limit for the library. Passing a zero or
34** negative value indicates no limit.
drha3152892007-05-05 11:48:52 +000035*/
36void sqlite3_soft_heap_limit(int n){
drhb21c8cd2007-08-21 19:33:56 +000037 sqlite3_uint64 iLimit;
38 int overage;
39 if( n<0 ){
40 iLimit = 0;
41 }else{
42 iLimit = n;
drha3152892007-05-05 11:48:52 +000043 }
drh9ac06502009-08-17 13:42:29 +000044#ifndef SQLITE_OMIT_AUTOINIT
drh9ac3fe92008-06-18 18:12:04 +000045 sqlite3_initialize();
drh9ac06502009-08-17 13:42:29 +000046#endif
drhb21c8cd2007-08-21 19:33:56 +000047 if( iLimit>0 ){
shane4a27a282008-09-04 04:32:49 +000048 sqlite3MemoryAlarm(softHeapLimitEnforcer, 0, iLimit);
drhb21c8cd2007-08-21 19:33:56 +000049 }else{
shane4a27a282008-09-04 04:32:49 +000050 sqlite3MemoryAlarm(0, 0, 0);
drhb21c8cd2007-08-21 19:33:56 +000051 }
drh1bd10f82008-12-10 21:19:56 +000052 overage = (int)(sqlite3_memory_used() - (i64)n);
drhb21c8cd2007-08-21 19:33:56 +000053 if( overage>0 ){
54 sqlite3_release_memory(overage);
55 }
drha3152892007-05-05 11:48:52 +000056}
57
58/*
danielk197784680242008-06-23 11:11:35 +000059** Attempt to release up to n bytes of non-essential memory currently
60** held by SQLite. An example of non-essential memory is memory used to
61** cache database pages that are not currently in use.
drha3152892007-05-05 11:48:52 +000062*/
63int sqlite3_release_memory(int n){
drh86f8c192007-08-22 00:39:19 +000064#ifdef SQLITE_ENABLE_MEMORY_MANAGEMENT
danielk197767e3da72008-08-21 12:19:44 +000065 int nRet = 0;
danielk197767e3da72008-08-21 12:19:44 +000066 nRet += sqlite3PcacheReleaseMemory(n-nRet);
danielk1977dfb316d2008-03-26 18:34:43 +000067 return nRet;
danielk19771e536952007-08-16 10:09:01 +000068#else
danielk197762c14b32008-11-19 09:05:26 +000069 UNUSED_PARAMETER(n);
danielk19771e536952007-08-16 10:09:01 +000070 return SQLITE_OK;
71#endif
drha3152892007-05-05 11:48:52 +000072}
drha3152892007-05-05 11:48:52 +000073
drhfec00ea2008-06-14 16:56:21 +000074/*
75** State information local to the memory allocation subsystem.
76*/
danielk19775c8f8582008-09-02 10:22:00 +000077static SQLITE_WSD struct Mem0Global {
danielk197723bf0f42008-09-02 17:52:51 +000078 /* Number of free pages for scratch and page-cache memory */
79 u32 nScratchFree;
80 u32 nPageFree;
81
drhfec00ea2008-06-14 16:56:21 +000082 sqlite3_mutex *mutex; /* Mutex to serialize access */
83
84 /*
85 ** The alarm callback and its arguments. The mem0.mutex lock will
86 ** be held while the callback is running. Recursive calls into
87 ** the memory subsystem are allowed, but no new callbacks will be
drhe64ca7b2009-07-16 18:21:17 +000088 ** issued.
drhfec00ea2008-06-14 16:56:21 +000089 */
90 sqlite3_int64 alarmThreshold;
91 void (*alarmCallback)(void*, sqlite3_int64,int);
92 void *alarmArg;
drhfec00ea2008-06-14 16:56:21 +000093
94 /*
danielk1977075c23a2008-09-01 18:34:20 +000095 ** Pointers to the end of sqlite3GlobalConfig.pScratch and
96 ** sqlite3GlobalConfig.pPage to a block of memory that records
drh9ac3fe92008-06-18 18:12:04 +000097 ** which pages are available.
98 */
99 u32 *aScratchFree;
100 u32 *aPageFree;
drhe64ca7b2009-07-16 18:21:17 +0000101} mem0 = { 0, 0, 0, 0, 0, 0, 0, 0 };
danielk19775c8f8582008-09-02 10:22:00 +0000102
103#define mem0 GLOBAL(struct Mem0Global, mem0)
drhfec00ea2008-06-14 16:56:21 +0000104
105/*
106** Initialize the memory allocation subsystem.
107*/
108int sqlite3MallocInit(void){
danielk1977075c23a2008-09-01 18:34:20 +0000109 if( sqlite3GlobalConfig.m.xMalloc==0 ){
drhfec00ea2008-06-14 16:56:21 +0000110 sqlite3MemSetDefault();
111 }
112 memset(&mem0, 0, sizeof(mem0));
danielk1977075c23a2008-09-01 18:34:20 +0000113 if( sqlite3GlobalConfig.bCoreMutex ){
danielk197759f8c082008-06-18 17:09:10 +0000114 mem0.mutex = sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MEM);
drhfec00ea2008-06-14 16:56:21 +0000115 }
danielk1977075c23a2008-09-01 18:34:20 +0000116 if( sqlite3GlobalConfig.pScratch && sqlite3GlobalConfig.szScratch>=100
117 && sqlite3GlobalConfig.nScratch>=0 ){
drh9ac3fe92008-06-18 18:12:04 +0000118 int i;
danielk1977bc739712009-03-23 04:33:32 +0000119 sqlite3GlobalConfig.szScratch = ROUNDDOWN8(sqlite3GlobalConfig.szScratch-4);
danielk1977075c23a2008-09-01 18:34:20 +0000120 mem0.aScratchFree = (u32*)&((char*)sqlite3GlobalConfig.pScratch)
121 [sqlite3GlobalConfig.szScratch*sqlite3GlobalConfig.nScratch];
122 for(i=0; i<sqlite3GlobalConfig.nScratch; i++){ mem0.aScratchFree[i] = i; }
123 mem0.nScratchFree = sqlite3GlobalConfig.nScratch;
drh9ac3fe92008-06-18 18:12:04 +0000124 }else{
danielk1977075c23a2008-09-01 18:34:20 +0000125 sqlite3GlobalConfig.pScratch = 0;
126 sqlite3GlobalConfig.szScratch = 0;
drh9ac3fe92008-06-18 18:12:04 +0000127 }
danielk1977075c23a2008-09-01 18:34:20 +0000128 if( sqlite3GlobalConfig.pPage && sqlite3GlobalConfig.szPage>=512
129 && sqlite3GlobalConfig.nPage>=1 ){
drh9ac3fe92008-06-18 18:12:04 +0000130 int i;
drh0a60a382008-07-31 17:16:05 +0000131 int overhead;
danielk1977bc739712009-03-23 04:33:32 +0000132 int sz = ROUNDDOWN8(sqlite3GlobalConfig.szPage);
danielk1977075c23a2008-09-01 18:34:20 +0000133 int n = sqlite3GlobalConfig.nPage;
drh0a60a382008-07-31 17:16:05 +0000134 overhead = (4*n + sz - 1)/sz;
danielk1977075c23a2008-09-01 18:34:20 +0000135 sqlite3GlobalConfig.nPage -= overhead;
136 mem0.aPageFree = (u32*)&((char*)sqlite3GlobalConfig.pPage)
137 [sqlite3GlobalConfig.szPage*sqlite3GlobalConfig.nPage];
138 for(i=0; i<sqlite3GlobalConfig.nPage; i++){ mem0.aPageFree[i] = i; }
139 mem0.nPageFree = sqlite3GlobalConfig.nPage;
drh9ac3fe92008-06-18 18:12:04 +0000140 }else{
danielk1977075c23a2008-09-01 18:34:20 +0000141 sqlite3GlobalConfig.pPage = 0;
142 sqlite3GlobalConfig.szPage = 0;
drh9ac3fe92008-06-18 18:12:04 +0000143 }
danielk1977075c23a2008-09-01 18:34:20 +0000144 return sqlite3GlobalConfig.m.xInit(sqlite3GlobalConfig.m.pAppData);
drhfec00ea2008-06-14 16:56:21 +0000145}
146
147/*
148** Deinitialize the memory allocation subsystem.
149*/
150void sqlite3MallocEnd(void){
danielk19770a549072009-02-17 16:29:10 +0000151 if( sqlite3GlobalConfig.m.xShutdown ){
152 sqlite3GlobalConfig.m.xShutdown(sqlite3GlobalConfig.m.pAppData);
153 }
drh9ac3fe92008-06-18 18:12:04 +0000154 memset(&mem0, 0, sizeof(mem0));
drhfec00ea2008-06-14 16:56:21 +0000155}
156
157/*
158** Return the amount of memory currently checked out.
159*/
160sqlite3_int64 sqlite3_memory_used(void){
drhf7141992008-06-19 00:16:08 +0000161 int n, mx;
drhc376a192008-07-14 12:30:54 +0000162 sqlite3_int64 res;
drhf7141992008-06-19 00:16:08 +0000163 sqlite3_status(SQLITE_STATUS_MEMORY_USED, &n, &mx, 0);
drhc376a192008-07-14 12:30:54 +0000164 res = (sqlite3_int64)n; /* Work around bug in Borland C. Ticket #3216 */
165 return res;
drhfec00ea2008-06-14 16:56:21 +0000166}
167
168/*
169** Return the maximum amount of memory that has ever been
170** checked out since either the beginning of this process
171** or since the most recent reset.
172*/
173sqlite3_int64 sqlite3_memory_highwater(int resetFlag){
drhf7141992008-06-19 00:16:08 +0000174 int n, mx;
drhc376a192008-07-14 12:30:54 +0000175 sqlite3_int64 res;
drhf7141992008-06-19 00:16:08 +0000176 sqlite3_status(SQLITE_STATUS_MEMORY_USED, &n, &mx, resetFlag);
drh7986a712008-07-14 12:38:20 +0000177 res = (sqlite3_int64)mx; /* Work around bug in Borland C. Ticket #3216 */
drhc376a192008-07-14 12:30:54 +0000178 return res;
drhfec00ea2008-06-14 16:56:21 +0000179}
180
181/*
182** Change the alarm callback
183*/
shane4a27a282008-09-04 04:32:49 +0000184int sqlite3MemoryAlarm(
drhfec00ea2008-06-14 16:56:21 +0000185 void(*xCallback)(void *pArg, sqlite3_int64 used,int N),
186 void *pArg,
187 sqlite3_int64 iThreshold
188){
189 sqlite3_mutex_enter(mem0.mutex);
190 mem0.alarmCallback = xCallback;
191 mem0.alarmArg = pArg;
192 mem0.alarmThreshold = iThreshold;
193 sqlite3_mutex_leave(mem0.mutex);
194 return SQLITE_OK;
195}
196
shaneeec556d2008-10-12 00:27:53 +0000197#ifndef SQLITE_OMIT_DEPRECATED
drhfec00ea2008-06-14 16:56:21 +0000198/*
shane4a27a282008-09-04 04:32:49 +0000199** Deprecated external interface. Internal/core SQLite code
200** should call sqlite3MemoryAlarm.
201*/
202int sqlite3_memory_alarm(
203 void(*xCallback)(void *pArg, sqlite3_int64 used,int N),
204 void *pArg,
205 sqlite3_int64 iThreshold
206){
207 return sqlite3MemoryAlarm(xCallback, pArg, iThreshold);
208}
shaneeec556d2008-10-12 00:27:53 +0000209#endif
shane4a27a282008-09-04 04:32:49 +0000210
211/*
drhfec00ea2008-06-14 16:56:21 +0000212** Trigger the alarm
213*/
214static void sqlite3MallocAlarm(int nByte){
215 void (*xCallback)(void*,sqlite3_int64,int);
216 sqlite3_int64 nowUsed;
217 void *pArg;
drhe64ca7b2009-07-16 18:21:17 +0000218 if( mem0.alarmCallback==0 ) return;
drhfec00ea2008-06-14 16:56:21 +0000219 xCallback = mem0.alarmCallback;
drhf7141992008-06-19 00:16:08 +0000220 nowUsed = sqlite3StatusValue(SQLITE_STATUS_MEMORY_USED);
drhfec00ea2008-06-14 16:56:21 +0000221 pArg = mem0.alarmArg;
drhe64ca7b2009-07-16 18:21:17 +0000222 mem0.alarmCallback = 0;
drhfec00ea2008-06-14 16:56:21 +0000223 sqlite3_mutex_leave(mem0.mutex);
224 xCallback(pArg, nowUsed, nByte);
225 sqlite3_mutex_enter(mem0.mutex);
drhe64ca7b2009-07-16 18:21:17 +0000226 mem0.alarmCallback = xCallback;
227 mem0.alarmArg = pArg;
drhfec00ea2008-06-14 16:56:21 +0000228}
229
drhf7141992008-06-19 00:16:08 +0000230/*
231** Do a memory allocation with statistics and alarms. Assume the
232** lock is already held.
233*/
234static int mallocWithAlarm(int n, void **pp){
235 int nFull;
236 void *p;
237 assert( sqlite3_mutex_held(mem0.mutex) );
danielk1977075c23a2008-09-01 18:34:20 +0000238 nFull = sqlite3GlobalConfig.m.xRoundup(n);
drhf7141992008-06-19 00:16:08 +0000239 sqlite3StatusSet(SQLITE_STATUS_MALLOC_SIZE, n);
240 if( mem0.alarmCallback!=0 ){
241 int nUsed = sqlite3StatusValue(SQLITE_STATUS_MEMORY_USED);
242 if( nUsed+nFull >= mem0.alarmThreshold ){
243 sqlite3MallocAlarm(nFull);
244 }
245 }
danielk1977075c23a2008-09-01 18:34:20 +0000246 p = sqlite3GlobalConfig.m.xMalloc(nFull);
danielk1977d09414c2008-06-19 18:17:49 +0000247 if( p==0 && mem0.alarmCallback ){
248 sqlite3MallocAlarm(nFull);
danielk1977075c23a2008-09-01 18:34:20 +0000249 p = sqlite3GlobalConfig.m.xMalloc(nFull);
drhf7141992008-06-19 00:16:08 +0000250 }
drhc702c7c2008-07-18 18:56:16 +0000251 if( p ){
252 nFull = sqlite3MallocSize(p);
253 sqlite3StatusAdd(SQLITE_STATUS_MEMORY_USED, nFull);
254 }
drhf7141992008-06-19 00:16:08 +0000255 *pp = p;
256 return nFull;
257}
drhfec00ea2008-06-14 16:56:21 +0000258
259/*
260** Allocate memory. This routine is like sqlite3_malloc() except that it
261** assumes the memory subsystem has already been initialized.
262*/
263void *sqlite3Malloc(int n){
264 void *p;
drhe08ed7e2009-06-26 18:35:16 +0000265 if( n<=0 || n>=0x7fffff00 ){
266 /* A memory allocation of a number of bytes which is near the maximum
267 ** signed integer value might cause an integer overflow inside of the
268 ** xMalloc(). Hence we limit the maximum size to 0x7fffff00, giving
269 ** 255 bytes of overhead. SQLite itself will never use anything near
270 ** this amount. The only way to reach the limit is with sqlite3_malloc() */
drhf7141992008-06-19 00:16:08 +0000271 p = 0;
danielk1977075c23a2008-09-01 18:34:20 +0000272 }else if( sqlite3GlobalConfig.bMemstat ){
drhfec00ea2008-06-14 16:56:21 +0000273 sqlite3_mutex_enter(mem0.mutex);
drhf7141992008-06-19 00:16:08 +0000274 mallocWithAlarm(n, &p);
drhfec00ea2008-06-14 16:56:21 +0000275 sqlite3_mutex_leave(mem0.mutex);
276 }else{
danielk1977075c23a2008-09-01 18:34:20 +0000277 p = sqlite3GlobalConfig.m.xMalloc(n);
drhfec00ea2008-06-14 16:56:21 +0000278 }
279 return p;
280}
281
282/*
283** This version of the memory allocation is for use by the application.
284** First make sure the memory subsystem is initialized, then do the
285** allocation.
286*/
287void *sqlite3_malloc(int n){
288#ifndef SQLITE_OMIT_AUTOINIT
289 if( sqlite3_initialize() ) return 0;
290#endif
291 return sqlite3Malloc(n);
292}
293
294/*
drhe5ae5732008-06-15 02:51:47 +0000295** Each thread may only have a single outstanding allocation from
drhfacf0302008-06-17 15:12:00 +0000296** xScratchMalloc(). We verify this constraint in the single-threaded
297** case by setting scratchAllocOut to 1 when an allocation
drhe5ae5732008-06-15 02:51:47 +0000298** is outstanding clearing it when the allocation is freed.
299*/
300#if SQLITE_THREADSAFE==0 && !defined(NDEBUG)
drhfacf0302008-06-17 15:12:00 +0000301static int scratchAllocOut = 0;
drhe5ae5732008-06-15 02:51:47 +0000302#endif
303
304
305/*
306** Allocate memory that is to be used and released right away.
307** This routine is similar to alloca() in that it is not intended
308** for situations where the memory might be held long-term. This
309** routine is intended to get memory to old large transient data
310** structures that would not normally fit on the stack of an
311** embedded processor.
312*/
drhfacf0302008-06-17 15:12:00 +0000313void *sqlite3ScratchMalloc(int n){
drhe5ae5732008-06-15 02:51:47 +0000314 void *p;
315 assert( n>0 );
drh9ac3fe92008-06-18 18:12:04 +0000316
drhe5ae5732008-06-15 02:51:47 +0000317#if SQLITE_THREADSAFE==0 && !defined(NDEBUG)
drh37f99182010-06-26 20:25:30 +0000318 /* Verify that no more than two scratch allocation per thread
drh9ac3fe92008-06-18 18:12:04 +0000319 ** is outstanding at one time. (This is only checked in the
320 ** single-threaded case since checking in the multi-threaded case
321 ** would be much more complicated.) */
drh37f99182010-06-26 20:25:30 +0000322 assert( scratchAllocOut<=1 );
drhe5ae5732008-06-15 02:51:47 +0000323#endif
drh9ac3fe92008-06-18 18:12:04 +0000324
danielk1977075c23a2008-09-01 18:34:20 +0000325 if( sqlite3GlobalConfig.szScratch<n ){
drhf7141992008-06-19 00:16:08 +0000326 goto scratch_overflow;
327 }else{
328 sqlite3_mutex_enter(mem0.mutex);
329 if( mem0.nScratchFree==0 ){
330 sqlite3_mutex_leave(mem0.mutex);
331 goto scratch_overflow;
332 }else{
333 int i;
334 i = mem0.aScratchFree[--mem0.nScratchFree];
danielk1977075c23a2008-09-01 18:34:20 +0000335 i *= sqlite3GlobalConfig.szScratch;
drhf7141992008-06-19 00:16:08 +0000336 sqlite3StatusAdd(SQLITE_STATUS_SCRATCH_USED, 1);
drhe50135e2008-08-05 17:53:22 +0000337 sqlite3StatusSet(SQLITE_STATUS_SCRATCH_SIZE, n);
danielk19778183e332008-08-29 17:56:12 +0000338 sqlite3_mutex_leave(mem0.mutex);
danielk1977075c23a2008-09-01 18:34:20 +0000339 p = (void*)&((char*)sqlite3GlobalConfig.pScratch)[i];
shane15301592008-12-16 17:20:38 +0000340 assert( (((u8*)p - (u8*)0) & 7)==0 );
drhf7141992008-06-19 00:16:08 +0000341 }
drhe5ae5732008-06-15 02:51:47 +0000342 }
drhf7141992008-06-19 00:16:08 +0000343#if SQLITE_THREADSAFE==0 && !defined(NDEBUG)
344 scratchAllocOut = p!=0;
345#endif
346
drhe5ae5732008-06-15 02:51:47 +0000347 return p;
drhf7141992008-06-19 00:16:08 +0000348
349scratch_overflow:
danielk1977075c23a2008-09-01 18:34:20 +0000350 if( sqlite3GlobalConfig.bMemstat ){
drhf7141992008-06-19 00:16:08 +0000351 sqlite3_mutex_enter(mem0.mutex);
drhe50135e2008-08-05 17:53:22 +0000352 sqlite3StatusSet(SQLITE_STATUS_SCRATCH_SIZE, n);
drhf7141992008-06-19 00:16:08 +0000353 n = mallocWithAlarm(n, &p);
354 if( p ) sqlite3StatusAdd(SQLITE_STATUS_SCRATCH_OVERFLOW, n);
355 sqlite3_mutex_leave(mem0.mutex);
356 }else{
danielk1977075c23a2008-09-01 18:34:20 +0000357 p = sqlite3GlobalConfig.m.xMalloc(n);
drhf7141992008-06-19 00:16:08 +0000358 }
drh107b56e2010-03-12 16:32:53 +0000359 sqlite3MemdebugSetType(p, MEMTYPE_SCRATCH);
drhf7141992008-06-19 00:16:08 +0000360#if SQLITE_THREADSAFE==0 && !defined(NDEBUG)
361 scratchAllocOut = p!=0;
362#endif
363 return p;
drhe5ae5732008-06-15 02:51:47 +0000364}
drhfacf0302008-06-17 15:12:00 +0000365void sqlite3ScratchFree(void *p){
drhe5ae5732008-06-15 02:51:47 +0000366 if( p ){
danielk1977075c23a2008-09-01 18:34:20 +0000367 if( sqlite3GlobalConfig.pScratch==0
368 || p<sqlite3GlobalConfig.pScratch
drhf7141992008-06-19 00:16:08 +0000369 || p>=(void*)mem0.aScratchFree ){
drh107b56e2010-03-12 16:32:53 +0000370 assert( sqlite3MemdebugHasType(p, MEMTYPE_SCRATCH) );
drh174b9a12010-07-26 11:07:20 +0000371 assert( sqlite3MemdebugNoType(p, ~MEMTYPE_SCRATCH) );
drh107b56e2010-03-12 16:32:53 +0000372 sqlite3MemdebugSetType(p, MEMTYPE_HEAP);
danielk1977075c23a2008-09-01 18:34:20 +0000373 if( sqlite3GlobalConfig.bMemstat ){
drhf7141992008-06-19 00:16:08 +0000374 int iSize = sqlite3MallocSize(p);
375 sqlite3_mutex_enter(mem0.mutex);
376 sqlite3StatusAdd(SQLITE_STATUS_SCRATCH_OVERFLOW, -iSize);
377 sqlite3StatusAdd(SQLITE_STATUS_MEMORY_USED, -iSize);
danielk1977075c23a2008-09-01 18:34:20 +0000378 sqlite3GlobalConfig.m.xFree(p);
drhf7141992008-06-19 00:16:08 +0000379 sqlite3_mutex_leave(mem0.mutex);
380 }else{
danielk1977075c23a2008-09-01 18:34:20 +0000381 sqlite3GlobalConfig.m.xFree(p);
drhf7141992008-06-19 00:16:08 +0000382 }
drh9ac3fe92008-06-18 18:12:04 +0000383 }else{
384 int i;
drh1bd10f82008-12-10 21:19:56 +0000385 i = (int)((u8*)p - (u8*)sqlite3GlobalConfig.pScratch);
danielk1977075c23a2008-09-01 18:34:20 +0000386 i /= sqlite3GlobalConfig.szScratch;
387 assert( i>=0 && i<sqlite3GlobalConfig.nScratch );
drhf7141992008-06-19 00:16:08 +0000388 sqlite3_mutex_enter(mem0.mutex);
danielk197700e13612008-11-17 19:18:54 +0000389 assert( mem0.nScratchFree<(u32)sqlite3GlobalConfig.nScratch );
drh9ac3fe92008-06-18 18:12:04 +0000390 mem0.aScratchFree[mem0.nScratchFree++] = i;
drhf7141992008-06-19 00:16:08 +0000391 sqlite3StatusAdd(SQLITE_STATUS_SCRATCH_USED, -1);
drh9ac3fe92008-06-18 18:12:04 +0000392 sqlite3_mutex_leave(mem0.mutex);
drh37f99182010-06-26 20:25:30 +0000393
394#if SQLITE_THREADSAFE==0 && !defined(NDEBUG)
395 /* Verify that no more than two scratch allocation per thread
396 ** is outstanding at one time. (This is only checked in the
397 ** single-threaded case since checking in the multi-threaded case
398 ** would be much more complicated.) */
399 assert( scratchAllocOut>=1 && scratchAllocOut<=2 );
400 scratchAllocOut = 0;
401#endif
402
drh9ac3fe92008-06-18 18:12:04 +0000403 }
drhe5ae5732008-06-15 02:51:47 +0000404 }
405}
406
407/*
drh633e6d52008-07-28 19:34:53 +0000408** TRUE if p is a lookaside memory allocation from db
409*/
drh4150ebf2008-10-11 15:38:29 +0000410#ifndef SQLITE_OMIT_LOOKASIDE
drh633e6d52008-07-28 19:34:53 +0000411static int isLookaside(sqlite3 *db, void *p){
drh174b9a12010-07-26 11:07:20 +0000412 return p && p>=db->lookaside.pStart && p<db->lookaside.pEnd;
drh633e6d52008-07-28 19:34:53 +0000413}
drh4150ebf2008-10-11 15:38:29 +0000414#else
415#define isLookaside(A,B) 0
416#endif
drh633e6d52008-07-28 19:34:53 +0000417
418/*
drhfec00ea2008-06-14 16:56:21 +0000419** Return the size of a memory allocation previously obtained from
420** sqlite3Malloc() or sqlite3_malloc().
421*/
422int sqlite3MallocSize(void *p){
drh107b56e2010-03-12 16:32:53 +0000423 assert( sqlite3MemdebugHasType(p, MEMTYPE_HEAP) );
drh174b9a12010-07-26 11:07:20 +0000424 assert( sqlite3MemdebugNoType(p, MEMTYPE_DB) );
danielk1977075c23a2008-09-01 18:34:20 +0000425 return sqlite3GlobalConfig.m.xSize(p);
drhfec00ea2008-06-14 16:56:21 +0000426}
drh633e6d52008-07-28 19:34:53 +0000427int sqlite3DbMallocSize(sqlite3 *db, void *p){
drh7047e252009-03-23 17:49:14 +0000428 assert( db==0 || sqlite3_mutex_held(db->mutex) );
drh174b9a12010-07-26 11:07:20 +0000429 if( db && isLookaside(db, p) ){
drh633e6d52008-07-28 19:34:53 +0000430 return db->lookaside.sz;
431 }else{
drh174b9a12010-07-26 11:07:20 +0000432 assert( sqlite3MemdebugHasType(p, MEMTYPE_DB) );
433 assert( sqlite3MemdebugHasType(p, MEMTYPE_LOOKASIDE|MEMTYPE_HEAP) );
434 assert( db!=0 || sqlite3MemdebugNoType(p, MEMTYPE_LOOKASIDE) );
danielk1977075c23a2008-09-01 18:34:20 +0000435 return sqlite3GlobalConfig.m.xSize(p);
drh633e6d52008-07-28 19:34:53 +0000436 }
437}
drhfec00ea2008-06-14 16:56:21 +0000438
439/*
440** Free memory previously obtained from sqlite3Malloc().
441*/
442void sqlite3_free(void *p){
443 if( p==0 ) return;
drh174b9a12010-07-26 11:07:20 +0000444 assert( sqlite3MemdebugNoType(p, MEMTYPE_DB) );
drh107b56e2010-03-12 16:32:53 +0000445 assert( sqlite3MemdebugHasType(p, MEMTYPE_HEAP) );
danielk1977075c23a2008-09-01 18:34:20 +0000446 if( sqlite3GlobalConfig.bMemstat ){
drhfec00ea2008-06-14 16:56:21 +0000447 sqlite3_mutex_enter(mem0.mutex);
drhf7141992008-06-19 00:16:08 +0000448 sqlite3StatusAdd(SQLITE_STATUS_MEMORY_USED, -sqlite3MallocSize(p));
danielk1977075c23a2008-09-01 18:34:20 +0000449 sqlite3GlobalConfig.m.xFree(p);
drhfec00ea2008-06-14 16:56:21 +0000450 sqlite3_mutex_leave(mem0.mutex);
451 }else{
danielk1977075c23a2008-09-01 18:34:20 +0000452 sqlite3GlobalConfig.m.xFree(p);
drhfec00ea2008-06-14 16:56:21 +0000453 }
454}
455
456/*
drh633e6d52008-07-28 19:34:53 +0000457** Free memory that might be associated with a particular database
458** connection.
459*/
460void sqlite3DbFree(sqlite3 *db, void *p){
drh7047e252009-03-23 17:49:14 +0000461 assert( db==0 || sqlite3_mutex_held(db->mutex) );
drh174b9a12010-07-26 11:07:20 +0000462 if( db ){
463 if( db->pnBytesFreed ){
464 *db->pnBytesFreed += sqlite3DbMallocSize(db, p);
465 return;
dand46def72010-07-24 11:28:28 +0000466 }
drh174b9a12010-07-26 11:07:20 +0000467 if( isLookaside(db, p) ){
468 LookasideSlot *pBuf = (LookasideSlot*)p;
469 pBuf->pNext = db->lookaside.pFree;
470 db->lookaside.pFree = pBuf;
471 db->lookaside.nOut--;
472 return;
473 }
drh633e6d52008-07-28 19:34:53 +0000474 }
drh174b9a12010-07-26 11:07:20 +0000475 assert( sqlite3MemdebugHasType(p, MEMTYPE_DB) );
476 assert( sqlite3MemdebugHasType(p, MEMTYPE_LOOKASIDE|MEMTYPE_HEAP) );
477 assert( db!=0 || sqlite3MemdebugNoType(p, MEMTYPE_LOOKASIDE) );
478 sqlite3MemdebugSetType(p, MEMTYPE_HEAP);
479 sqlite3_free(p);
drh633e6d52008-07-28 19:34:53 +0000480}
481
482/*
drhfec00ea2008-06-14 16:56:21 +0000483** Change the size of an existing memory allocation
484*/
485void *sqlite3Realloc(void *pOld, int nBytes){
486 int nOld, nNew;
487 void *pNew;
488 if( pOld==0 ){
489 return sqlite3Malloc(nBytes);
490 }
drhb6063cf2009-06-27 00:48:33 +0000491 if( nBytes<=0 ){
drhfec00ea2008-06-14 16:56:21 +0000492 sqlite3_free(pOld);
493 return 0;
494 }
drhb6063cf2009-06-27 00:48:33 +0000495 if( nBytes>=0x7fffff00 ){
496 /* The 0x7ffff00 limit term is explained in comments on sqlite3Malloc() */
497 return 0;
498 }
drhfec00ea2008-06-14 16:56:21 +0000499 nOld = sqlite3MallocSize(pOld);
drh7c6791c2009-08-18 14:48:53 +0000500 nNew = sqlite3GlobalConfig.m.xRoundup(nBytes);
501 if( nOld==nNew ){
502 pNew = pOld;
503 }else if( sqlite3GlobalConfig.bMemstat ){
drhfec00ea2008-06-14 16:56:21 +0000504 sqlite3_mutex_enter(mem0.mutex);
drhf7141992008-06-19 00:16:08 +0000505 sqlite3StatusSet(SQLITE_STATUS_MALLOC_SIZE, nBytes);
drh7c6791c2009-08-18 14:48:53 +0000506 if( sqlite3StatusValue(SQLITE_STATUS_MEMORY_USED)+nNew-nOld >=
507 mem0.alarmThreshold ){
508 sqlite3MallocAlarm(nNew-nOld);
509 }
drh107b56e2010-03-12 16:32:53 +0000510 assert( sqlite3MemdebugHasType(pOld, MEMTYPE_HEAP) );
drh174b9a12010-07-26 11:07:20 +0000511 assert( sqlite3MemdebugNoType(pOld, ~MEMTYPE_HEAP) );
drh7c6791c2009-08-18 14:48:53 +0000512 pNew = sqlite3GlobalConfig.m.xRealloc(pOld, nNew);
513 if( pNew==0 && mem0.alarmCallback ){
514 sqlite3MallocAlarm(nBytes);
danielk1977075c23a2008-09-01 18:34:20 +0000515 pNew = sqlite3GlobalConfig.m.xRealloc(pOld, nNew);
drh7c6791c2009-08-18 14:48:53 +0000516 }
517 if( pNew ){
518 nNew = sqlite3MallocSize(pNew);
519 sqlite3StatusAdd(SQLITE_STATUS_MEMORY_USED, nNew-nOld);
drhfec00ea2008-06-14 16:56:21 +0000520 }
521 sqlite3_mutex_leave(mem0.mutex);
522 }else{
drh7c6791c2009-08-18 14:48:53 +0000523 pNew = sqlite3GlobalConfig.m.xRealloc(pOld, nNew);
drhfec00ea2008-06-14 16:56:21 +0000524 }
525 return pNew;
526}
527
528/*
529** The public interface to sqlite3Realloc. Make sure that the memory
530** subsystem is initialized prior to invoking sqliteRealloc.
531*/
532void *sqlite3_realloc(void *pOld, int n){
533#ifndef SQLITE_OMIT_AUTOINIT
534 if( sqlite3_initialize() ) return 0;
535#endif
536 return sqlite3Realloc(pOld, n);
537}
538
drha3152892007-05-05 11:48:52 +0000539
540/*
drh17435752007-08-16 04:30:38 +0000541** Allocate and zero memory.
drha3152892007-05-05 11:48:52 +0000542*/
drhfec00ea2008-06-14 16:56:21 +0000543void *sqlite3MallocZero(int n){
544 void *p = sqlite3Malloc(n);
drha3152892007-05-05 11:48:52 +0000545 if( p ){
546 memset(p, 0, n);
547 }
548 return p;
549}
drh17435752007-08-16 04:30:38 +0000550
551/*
552** Allocate and zero memory. If the allocation fails, make
553** the mallocFailed flag in the connection pointer.
554*/
drhfec00ea2008-06-14 16:56:21 +0000555void *sqlite3DbMallocZero(sqlite3 *db, int n){
danielk1977a1644fd2007-08-29 12:31:25 +0000556 void *p = sqlite3DbMallocRaw(db, n);
drh17435752007-08-16 04:30:38 +0000557 if( p ){
558 memset(p, 0, n);
drh17435752007-08-16 04:30:38 +0000559 }
560 return p;
561}
562
563/*
564** Allocate and zero memory. If the allocation fails, make
565** the mallocFailed flag in the connection pointer.
drhddecae72008-10-11 17:35:16 +0000566**
567** If db!=0 and db->mallocFailed is true (indicating a prior malloc
568** failure on the same database connection) then always return 0.
569** Hence for a particular database connection, once malloc starts
570** failing, it fails consistently until mallocFailed is reset.
571** This is an important assumption. There are many places in the
572** code that do things like this:
573**
574** int *a = (int*)sqlite3DbMallocRaw(db, 100);
575** int *b = (int*)sqlite3DbMallocRaw(db, 200);
576** if( b ) a[10] = 9;
577**
578** In other words, if a subsequent malloc (ex: "b") worked, it is assumed
579** that all prior mallocs (ex: "a") worked too.
drh17435752007-08-16 04:30:38 +0000580*/
drhfec00ea2008-06-14 16:56:21 +0000581void *sqlite3DbMallocRaw(sqlite3 *db, int n){
drh633e6d52008-07-28 19:34:53 +0000582 void *p;
drhd9da78a2009-03-24 15:08:09 +0000583 assert( db==0 || sqlite3_mutex_held(db->mutex) );
drh4150ebf2008-10-11 15:38:29 +0000584#ifndef SQLITE_OMIT_LOOKASIDE
drh633e6d52008-07-28 19:34:53 +0000585 if( db ){
586 LookasideSlot *pBuf;
587 if( db->mallocFailed ){
588 return 0;
danielk1977a1644fd2007-08-29 12:31:25 +0000589 }
drh633e6d52008-07-28 19:34:53 +0000590 if( db->lookaside.bEnabled && n<=db->lookaside.sz
591 && (pBuf = db->lookaside.pFree)!=0 ){
592 db->lookaside.pFree = pBuf->pNext;
593 db->lookaside.nOut++;
594 if( db->lookaside.nOut>db->lookaside.mxOut ){
595 db->lookaside.mxOut = db->lookaside.nOut;
596 }
597 return (void*)pBuf;
598 }
599 }
drhddecae72008-10-11 17:35:16 +0000600#else
601 if( db && db->mallocFailed ){
602 return 0;
603 }
drh4150ebf2008-10-11 15:38:29 +0000604#endif
drh633e6d52008-07-28 19:34:53 +0000605 p = sqlite3Malloc(n);
606 if( !p && db ){
607 db->mallocFailed = 1;
drh17435752007-08-16 04:30:38 +0000608 }
drh174b9a12010-07-26 11:07:20 +0000609 sqlite3MemdebugSetType(p, MEMTYPE_DB |
610 ((db && db->lookaside.bEnabled) ? MEMTYPE_LOOKASIDE : MEMTYPE_HEAP));
drh17435752007-08-16 04:30:38 +0000611 return p;
612}
613
danielk197726783a52007-08-29 14:06:22 +0000614/*
615** Resize the block of memory pointed to by p to n bytes. If the
drh633e6d52008-07-28 19:34:53 +0000616** resize fails, set the mallocFailed flag in the connection object.
danielk197726783a52007-08-29 14:06:22 +0000617*/
danielk1977a1644fd2007-08-29 12:31:25 +0000618void *sqlite3DbRealloc(sqlite3 *db, void *p, int n){
619 void *pNew = 0;
drhd9da78a2009-03-24 15:08:09 +0000620 assert( db!=0 );
drh7047e252009-03-23 17:49:14 +0000621 assert( sqlite3_mutex_held(db->mutex) );
danielk1977a1644fd2007-08-29 12:31:25 +0000622 if( db->mallocFailed==0 ){
drh633e6d52008-07-28 19:34:53 +0000623 if( p==0 ){
624 return sqlite3DbMallocRaw(db, n);
625 }
626 if( isLookaside(db, p) ){
627 if( n<=db->lookaside.sz ){
628 return p;
629 }
630 pNew = sqlite3DbMallocRaw(db, n);
631 if( pNew ){
632 memcpy(pNew, p, db->lookaside.sz);
633 sqlite3DbFree(db, p);
634 }
635 }else{
drh174b9a12010-07-26 11:07:20 +0000636 assert( sqlite3MemdebugHasType(p, MEMTYPE_DB) );
637 assert( sqlite3MemdebugHasType(p, MEMTYPE_LOOKASIDE|MEMTYPE_HEAP) );
drh107b56e2010-03-12 16:32:53 +0000638 sqlite3MemdebugSetType(p, MEMTYPE_HEAP);
drh633e6d52008-07-28 19:34:53 +0000639 pNew = sqlite3_realloc(p, n);
640 if( !pNew ){
drh174b9a12010-07-26 11:07:20 +0000641 sqlite3MemdebugSetType(p, MEMTYPE_DB|MEMTYPE_HEAP);
drh633e6d52008-07-28 19:34:53 +0000642 db->mallocFailed = 1;
643 }
drh174b9a12010-07-26 11:07:20 +0000644 sqlite3MemdebugSetType(pNew, MEMTYPE_DB |
645 (db->lookaside.bEnabled ? MEMTYPE_LOOKASIDE : MEMTYPE_HEAP));
danielk1977a1644fd2007-08-29 12:31:25 +0000646 }
647 }
648 return pNew;
649}
650
drh17435752007-08-16 04:30:38 +0000651/*
652** Attempt to reallocate p. If the reallocation fails, then free p
653** and set the mallocFailed flag in the database connection.
654*/
655void *sqlite3DbReallocOrFree(sqlite3 *db, void *p, int n){
drha3152892007-05-05 11:48:52 +0000656 void *pNew;
danielk1977a1644fd2007-08-29 12:31:25 +0000657 pNew = sqlite3DbRealloc(db, p, n);
drha3152892007-05-05 11:48:52 +0000658 if( !pNew ){
drh633e6d52008-07-28 19:34:53 +0000659 sqlite3DbFree(db, p);
drha3152892007-05-05 11:48:52 +0000660 }
661 return pNew;
662}
663
drha3152892007-05-05 11:48:52 +0000664/*
665** Make a copy of a string in memory obtained from sqliteMalloc(). These
666** functions call sqlite3MallocRaw() directly instead of sqliteMalloc(). This
667** is because when memory debugging is turned on, these two functions are
668** called via macros that record the current file and line number in the
669** ThreadData structure.
670*/
drh633e6d52008-07-28 19:34:53 +0000671char *sqlite3DbStrDup(sqlite3 *db, const char *z){
drha3152892007-05-05 11:48:52 +0000672 char *zNew;
drh633e6d52008-07-28 19:34:53 +0000673 size_t n;
674 if( z==0 ){
675 return 0;
676 }
drhdee0e402009-05-03 20:23:53 +0000677 n = sqlite3Strlen30(z) + 1;
drh633e6d52008-07-28 19:34:53 +0000678 assert( (n&0x7fffffff)==n );
679 zNew = sqlite3DbMallocRaw(db, (int)n);
drha3152892007-05-05 11:48:52 +0000680 if( zNew ){
681 memcpy(zNew, z, n);
danielk19771e536952007-08-16 10:09:01 +0000682 }
683 return zNew;
684}
685char *sqlite3DbStrNDup(sqlite3 *db, const char *z, int n){
drh633e6d52008-07-28 19:34:53 +0000686 char *zNew;
687 if( z==0 ){
688 return 0;
689 }
690 assert( (n&0x7fffffff)==n );
691 zNew = sqlite3DbMallocRaw(db, n+1);
692 if( zNew ){
693 memcpy(zNew, z, n);
694 zNew[n] = 0;
danielk19771e536952007-08-16 10:09:01 +0000695 }
696 return zNew;
697}
698
drha3152892007-05-05 11:48:52 +0000699/*
drhf089aa42008-07-08 19:34:06 +0000700** Create a string from the zFromat argument and the va_list that follows.
701** Store the string in memory obtained from sqliteMalloc() and make *pz
702** point to that string.
drha3152892007-05-05 11:48:52 +0000703*/
drhf089aa42008-07-08 19:34:06 +0000704void sqlite3SetString(char **pz, sqlite3 *db, const char *zFormat, ...){
drha3152892007-05-05 11:48:52 +0000705 va_list ap;
drhf089aa42008-07-08 19:34:06 +0000706 char *z;
drha3152892007-05-05 11:48:52 +0000707
drhf089aa42008-07-08 19:34:06 +0000708 va_start(ap, zFormat);
709 z = sqlite3VMPrintf(db, zFormat, ap);
drha3152892007-05-05 11:48:52 +0000710 va_end(ap);
drh633e6d52008-07-28 19:34:53 +0000711 sqlite3DbFree(db, *pz);
drhf089aa42008-07-08 19:34:06 +0000712 *pz = z;
drha3152892007-05-05 11:48:52 +0000713}
714
715
716/*
717** This function must be called before exiting any API function (i.e.
drh17435752007-08-16 04:30:38 +0000718** returning control to the user) that has called sqlite3_malloc or
719** sqlite3_realloc.
drha3152892007-05-05 11:48:52 +0000720**
721** The returned value is normally a copy of the second argument to this
shanebe217792009-03-05 04:20:31 +0000722** function. However, if a malloc() failure has occurred since the previous
drha3152892007-05-05 11:48:52 +0000723** invocation SQLITE_NOMEM is returned instead.
724**
shanebe217792009-03-05 04:20:31 +0000725** If the first argument, db, is not NULL and a malloc() error has occurred,
drha3152892007-05-05 11:48:52 +0000726** then the connection error-code (the value returned by sqlite3_errcode())
727** is set to SQLITE_NOMEM.
728*/
drha3152892007-05-05 11:48:52 +0000729int sqlite3ApiExit(sqlite3* db, int rc){
danielk1977a1644fd2007-08-29 12:31:25 +0000730 /* If the db handle is not NULL, then we must hold the connection handle
731 ** mutex here. Otherwise the read (and possible write) of db->mallocFailed
732 ** is unsafe, as is the call to sqlite3Error().
733 */
734 assert( !db || sqlite3_mutex_held(db->mutex) );
danielk197798c21902008-09-23 16:41:29 +0000735 if( db && (db->mallocFailed || rc==SQLITE_IOERR_NOMEM) ){
drha3152892007-05-05 11:48:52 +0000736 sqlite3Error(db, SQLITE_NOMEM, 0);
drh17435752007-08-16 04:30:38 +0000737 db->mallocFailed = 0;
drha3152892007-05-05 11:48:52 +0000738 rc = SQLITE_NOMEM;
739 }
740 return rc & (db ? db->errMask : 0xff);
741}