Annotation of embedaddon/sqlite3/test/threadtest1.c, revision 1.1

1.1     ! misho       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: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>