| 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 |