if(!tcbdbcurout(cur) && tcbdbecode(bdb) != TCENOREC){      eprint(bdb, "tcbdbcurout");      err = true;    }    if(rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  if(rnum > 250) iprintf(" (%08d)\n", inum);  if(tcbdbrnum(bdb) != 0){    eprint(bdb, "(validation)");    err = true;  }  if(!tcbdbput2(bdb, "one", "first")){    eprint(bdb, "tcbdbput");    err = true;  }  if(!tcbdbcurlast(cur)){    eprint(bdb, "tcbdbcurlast");    err = true;  }  if(!tcbdbcurput2(cur, "second", BDBCPCURRENT) || !tcbdbcurput2(cur, "first", BDBCPBEFORE) ||     !tcbdbcurput2(cur, "zero", BDBCPBEFORE) || !tcbdbcurput2(cur, "top", BDBCPBEFORE)){    eprint(bdb, "tcbdbcurput2");    err = true;  }  if(!tcbdbcurlast(cur)){    eprint(bdb, "tcbdbcurlast");    err = true;  }  if(!tcbdbcurput2(cur, "third", BDBCPAFTER) || !tcbdbcurput2(cur, "fourth", BDBCPAFTER) ||     !tcbdbcurput2(cur, "end", BDBCPCURRENT) ||  !tcbdbcurput2(cur, "bottom", BDBCPAFTER)){    eprint(bdb, "tcbdbcurput2");    err = true;  }  if(!tcbdbvanish(bdb)){    eprint(bdb, "tcbdbvanish");    err = true;  }  TCMAP *map = tcmapnew();  iprintf("random writing:\n");  for(int i = 1; i <= rnum; i++){    char kbuf[RECBUFSIZ];    int ksiz = sprintf(kbuf, "%d", myrand(rnum));    char vbuf[RECBUFSIZ];    int vsiz = sprintf(vbuf, "%d", myrand(rnum));    switch(myrand(4)){    case 0:      if(!tcbdbput(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbput");        err = true;      }      tcmapput(map, kbuf, ksiz, vbuf, vsiz);      break;    case 1:      if(!tcbdbputkeep(bdb, kbuf, ksiz, vbuf, vsiz) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbputkeep");        err = true;      }      tcmapputkeep(map, kbuf, ksiz, vbuf, vsiz);      break;    case 2:      if(!tcbdbputcat(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbputcat");        err = true;      }      tcmapputcat(map, kbuf, ksiz, vbuf, vsiz);      break;    case 3:      if(!tcbdbout(bdb, kbuf, ksiz) && tcbdbecode(bdb) != TCENOREC){        eprint(bdb, "tcbdbout");        err = true;      }      tcmapout(map, kbuf, ksiz);      break;    }    if(rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  iprintf("checking transaction commit:\n");  if(!tcbdbtranbegin(bdb)){    eprint(bdb, "tcbdbtranbegin");    err = true;  }  for(int i = 1; i <= rnum; i++){    char kbuf[RECBUFSIZ];    int ksiz = sprintf(kbuf, "%d", myrand(rnum));    char vbuf[RECBUFSIZ];    int vsiz = sprintf(vbuf, "[%d]", myrand(rnum));    switch(myrand(7)){    case 0:      if(!tcbdbput(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbput");        err = true;      }      tcmapput(map, kbuf, ksiz, vbuf, vsiz);      break;    case 1:      if(!tcbdbputkeep(bdb, kbuf, ksiz, vbuf, vsiz) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbputkeep");        err = true;      }      tcmapputkeep(map, kbuf, ksiz, vbuf, vsiz);      break;    case 2:      if(!tcbdbputcat(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbputcat");        err = true;      }      tcmapputcat(map, kbuf, ksiz, vbuf, vsiz);      break;    case 3:      if(tcbdbaddint(bdb, kbuf, ksiz, 1) == INT_MIN && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbaddint");        err = true;      }      tcmapaddint(map, kbuf, ksiz, 1);      break;    case 4:      if(isnan(tcbdbadddouble(bdb, kbuf, ksiz, 1.0)) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbadddouble");        err = true;      }      tcmapadddouble(map, kbuf, ksiz, 1.0);      break;    case 5:      if(myrand(2) == 0){        void *op = (void *)(intptr_t)(myrand(3) + 1);        if(!tcbdbputproc(bdb, kbuf, ksiz, vbuf, vsiz, pdprocfunc, op) &&           tcbdbecode(bdb) != TCEKEEP){          eprint(bdb, "tcbdbputproc");          err = true;        }        tcmapputproc(map, kbuf, ksiz, vbuf, vsiz, pdprocfunc, op);      } else {        vsiz = myrand(10);        void *op = (void *)(intptr_t)(myrand(3) + 1);        if(!tcbdbputproc(bdb, kbuf, ksiz, NULL, vsiz, pdprocfunc, op) &&           tcbdbecode(bdb) != TCEKEEP && tcbdbecode(bdb) != TCENOREC){          eprint(bdb, "tcbdbputproc");          err = true;        }        tcmapputproc(map, kbuf, ksiz, NULL, vsiz, pdprocfunc, op);      }      break;    case 6:      if(!tcbdbout(bdb, kbuf, ksiz) && tcbdbecode(bdb) != TCENOREC){        eprint(bdb, "tcbdbout");        err = true;      }      tcmapout(map, kbuf, ksiz);      break;    }    if(rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  if(!tcbdbtrancommit(bdb)){    eprint(bdb, "tcbdbtrancommit");    err = true;  }  iprintf("checking transaction abort:\n");  uint64_t ornum = tcbdbrnum(bdb);  uint64_t ofsiz = tcbdbfsiz(bdb);  if(!tcbdbtranbegin(bdb)){    eprint(bdb, "tcbdbtranbegin");    err = true;  }  for(int i = 1; i <= rnum; i++){    char kbuf[RECBUFSIZ];    int ksiz = sprintf(kbuf, "%d", myrand(rnum));    char vbuf[RECBUFSIZ];    int vsiz = sprintf(vbuf, "((%d))", myrand(rnum));    switch(myrand(8)){    case 0:      if(!tcbdbput(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbput");        err = true;      }      break;    case 1:      if(!tcbdbputkeep(bdb, kbuf, ksiz, vbuf, vsiz) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbputkeep");        err = true;      }      break;    case 2:      if(!tcbdbputcat(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbputcat");        err = true;      }      break;    case 3:      if(!tcbdbputdup(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbputdup");        err = true;      }      break;    case 4:      if(tcbdbaddint(bdb, kbuf, ksiz, 1) == INT_MIN && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbaddint");        err = true;      }      break;    case 5:      if(isnan(tcbdbadddouble(bdb, kbuf, ksiz, 1.0)) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbadddouble");        err = true;      }      break;    case 6:      if(myrand(2) == 0){        void *op = (void *)(intptr_t)(myrand(3) + 1);        if(!tcbdbputproc(bdb, kbuf, ksiz, vbuf, vsiz, pdprocfunc, op) &&           tcbdbecode(bdb) != TCEKEEP){          eprint(bdb, "tcbdbputproc");          err = true;        }      } else {        vsiz = myrand(10);        void *op = (void *)(intptr_t)(myrand(3) + 1);        if(!tcbdbputproc(bdb, kbuf, ksiz, NULL, vsiz, pdprocfunc, op) &&           tcbdbecode(bdb) != TCEKEEP && tcbdbecode(bdb) != TCENOREC){          eprint(bdb, "tcbdbputproc");          err = true;        }      }      break;    case 7:      if(!tcbdbout(bdb, kbuf, ksiz) && tcbdbecode(bdb) != TCENOREC){        eprint(bdb, "tcbdbout");        err = true;      }      break;    }    if(rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  if(!tcbdbtranabort(bdb)){    eprint(bdb, "tcbdbtranabort");    err = true;  }  iprintf("checking consistency:\n");  if(tcbdbrnum(bdb) != ornum || tcbdbfsiz(bdb) != ofsiz || tcbdbrnum(bdb) != tcmaprnum(map)){    eprint(bdb, "(validation)");    err = true;  }  inum = 0;  tcmapiterinit(map);  const char *tkbuf;  int tksiz;  for(int i = 1; (tkbuf = tcmapiternext(map, &tksiz)) != NULL; i++, inum++){    int tvsiz;    const char *tvbuf = tcmapiterval(tkbuf, &tvsiz);    int rsiz;    char *rbuf = tcbdbget(bdb, tkbuf, tksiz, &rsiz);    if(!rbuf || rsiz != tvsiz || memcmp(rbuf, tvbuf, rsiz)){      eprint(bdb, "(validation)");      err = true;      tcfree(rbuf);      break;    }    tcfree(rbuf);    if(rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  if(rnum > 250) iprintf(" (%08d)\n", inum);  inum = 0;  if(!tcbdbcurfirst(cur) && tcbdbecode(bdb) != TCENOREC){    eprint(bdb, "tcbdbcurfirst");    err = true;  }  for(int i = 1; (kbuf = tcbdbcurkey(cur, &ksiz)) != NULL; i++, inum++){    int vsiz;    char *vbuf = tcbdbcurval(cur, &vsiz);    int rsiz;    const char *rbuf = tcmapget(map, kbuf, ksiz, &rsiz);    if(!rbuf || rsiz != vsiz || memcmp(rbuf, vbuf, rsiz)){      eprint(bdb, "(validation)");      err = true;      tcfree(vbuf);      tcfree(kbuf);      break;    }    tcfree(vbuf);    tcfree(kbuf);    tcbdbcurnext(cur);    if(rnum > 250 && i % (rnum / 250) == 0){      iputchar('.');      if(i == rnum || i % (rnum / 10) == 0) iprintf(" (%08d)\n", i);    }  }  if(rnum > 250) iprintf(" (%08d)\n", inum);  tcmapdel(map);  if(!tcbdbvanish(bdb)){    eprint(bdb, "tcbdbvanish");    err = true;  }  if(!tcbdbtranbegin(bdb)){    eprint(bdb, "tcbdbtranbegin");    err = true;  }  if(!tcbdbput2(bdb, "mikio", "hirabayashi")){    eprint(bdb, "tcbdbput2");    err = true;  }  for(int i = 0; i < 10; i++){    char buf[RECBUFSIZ];    int size = sprintf(buf, "%d", myrand(rnum));    if(!tcbdbput(bdb, buf, size, buf, size)){      eprint(bdb, "tcbdbput");      err = true;    }  }  for(int i = myrand(3) + 1; i < PATH_MAX; i = i * 2 + myrand(3)){    char vbuf[i];    memset(vbuf, '@', i - 1);    vbuf[i-1] = '\0';    if(!tcbdbput2(bdb, "mikio", vbuf)){      eprint(bdb, "tcbdbput2");      err = true;    }  }  if(!tcbdbforeach(bdb, iterfunc, NULL)){    eprint(bdb, "tcbdbforeach");    err = true;  }  tcbdbcurdel(cur);  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 wicked command */static int procwicked(const char *path, int rnum, bool mt, int opts, int omode){  iprintf("<Wicked Writing Test>\n  seed=%u  path=%s  rnum=%d  mt=%d  opts=%d  omode=%d\n\n",          g_randseed, path, rnum, mt, opts, omode);  bool err = false;  double stime = tctime();  TCBDB *bdb = tcbdbnew();  if(g_dbgfd >= 0) tcbdbsetdbgfd(bdb, g_dbgfd);  if(mt && !tcbdbsetmutex(bdb)){    eprint(bdb, "tcbdbsetmutex");    err = true;  }  if(!tcbdbsetcodecfunc(bdb, _tc_recencode, NULL, _tc_recdecode, NULL)){    eprint(bdb, "tcbdbsetcodecfunc");    err = true;  }  if(!tcbdbtune(bdb, 10, 10, rnum / 50, 100, -1, opts)){    eprint(bdb, "tcbdbtune");    err = true;  }  if(!tcbdbsetcache(bdb, 128, 256)){    eprint(bdb, "tcbdbsetcache");    err = true;  }  if(!tcbdbsetxmsiz(bdb, rnum)){    eprint(bdb, "tcbdbsetxmsiz");    err = true;  }  if(!tcbdbopen(bdb, path, BDBOWRITER | BDBOCREAT | BDBOTRUNC | omode)){    eprint(bdb, "tcbdbopen");    err = true;  }  BDBCUR *cur = tcbdbcurnew(bdb);  if(!tcbdbcurfirst(cur) && tcbdbecode(bdb) != TCENOREC){    eprint(bdb, "tcbdbcurfirst");    err = true;  }  TCMAP *map = tcmapnew2(rnum / 5);  for(int i = 1; i <= rnum && !err; i++){    char kbuf[RECBUFSIZ];    int ksiz = sprintf(kbuf, "%d", myrand(rnum));    char vbuf[RECBUFSIZ];    int vsiz = myrand(RECBUFSIZ);    memset(vbuf, '*', vsiz);    vbuf[vsiz] = '\0';    char *rbuf;    switch(myrand(16)){    case 0:      iputchar('0');      if(!tcbdbput(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbput");        err = true;      }      tcmapput(map, kbuf, ksiz, vbuf, vsiz);      break;    case 1:      iputchar('1');      if(!tcbdbput2(bdb, kbuf, vbuf)){        eprint(bdb, "tcbdbput2");        err = true;      }      tcmapput2(map, kbuf, vbuf);      break;    case 2:      iputchar('2');      if(!tcbdbputkeep(bdb, kbuf, ksiz, vbuf, vsiz) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbputkeep");        err = true;      }      tcmapputkeep(map, kbuf, ksiz, vbuf, vsiz);      break;    case 3:      iputchar('3');      if(!tcbdbputkeep2(bdb, kbuf, vbuf) && tcbdbecode(bdb) != TCEKEEP){        eprint(bdb, "tcbdbputkeep2");        err = true;      }      tcmapputkeep2(map, kbuf, vbuf);      break;    case 4:      iputchar('4');      if(!tcbdbputcat(bdb, kbuf, ksiz, vbuf, vsiz)){        eprint(bdb, "tcbdbputcat");        err = true;      }      tcmapputcat(map, kbuf, ksiz, vbuf, vsiz);