OLD | NEW |
| (Empty) |
1 /* | |
2 ** 2002 January 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 ************************************************************************* | |
12 ** This file implements a simple standalone program used to test whether | |
13 ** or not the SQLite library is threadsafe. | |
14 ** | |
15 ** Testing the thread safety of SQLite is difficult because there are very | |
16 ** few places in the code that are even potentially unsafe, and those | |
17 ** places execute for very short periods of time. So even if the library | |
18 ** is compiled with its mutexes disabled, it is likely to work correctly | |
19 ** in a multi-threaded program most of the time. | |
20 ** | |
21 ** This file is NOT part of the standard SQLite library. It is used for | |
22 ** testing only. | |
23 */ | |
24 #include "sqlite.h" | |
25 #include <pthread.h> | |
26 #include <sched.h> | |
27 #include <stdio.h> | |
28 #include <stdlib.h> | |
29 #include <string.h> | |
30 #include <unistd.h> | |
31 | |
32 /* | |
33 ** Enable for tracing | |
34 */ | |
35 static int verbose = 0; | |
36 | |
37 /* | |
38 ** Come here to die. | |
39 */ | |
40 static void Exit(int rc){ | |
41 exit(rc); | |
42 } | |
43 | |
44 extern char *sqlite3_mprintf(const char *zFormat, ...); | |
45 extern char *sqlite3_vmprintf(const char *zFormat, va_list); | |
46 | |
47 /* | |
48 ** When a lock occurs, yield. | |
49 */ | |
50 static int db_is_locked(void *NotUsed, int iCount){ | |
51 /* sched_yield(); */ | |
52 if( verbose ) printf("BUSY %s #%d\n", (char*)NotUsed, iCount); | |
53 usleep(100); | |
54 return iCount<25; | |
55 } | |
56 | |
57 /* | |
58 ** Used to accumulate query results by db_query() | |
59 */ | |
60 struct QueryResult { | |
61 const char *zFile; /* Filename - used for error reporting */ | |
62 int nElem; /* Number of used entries in azElem[] */ | |
63 int nAlloc; /* Number of slots allocated for azElem[] */ | |
64 char **azElem; /* The result of the query */ | |
65 }; | |
66 | |
67 /* | |
68 ** The callback function for db_query | |
69 */ | |
70 static int db_query_callback( | |
71 void *pUser, /* Pointer to the QueryResult structure */ | |
72 int nArg, /* Number of columns in this result row */ | |
73 char **azArg, /* Text of data in all columns */ | |
74 char **NotUsed /* Names of the columns */ | |
75 ){ | |
76 struct QueryResult *pResult = (struct QueryResult*)pUser; | |
77 int i; | |
78 if( pResult->nElem + nArg >= pResult->nAlloc ){ | |
79 if( pResult->nAlloc==0 ){ | |
80 pResult->nAlloc = nArg+1; | |
81 }else{ | |
82 pResult->nAlloc = pResult->nAlloc*2 + nArg + 1; | |
83 } | |
84 pResult->azElem = realloc( pResult->azElem, pResult->nAlloc*sizeof(char*)); | |
85 if( pResult->azElem==0 ){ | |
86 fprintf(stdout,"%s: malloc failed\n", pResult->zFile); | |
87 return 1; | |
88 } | |
89 } | |
90 if( azArg==0 ) return 0; | |
91 for(i=0; i<nArg; i++){ | |
92 pResult->azElem[pResult->nElem++] = | |
93 sqlite3_mprintf("%s",azArg[i] ? azArg[i] : ""); | |
94 } | |
95 return 0; | |
96 } | |
97 | |
98 /* | |
99 ** Execute a query against the database. NULL values are returned | |
100 ** as an empty string. The list is terminated by a single NULL pointer. | |
101 */ | |
102 char **db_query(sqlite *db, const char *zFile, const char *zFormat, ...){ | |
103 char *zSql; | |
104 int rc; | |
105 char *zErrMsg = 0; | |
106 va_list ap; | |
107 struct QueryResult sResult; | |
108 va_start(ap, zFormat); | |
109 zSql = sqlite3_vmprintf(zFormat, ap); | |
110 va_end(ap); | |
111 memset(&sResult, 0, sizeof(sResult)); | |
112 sResult.zFile = zFile; | |
113 if( verbose ) printf("QUERY %s: %s\n", zFile, zSql); | |
114 rc = sqlite3_exec(db, zSql, db_query_callback, &sResult, &zErrMsg); | |
115 if( rc==SQLITE_SCHEMA ){ | |
116 if( zErrMsg ) free(zErrMsg); | |
117 rc = sqlite3_exec(db, zSql, db_query_callback, &sResult, &zErrMsg); | |
118 } | |
119 if( verbose ) printf("DONE %s %s\n", zFile, zSql); | |
120 if( zErrMsg ){ | |
121 fprintf(stdout,"%s: query failed: %s - %s\n", zFile, zSql, zErrMsg); | |
122 free(zErrMsg); | |
123 free(zSql); | |
124 Exit(1); | |
125 } | |
126 sqlite3_free(zSql); | |
127 if( sResult.azElem==0 ){ | |
128 db_query_callback(&sResult, 0, 0, 0); | |
129 } | |
130 sResult.azElem[sResult.nElem] = 0; | |
131 return sResult.azElem; | |
132 } | |
133 | |
134 /* | |
135 ** Execute an SQL statement. | |
136 */ | |
137 void db_execute(sqlite *db, const char *zFile, const char *zFormat, ...){ | |
138 char *zSql; | |
139 int rc; | |
140 char *zErrMsg = 0; | |
141 va_list ap; | |
142 va_start(ap, zFormat); | |
143 zSql = sqlite3_vmprintf(zFormat, ap); | |
144 va_end(ap); | |
145 if( verbose ) printf("EXEC %s: %s\n", zFile, zSql); | |
146 do{ | |
147 rc = sqlite3_exec(db, zSql, 0, 0, &zErrMsg); | |
148 }while( rc==SQLITE_BUSY ); | |
149 if( verbose ) printf("DONE %s: %s\n", zFile, zSql); | |
150 if( zErrMsg ){ | |
151 fprintf(stdout,"%s: command failed: %s - %s\n", zFile, zSql, zErrMsg); | |
152 free(zErrMsg); | |
153 sqlite3_free(zSql); | |
154 Exit(1); | |
155 } | |
156 sqlite3_free(zSql); | |
157 } | |
158 | |
159 /* | |
160 ** Free the results of a db_query() call. | |
161 */ | |
162 void db_query_free(char **az){ | |
163 int i; | |
164 for(i=0; az[i]; i++){ | |
165 sqlite3_free(az[i]); | |
166 } | |
167 free(az); | |
168 } | |
169 | |
170 /* | |
171 ** Check results | |
172 */ | |
173 void db_check(const char *zFile, const char *zMsg, char **az, ...){ | |
174 va_list ap; | |
175 int i; | |
176 char *z; | |
177 va_start(ap, az); | |
178 for(i=0; (z = va_arg(ap, char*))!=0; i++){ | |
179 if( az[i]==0 || strcmp(az[i],z)!=0 ){ | |
180 fprintf(stdout,"%s: %s: bad result in column %d: %s\n", | |
181 zFile, zMsg, i+1, az[i]); | |
182 db_query_free(az); | |
183 Exit(1); | |
184 } | |
185 } | |
186 va_end(ap); | |
187 db_query_free(az); | |
188 } | |
189 | |
190 pthread_mutex_t lock = PTHREAD_MUTEX_INITIALIZER; | |
191 pthread_cond_t sig = PTHREAD_COND_INITIALIZER; | |
192 int thread_cnt = 0; | |
193 | |
194 static void *worker_bee(void *pArg){ | |
195 const char *zFilename = (char*)pArg; | |
196 char *azErr; | |
197 int i, cnt; | |
198 int t = atoi(zFilename); | |
199 char **az; | |
200 sqlite *db; | |
201 | |
202 pthread_mutex_lock(&lock); | |
203 thread_cnt++; | |
204 pthread_mutex_unlock(&lock); | |
205 printf("%s: START\n", zFilename); | |
206 fflush(stdout); | |
207 for(cnt=0; cnt<10; cnt++){ | |
208 sqlite3_open(&zFilename[2], &db); | |
209 if( db==0 ){ | |
210 fprintf(stdout,"%s: can't open\n", zFilename); | |
211 Exit(1); | |
212 } | |
213 sqlite3_busy_handler(db, db_is_locked, zFilename); | |
214 db_execute(db, zFilename, "CREATE TABLE t%d(a,b,c);", t); | |
215 for(i=1; i<=100; i++){ | |
216 db_execute(db, zFilename, "INSERT INTO t%d VALUES(%d,%d,%d);", | |
217 t, i, i*2, i*i); | |
218 } | |
219 az = db_query(db, zFilename, "SELECT count(*) FROM t%d", t); | |
220 db_check(zFilename, "tX size", az, "100", 0); | |
221 az = db_query(db, zFilename, "SELECT avg(b) FROM t%d", t); | |
222 db_check(zFilename, "tX avg", az, "101", 0); | |
223 db_execute(db, zFilename, "DELETE FROM t%d WHERE a>50", t); | |
224 az = db_query(db, zFilename, "SELECT avg(b) FROM t%d", t); | |
225 db_check(zFilename, "tX avg2", az, "51", 0); | |
226 for(i=1; i<=50; i++){ | |
227 char z1[30], z2[30]; | |
228 az = db_query(db, zFilename, "SELECT b, c FROM t%d WHERE a=%d", t, i); | |
229 sprintf(z1, "%d", i*2); | |
230 sprintf(z2, "%d", i*i); | |
231 db_check(zFilename, "readback", az, z1, z2, 0); | |
232 } | |
233 db_execute(db, zFilename, "DROP TABLE t%d;", t); | |
234 sqlite3_close(db); | |
235 } | |
236 printf("%s: END\n", zFilename); | |
237 /* unlink(zFilename); */ | |
238 fflush(stdout); | |
239 pthread_mutex_lock(&lock); | |
240 thread_cnt--; | |
241 if( thread_cnt<=0 ){ | |
242 pthread_cond_signal(&sig); | |
243 } | |
244 pthread_mutex_unlock(&lock); | |
245 return 0; | |
246 } | |
247 | |
248 int main(int argc, char **argv){ | |
249 char *zFile; | |
250 int i, n; | |
251 pthread_t id; | |
252 if( argc>2 && strcmp(argv[1], "-v")==0 ){ | |
253 verbose = 1; | |
254 argc--; | |
255 argv++; | |
256 } | |
257 if( argc<2 || (n=atoi(argv[1]))<1 ) n = 10; | |
258 for(i=0; i<n; i++){ | |
259 char zBuf[200]; | |
260 sprintf(zBuf, "testdb-%d", (i+1)/2); | |
261 unlink(zBuf); | |
262 } | |
263 for(i=0; i<n; i++){ | |
264 zFile = sqlite3_mprintf("%d.testdb-%d", i%2+1, (i+2)/2); | |
265 if( (i%2)==0 ){ | |
266 /* Remove both the database file and any old journal for the file | |
267 ** being used by this thread and the next one. */ | |
268 char *zDb = &zFile[2]; | |
269 char *zJournal = sqlite3_mprintf("%s-journal", zDb); | |
270 unlink(zDb); | |
271 unlink(zJournal); | |
272 free(zJournal); | |
273 } | |
274 | |
275 pthread_create(&id, 0, worker_bee, (void*)zFile); | |
276 pthread_detach(id); | |
277 } | |
278 pthread_mutex_lock(&lock); | |
279 while( thread_cnt>0 ){ | |
280 pthread_cond_wait(&sig, &lock); | |
281 } | |
282 pthread_mutex_unlock(&lock); | |
283 for(i=0; i<n; i++){ | |
284 char zBuf[200]; | |
285 sprintf(zBuf, "testdb-%d", (i+1)/2); | |
286 unlink(zBuf); | |
287 } | |
288 return 0; | |
289 } | |
OLD | NEW |