err = true;    }    if(tcbdbrnum(bdb) != tcmaprnum(map)){      eprint(bdb, "(validation)");      err = true;    }    int end = rnum * tnum;    for(int i = 1; i <= end && !err; i++){      char kbuf[RECBUFSIZ];      int ksiz = sprintf(kbuf, "%d", i - 1);      int vsiz;      const char *vbuf = tcmapget(map, kbuf, ksiz, &vsiz);      int rsiz;      char *rbuf = tcbdbget(bdb, kbuf, ksiz, &rsiz);      if(vbuf){        iputchar('.');        if(!rbuf){          eprint(bdb, "tcbdbget");          err = true;        } else if(rsiz != vsiz || memcmp(rbuf, vbuf, rsiz)){          eprint(bdb, "(validation)");          err = true;        }      } else {        iputchar('*');        if(rbuf || tcbdbecode(bdb) != TCENOREC){          eprint(bdb, "(validation)");          err = true;        }      }      tcfree(rbuf);      if(i % 50 == 0) iprintf(" (%08d)\n", i);    }    if(rnum % 50 > 0) iprintf(" (%08d)\n", rnum);  }  tcmapdel(map);  iprintf("record number: %llu\n", (unsigned long long)tcbdbrnum(bdb));  iprintf("size: %llu\n", (unsigned long long)tcbdbfsiz(bdb));  mprint(bdb);  sysprint();  if(!tcbdbclose(bdb)){    eprint(bdb, "tcbdbclose");    err = true;  }  tcbdbdel(bdb);  iprintf("time: %.3f\n", tctime() - stime);  iprintf("%s\n\n", err ? "error" : "ok");  return err ? 1 : 0;}/* perform typical command */static int proctypical(const char *path, int tnum, int rnum, int lmemb, int nmemb,                       int bnum, int apow, int fpow, int opts, int omode, bool nc, int rratio){  iprintf("<Typical Access Test>\n  seed=%u  path=%s  tnum=%d  rnum=%d  lmemb=%d  nmemb=%d"          "  bnum=%d  apow=%d  fpow=%d  opts=%d  omode=%d  nc=%d  rratio=%d\n\n",          g_randseed, path, tnum, rnum, lmemb, nmemb, bnum, apow, fpow, opts, omode, nc, rratio);  bool err = false;  double stime = tctime();  TCBDB *bdb = tcbdbnew();  if(g_dbgfd >= 0) tcbdbsetdbgfd(bdb, g_dbgfd);  if(!tcbdbsetmutex(bdb)){    eprint(bdb, "tcbdbsetmutex");    err = true;  }  if(!tcbdbsetcodecfunc(bdb, _tc_recencode, NULL, _tc_recdecode, NULL)){    eprint(bdb, "tcbdbsetcodecfunc");    err = true;  }  if(!tcbdbtune(bdb, lmemb, nmemb, bnum, apow, fpow, opts)){    eprint(bdb, "tcbdbtune");    err = true;  }  if(!tcbdbopen(bdb, path, BDBOWRITER | BDBOCREAT | BDBOTRUNC | omode)){    eprint(bdb, "tcbdbopen");    err = true;  }  TARGTYPICAL targs[tnum];  pthread_t threads[tnum];  if(tnum == 1){    targs[0].bdb = bdb;    targs[0].rnum = rnum;    targs[0].nc = nc;    targs[0].rratio = rratio;    targs[0].id = 0;    if(threadtypical(targs) != NULL) err = true;  } else {    for(int i = 0; i < tnum; i++){      targs[i].bdb = bdb;      targs[i].rnum = rnum;      targs[i].nc = nc;      targs[i].rratio = rratio;      targs[i].id = i;      if(pthread_create(threads + i, NULL, threadtypical, targs + i) != 0){        eprint(bdb, "pthread_create");        targs[i].id = -1;        err = true;      }    }    for(int i = 0; i < tnum; i++){      if(targs[i].id == -1) continue;      void *rv;      if(pthread_join(threads[i], &rv) != 0){        eprint(bdb, "pthread_join");        err = true;      } else if(rv){        err = true;      }    }  }  iprintf("record number: %llu\n", (unsigned long long)tcbdbrnum(bdb));  iprintf("size: %llu\n", (unsigned long long)tcbdbfsiz(bdb));  mprint(bdb);  sysprint();  if(!tcbdbclose(bdb)){    eprint(bdb, "tcbdbclose");    err = true;  }  tcbdbdel(bdb);  iprintf("time: %.3f\n", tctime() - stime);  iprintf("%s\n\n", err ? "error" : "ok");  return err ? 1 : 0;}/* perform race command */static int procrace(const char *path, int tnum, int rnum, int lmemb, int nmemb,                    int bnum, int apow, int fpow, int opts, int omode){  iprintf("<Race Condition Test>\n  seed=%u  path=%s  tnum=%d  rnum=%d  lmemb=%d  nmemb=%d"          "  bnum=%d  apow=%d  fpow=%d  opts=%d  omode=%d\n\n",          g_randseed, path, tnum, rnum, lmemb, nmemb, bnum, apow, fpow, opts, omode);  bool err = false;  double stime = tctime();  TCBDB *bdb = tcbdbnew();  if(g_dbgfd >= 0) tcbdbsetdbgfd(bdb, g_dbgfd);  if(!tcbdbsetmutex(bdb)){    eprint(bdb, "tcbdbsetmutex");    err = true;  }  if(!tcbdbsetcodecfunc(bdb, _tc_recencode, NULL, _tc_recdecode, NULL)){    eprint(bdb, "tcbdbsetcodecfunc");    err = true;  }  if(!tcbdbtune(bdb, lmemb, nmemb, bnum, apow, fpow, opts)){    eprint(bdb, "tcbdbtune");    err = true;  }  if(!tcbdbopen(bdb, path, BDBOWRITER | BDBOCREAT | BDBOTRUNC | omode)){    eprint(bdb, "tcbdbopen");    err = true;  }  TARGRACE targs[tnum];  pthread_t threads[tnum];  if(tnum == 1){    targs[0].bdb = bdb;    targs[0].rnum = rnum;    targs[0].id = 0;    if(threadrace(targs) != NULL) err = true;  } else {    for(int i = 0; i < tnum; i++){      targs[i].bdb = bdb;      targs[i].rnum = rnum;      targs[i].id = i;      if(pthread_create(threads + i, NULL, threadrace, targs + i) != 0){        eprint(bdb, "pthread_create");        targs[i].id = -1;        err = true;      }    }    for(int i = 0; i < tnum; i++){      if(targs[i].id == -1) continue;      void *rv;      if(pthread_join(threads[i], &rv) != 0){        eprint(bdb, "pthread_join");        err = true;      } else if(rv){        err = true;      }    }  }  iprintf("record number: %llu\n", (unsigned long long)tcbdbrnum(bdb));  iprintf("size: %llu\n", (unsigned long long)tcbdbfsiz(bdb));  mprint(bdb);  sysprint();  if(!tcbdbclose(bdb)){    eprint(bdb, "tcbdbclose");    err = true;  }  tcbdbdel(bdb);  iprintf("time: %.3f\n", tctime() - stime);  iprintf("%s\n\n", err ? "error" : "ok");  return err ? 1 : 0;}/* thread the write function */static void *threadwrite(void *targ){  TCBDB *bdb = ((TARGWRITE *)targ)->bdb;  int rnum = ((TARGWRITE *)targ)->rnum;  bool rnd = ((TARGWRITE *)targ)->rnd;  int id = ((TARGWRITE *)targ)->id;  bool err = false;  int base = id * rnum;  for(int i = 1; i <= rnum; i++){    char buf[RECBUFSIZ];    int len = sprintf(buf, "%08d", base + (rnd ? myrand(i) : i));    if(!tcbdbput(bdb, buf, len, buf, len)){      eprint(bdb, "tcbdbput");      err = true;      break;    }    if(id <= 0 && rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  return err ? "error" : NULL;}/* thread the read function */static void *threadread(void *targ){  TCBDB *bdb = ((TARGREAD *)targ)->bdb;  int rnum = ((TARGREAD *)targ)->rnum;  bool wb = ((TARGREAD *)targ)->wb;  bool rnd = ((TARGREAD *)targ)->rnd;  int id = ((TARGREAD *)targ)->id;  bool err = false;  int base = id * rnum;  for(int i = 1; i <= rnum && !err; i++){    char kbuf[RECBUFSIZ];    int ksiz = sprintf(kbuf, "%08d", base + (rnd ? myrandnd(i) : i));    int vsiz;    if(wb){      int vsiz;      const char *vbuf = tcbdbget3(bdb, kbuf, ksiz, &vsiz);      if(!vbuf && (!rnd || tcbdbecode(bdb) != TCENOREC)){        eprint(bdb, "tcbdbget3");        err = true;      }    } else {      char *vbuf = tcbdbget(bdb, kbuf, ksiz, &vsiz);      if(!vbuf && (!rnd || tcbdbecode(bdb) != TCENOREC)){        eprint(bdb, "tcbdbget");        err = true;      }      tcfree(vbuf);    }    if(id == 0 && rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  return err ? "error" : NULL;}/* thread the remove function */static void *threadremove(void *targ){  TCBDB *bdb = ((TARGREMOVE *)targ)->bdb;  int rnum = ((TARGREMOVE *)targ)->rnum;  bool rnd = ((TARGREMOVE *)targ)->rnd;  int id = ((TARGREMOVE *)targ)->id;  bool err = false;  int base = id * rnum;  for(int i = 1; i <= rnum; i++){    char kbuf[RECBUFSIZ];    int ksiz = sprintf(kbuf, "%08d", base + (rnd ? myrand(i + 1) : i));    if(!tcbdbout(bdb, kbuf, ksiz) && (!rnd || tcbdbecode(bdb) != TCENOREC)){      eprint(bdb, "tcbdbout");      err = true;      break;    }    if(id == 0 && rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  return err ? "error" : NULL;}/* thread the wicked function */static void *threadwicked(void *targ){  TCBDB *bdb = ((TARGWICKED *)targ)->bdb;  int rnum = ((TARGWICKED *)targ)->rnum;  bool nc = ((TARGWICKED *)targ)->nc;  int id = ((TARGWICKED *)targ)->id;  TCMAP *map = ((TARGWICKED *)targ)->map;  BDBCUR *cur = tcbdbcurnew(bdb);  bool err = false;  for(int i = 1; i <= rnum && !err; i++){    char kbuf[RECBUFSIZ];    int ksiz = sprintf(kbuf, "%d", myrand(rnum * (id + 1)));    char vbuf[RECBUFSIZ];    int vsiz = myrand(RECBUFSIZ);    memset(vbuf, '*', vsiz);    vbuf[vsiz] = '\0';    char *rbuf;    if(!nc) tcglobalmutexlock();    switch(myrand(16)){    case 0:      if(id == 0) iputchar('0');      if(!tcbdbput(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbput");        err = true;      }      if(!nc) tcmapput(map, kbuf, ksiz, vbuf, vsiz);      break;    case 1:      if(id == 0) iputchar('1');      if(!tcbdbput2(bdb, kbuf, vbuf)){        eprint(bdb, "tcbdbput2");        err = true;      }      if(!nc) tcmapput2(map, kbuf, vbuf);      break;    case 2:      if(id == 0) iputchar('2');      if(!tcbdbputkeep(bdb, kbuf, ksiz, vbuf, vsiz) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbputkeep");        err = true;      }      if(!nc) tcmapputkeep(map, kbuf, ksiz, vbuf, vsiz);      break;    case 3:      if(id == 0) iputchar('3');      if(!tcbdbputkeep2(bdb, kbuf, vbuf) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbputkeep2");        err = true;      }      if(!nc) tcmapputkeep2(map, kbuf, vbuf);      break;    case 4:      if(id == 0) iputchar('4');      if(!tcbdbputcat(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbputcat");        err = true;      }      if(!nc) tcmapputcat(map, kbuf, ksiz, vbuf, vsiz);      break;    case 5:      if(id == 0) iputchar('5');      if(!tcbdbputcat2(bdb, kbuf, vbuf)){        eprint(bdb, "tcbdbputcat2");        err = true;      }      if(!nc) tcmapputcat2(map, kbuf, vbuf);      break;    case 6:      if(id == 0) iputchar('6');      if(nc){        if(!tcbdbputdup(bdb, kbuf, ksiz, vbuf, vsiz)){          eprint(bdb, "tcbdbputdup");          err = true;        }      }      break;    case 7:      if(id == 0) iputchar('7');      if(nc){        if(!tcbdbputdup2(bdb, kbuf, vbuf)){          eprint(bdb, "tcbdbputdup2");          err = true;        }      }      break;    case 8:      if(id == 0) iputchar('8');      if(myrand(2) == 0){        if(!tcbdbout(bdb, kbuf, ksiz) && tcbdbecode(bdb) != TCENOREC){          eprint(bdb, "tcbdbout");          err = true;        }        if(!nc) tcmapout(map, kbuf, ksiz);      }      break;    case 9:      if(id == 0) iputchar('9');      if(myrand(2) == 0){        if(!tcbdbout2(bdb, kbuf) && tcbdbecode(bdb) != TCENOREC){          eprint(bdb, "tcbdbout2");          err = true;        }        if(!nc) tcmapout2(map, kbuf);      }      break;    case 10:      if(id == 0) iputchar('A');      if(!(rbuf = tcbdbget(bdb, kbuf, ksiz, &vsiz))){        if(tcbdbecode(bdb) != TCENOREC){          eprint(bdb, "tcbdbget");          err = true;        }        rbuf = tcsprintf("[%d]", myrand(i + 1));        vsiz = strlen(rbuf);      }      vsiz += myrand(vsiz);      if(myrand(3) == 0) vsiz += PATH_MAX;      rbuf = tcrealloc(rbuf, vsiz + 1);      for(int j = 0; j < vsiz; j++){        rbuf[j] = myrand(0x100);      }      if(!tcbdbput(bdb, kbuf, ksiz, rbuf, vsiz)){        eprint(bdb, "tcbdbput");        err = true;      }      if(!nc) tcmapput(map, kbuf, ksiz, rbuf, vsiz);      tcfree(rbuf);      break;    case 11:      if(id == 0) iputchar('B');      if(!(rbuf = tcbdbget(bdb, kbuf, ksiz, &vsiz)) && tcbdbecode(bdb) != TCENOREC){        eprint(bdb, "tcbdbget");        err = true;      }      tcfree(rbuf);      break;    case 12:      if(id == 0) iputchar('C');      if(!(rbuf = tcbdbget2(bdb, kbuf)) && tcbdbecode(bdb) != TCENOREC){        eprint(bdb, "tcbdbget2");        err = true;      }      tcfree(rbuf);