// File: /workspace/github_c_makefile_star2_O2/barabo[P]advanced-shell-history/src/sqlite3.c
// Function: sqlite3_test_control
SQLITE_API int sqlite3_test_control(int op, ...){
  int rc = 0;
#ifndef SQLITE_OMIT_BUILTIN_TEST
  va_list ap;
  va_start(ap, op);
  switch( op ){

    /*
    ** Save the current state of the PRNG.
    */
    case SQLITE_TESTCTRL_PRNG_SAVE: {
      sqlite3PrngSaveState();
      break;
    }

    /*
    ** Restore the state of the PRNG to the last state saved using
    ** PRNG_SAVE.  If PRNG_SAVE has never before been called, then
    ** this verb acts like PRNG_RESET.
    */
    case SQLITE_TESTCTRL_PRNG_RESTORE: {
      sqlite3PrngRestoreState();
      break;
    }

    /*
    ** Reset the PRNG back to its uninitialized state.  The next call
    ** to sqlite3_randomness() will reseed the PRNG using a single call
    ** to the xRandomness method of the default VFS.
    */
    case SQLITE_TESTCTRL_PRNG_RESET: {
      sqlite3PrngResetState();
      break;
    }

    /*
    **  sqlite3_test_control(BITVEC_TEST, size, program)
    **
    ** Run a test against a Bitvec object of size.  The program argument
    ** is an array of integers that defines the test.  Return -1 on a
    ** memory allocation error, 0 on success, or non-zero for an error.
    ** See the sqlite3BitvecBuiltinTest() for additional information.
    */
    case SQLITE_TESTCTRL_BITVEC_TEST: {
      int sz = va_arg(ap, int);
      int *aProg = va_arg(ap, int*);
      rc = sqlite3BitvecBuiltinTest(sz, aProg);
      break;
    }

    /*
    **  sqlite3_test_control(BENIGN_MALLOC_HOOKS, xBegin, xEnd)
    **
    ** Register hooks to call to indicate which malloc() failures 
    ** are benign.
    */
    case SQLITE_TESTCTRL_BENIGN_MALLOC_HOOKS: {
      typedef void (*void_function)(void);
      void_function xBenignBegin;
      void_function xBenignEnd;
      xBenignBegin = va_arg(ap, void_function);
      xBenignEnd = va_arg(ap, void_function);
      sqlite3BenignMallocHooks(xBenignBegin, xBenignEnd);
      break;
    }

    /*
    **  sqlite3_test_control(SQLITE_TESTCTRL_PENDING_BYTE, unsigned int X)
    **
    ** Set the PENDING byte to the value in the argument, if X>0.
    ** Make no changes if X==0.  Return the value of the pending byte
    ** as it existing before this routine was called.
    **
    ** IMPORTANT:  Changing the PENDING byte from 0x40000000 results in
    ** an incompatible database file format.  Changing the PENDING byte
    ** while any database connection is open results in undefined and
    ** dileterious behavior.
    */
    case SQLITE_TESTCTRL_PENDING_BYTE: {
      rc = PENDING_BYTE;
#ifndef SQLITE_OMIT_WSD
      {
        unsigned int newVal = va_arg(ap, unsigned int);
        if( newVal ) sqlite3PendingByte = newVal;
      }
#endif
      break;
    }

    /*
    **  sqlite3_test_control(SQLITE_TESTCTRL_ASSERT, int X)
    **
    ** This action provides a run-time test to see whether or not
    ** assert() was enabled at compile-time.  If X is true and assert()
    ** is enabled, then the return value is true.  If X is true and
    ** assert() is disabled, then the return value is zero.  If X is
    ** false and assert() is enabled, then the assertion fires and the
    ** process aborts.  If X is false and assert() is disabled, then the
    ** return value is zero.
    */
    case SQLITE_TESTCTRL_ASSERT: {
      volatile int x = 0;
      assert( (x = va_arg(ap,int))!=0 );
      rc = x;
      break;
    }


    /*
    **  sqlite3_test_control(SQLITE_TESTCTRL_ALWAYS, int X)
    **
    ** This action provides a run-time test to see how the ALWAYS and
    ** NEVER macros were defined at compile-time.
    **
    ** The return value is ALWAYS(X).  
    **
    ** The recommended test is X==2.  If the return value is 2, that means
    ** ALWAYS() and NEVER() are both no-op pass-through macros, which is the
    ** default setting.  If the return value is 1, then ALWAYS() is either
    ** hard-coded to true or else it asserts if its argument is false.
    ** The first behavior (hard-coded to true) is the case if
    ** SQLITE_TESTCTRL_ASSERT shows that assert() is disabled and the second
    ** behavior (assert if the argument to ALWAYS() is false) is the case if
    ** SQLITE_TESTCTRL_ASSERT shows that assert() is enabled.
    **
    ** The run-time test procedure might look something like this:
    **
    **    if( sqlite3_test_control(SQLITE_TESTCTRL_ALWAYS, 2)==2 ){
    **      // ALWAYS() and NEVER() are no-op pass-through macros
    **    }else if( sqlite3_test_control(SQLITE_TESTCTRL_ASSERT, 1) ){
    **      // ALWAYS(x) asserts that x is true. NEVER(x) asserts x is false.
    **    }else{
    **      // ALWAYS(x) is a constant 1.  NEVER(x) is a constant 0.
    **    }
    */
    case SQLITE_TESTCTRL_ALWAYS: {
      int x = va_arg(ap,int);
      rc = ALWAYS(x);
      break;
    }

    /*   sqlite3_test_control(SQLITE_TESTCTRL_RESERVE, sqlite3 *db, int N)
    **
    ** Set the nReserve size to N for the main database on the database
    ** connection db.
    */
    case SQLITE_TESTCTRL_RESERVE: {
      sqlite3 *db = va_arg(ap, sqlite3*);
      int x = va_arg(ap,int);
      sqlite3_mutex_enter(db->mutex);
      sqlite3BtreeSetPageSize(db->aDb[0].pBt, 0, x, 0);
      sqlite3_mutex_leave(db->mutex);
      break;
    }

    /*  sqlite3_test_control(SQLITE_TESTCTRL_OPTIMIZATIONS, sqlite3 *db, int N)
    **
    ** Enable or disable various optimizations for testing purposes.  The 
    ** argument N is a bitmask of optimizations to be disabled.  For normal
    ** operation N should be 0.  The idea is that a test program (like the
    ** SQL Logic Test or SLT test module) can run the same SQL multiple times
    ** with various optimizations disabled to verify that the same answer
    ** is obtained in every case.
    */
    case SQLITE_TESTCTRL_OPTIMIZATIONS: {
      sqlite3 *db = va_arg(ap, sqlite3*);
      db->dbOptFlags = (u16)(va_arg(ap, int) & 0xffff);
      break;
    }

#ifdef SQLITE_N_KEYWORD
    /* sqlite3_test_control(SQLITE_TESTCTRL_ISKEYWORD, const char *zWord)
    **
    ** If zWord is a keyword recognized by the parser, then return the
    ** number of keywords.  Or if zWord is not a keyword, return 0.
    ** 
    ** This test feature is only available in the amalgamation since
    ** the SQLITE_N_KEYWORD macro is not defined in this file if SQLite
    ** is built using separate source files.
    */
    case SQLITE_TESTCTRL_ISKEYWORD: {
      const char *zWord = va_arg(ap, const char*);
      int n = sqlite3Strlen30(zWord);
      rc = (sqlite3KeywordCode((u8*)zWord, n)!=TK_ID) ? SQLITE_N_KEYWORD : 0;
      break;
    }
#endif 

    /* sqlite3_test_control(SQLITE_TESTCTRL_SCRATCHMALLOC, sz, &pNew, pFree);
    **
    ** Pass pFree into sqlite3ScratchFree(). 
    ** If sz>0 then allocate a scratch buffer into pNew.  
    */
    case SQLITE_TESTCTRL_SCRATCHMALLOC: {
      void *pFree, **ppNew;
      int sz;
      sz = va_arg(ap, int);
      ppNew = va_arg(ap, void**);
      pFree = va_arg(ap, void*);
      if( sz ) *ppNew = sqlite3ScratchMalloc(sz);
      sqlite3ScratchFree(pFree);
      break;
    }

    /*   sqlite3_test_control(SQLITE_TESTCTRL_LOCALTIME_FAULT, int onoff);
    **
    ** If parameter onoff is non-zero, configure the wrappers so that all
    ** subsequent calls to localtime() and variants fail. If onoff is zero,
    ** undo this setting.
    */
    case SQLITE_TESTCTRL_LOCALTIME_FAULT: {
      sqlite3GlobalConfig.bLocaltimeFault = va_arg(ap, int);
      break;
    }

#if defined(SQLITE_ENABLE_TREE_EXPLAIN)
    /*   sqlite3_test_control(SQLITE_TESTCTRL_EXPLAIN_STMT,
    **                        sqlite3_stmt*,const char**);
    **
    ** If compiled with SQLITE_ENABLE_TREE_EXPLAIN, each sqlite3_stmt holds
    ** a string that describes the optimized parse tree.  This test-control
    ** returns a pointer to that string.
    */
    case SQLITE_TESTCTRL_EXPLAIN_STMT: {
      sqlite3_stmt *pStmt = va_arg(ap, sqlite3_stmt*);
      const char **pzRet = va_arg(ap, const char**);
      *pzRet = sqlite3VdbeExplanation((Vdbe*)pStmt);
      break;
    }
#endif

  }
  va_end(ap);
#endif /* SQLITE_OMIT_BUILTIN_TEST */
  return rc;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0xf8, %rsp
leaq -0x120(%rbp), %r10
movq %rsi, 0x8(%r10)
movq %rdx, 0x10(%r10)
movq %rcx, 0x18(%r10)
movq %r8, 0x20(%r10)
movq %r9, 0x28(%r10)
testb %al, %al
je 0x149e1
movaps %xmm0, -0xf0(%rbp)
movaps %xmm1, -0xe0(%rbp)
movaps %xmm2, -0xd0(%rbp)
movaps %xmm3, -0xc0(%rbp)
movaps %xmm4, -0xb0(%rbp)
movaps %xmm5, -0xa0(%rbp)
movaps %xmm6, -0x90(%rbp)
movaps %xmm7, -0x80(%rbp)
movq %r10, -0x30(%rbp)
leaq 0x10(%rbp), %rax
movq %rax, -0x38(%rbp)
movabsq $0x3000000008, %rax     # imm = 0x3000000008
movq %rax, -0x40(%rbp)
xorl %r12d, %r12d
addl $-0x5, %edi
cmpl $0xd, %edi
ja 0x14f7e
leaq 0x52707(%rip), %rax     # 0x67118
movslq (%rax,%rdi,4), %rcx
addq %rax, %rcx
jmpq *%rcx
leaq 0x745c7(%rip), %rdi     # 0x88fe8
leaq 0x74348(%rip), %rsi     # 0x88d70
jmp 0x14b63
movl -0x40(%rbp), %ecx
cmpq $0x28, %rcx
ja 0x14c0f
movq %rcx, %rax
addq -0x30(%rbp), %rax
addl $0x8, %ecx
movl %ecx, -0x40(%rbp)
jmp 0x14c1b
movl -0x40(%rbp), %edx
cmpq $0x29, %rdx
jae 0x14c42
movq -0x30(%rbp), %rax
movq %rdx, %rcx
addq $0x8, %rcx
movl %ecx, -0x40(%rbp)
movq (%rax,%rdx), %rax
cmpl $0x20, %edx
ja 0x14c51
addq -0x30(%rbp), %rcx
addl $0x10, %edx
movl %edx, -0x40(%rbp)
jmp 0x14c5d
movl -0x40(%rbp), %ecx
cmpq $0x28, %rcx
ja 0x14c73
movq %rcx, %rax
addq -0x30(%rbp), %rax
addl $0x8, %ecx
movl %ecx, -0x40(%rbp)
jmp 0x14c7f
movl -0x40(%rbp), %ecx
cmpq $0x28, %rcx
ja 0x14c8c
movq %rcx, %rax
addq -0x30(%rbp), %rax
addl $0x8, %ecx
movl %ecx, -0x40(%rbp)
jmp 0x14c98
movl -0x40(%rbp), %eax
cmpq $0x29, %rax
jae 0x14cb4
movq -0x30(%rbp), %rcx
leal 0x8(%rax), %edx
movl %edx, -0x40(%rbp)
movl (%rcx,%rax), %edi
cmpl $0x21, %eax
jae 0x14cc2
movq -0x30(%rbp), %rdx
movq %rax, %rcx
addq $0x10, %rcx
movl %ecx, -0x40(%rbp)
movq 0x8(%rdx,%rax), %r14
cmpl $0x18, %eax
ja 0x14cd1
addq -0x30(%rbp), %rcx
addl $0x18, %eax
movl %eax, -0x40(%rbp)
jmp 0x14cdd
movl -0x40(%rbp), %ecx
cmpq $0x29, %rcx
jae 0x14cf9
movq -0x30(%rbp), %rdx
movq %rcx, %rax
addq $0x8, %rax
movl %eax, -0x40(%rbp)
movl (%rdx,%rcx), %edx
movq %rdx, -0x60(%rbp)
cmpl $0x20, %ecx
ja 0x14d0b
addq -0x30(%rbp), %rax
addl $0x10, %ecx
movl %ecx, -0x40(%rbp)
jmp 0x14d17
movb $0x0, 0x74220(%rip)     # 0x88d70
jmp 0x14f7e
leaq 0x74214(%rip), %rdi     # 0x88d70
leaq 0x74485(%rip), %rsi     # 0x88fe8
movl $0x103, %edx            # imm = 0x103
callq 0x82c0
jmp 0x14f7e
movl $0x0, -0x44(%rbp)
movl -0x44(%rbp), %r12d
jmp 0x14f7e
movl -0x40(%rbp), %ecx
cmpq $0x28, %rcx
ja 0x14e65
movq %rcx, %rax
addq -0x30(%rbp), %rax
addl $0x8, %ecx
movl %ecx, -0x40(%rbp)
jmp 0x14e71
movl -0x40(%rbp), %edx
cmpq $0x29, %rdx
jae 0x14e79
movq -0x30(%rbp), %rax
movq %rdx, %rcx
addq $0x8, %rcx
movl %ecx, -0x40(%rbp)
movq (%rax,%rdx), %rax
cmpl $0x20, %edx
ja 0x14e88
addq -0x30(%rbp), %rcx
addl $0x10, %edx
movl %edx, -0x40(%rbp)
jmp 0x14e94
movl -0x40(%rbp), %edx
cmpq $0x29, %rdx
jae 0x14ea0
movq -0x30(%rbp), %rax
movq %rdx, %rcx
addq $0x8, %rcx
movl %ecx, -0x40(%rbp)
movq (%rax,%rdx), %rax
cmpl $0x20, %edx
ja 0x14eaf
addq -0x30(%rbp), %rcx
addl $0x10, %edx
movl %edx, -0x40(%rbp)
jmp 0x14ebb
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movq (%rax), %rbx
movq %rbx, %rdi
callq 0x8f8e
movq %rbx, %rdi
movl %eax, %esi
callq 0x30f61
xorl %ecx, %ecx
cmpl $0x1a, %eax
pushq $0x79
popq %r12
cmovel %ecx, %r12d
jmp 0x14f7e
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movq (%rax), %rax
movq -0x38(%rbp), %rcx
leaq 0x8(%rcx), %rdx
movq %rdx, -0x38(%rbp)
movq (%rcx), %rcx
movq %rax, 0x742f9(%rip)     # 0x88f60
movq %rcx, 0x742fa(%rip)     # 0x88f68
jmp 0x14f7e
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movl (%rax), %eax
movl %eax, 0x72911(%rip)     # 0x87598
jmp 0x14f7e
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movl 0x72ba1(%rip), %r12d    # 0x87840
movl (%rax), %eax
testl %eax, %eax
je 0x14f7e
movl %eax, 0x72b91(%rip)     # 0x87840
jmp 0x14f7e
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movl (%rax), %edi
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movq (%rax), %r14
movq -0x38(%rbp), %rcx
leaq 0x8(%rcx), %rax
movq %rax, -0x38(%rbp)
movq (%rcx), %rbx
testl %edi, %edi
je 0x14cec
callq 0x15019
movq %rax, (%r14)
movq %rbx, %rdi
callq 0x150da
jmp 0x14f7e
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movl (%rax), %eax
movq %rax, -0x60(%rbp)
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movq (%rax), %r14
movq -0x60(%rbp), %r15
movl %r15d, %edi
callq 0x19221
movq %rax, %rbx
leal 0x7(%r15), %eax
pushq $0x8
popq %rcx
cltd
idivl %ecx
leal 0x1(%rax), %edi
callq 0xbeb2
movq %rax, %r15
movl $0x200, %edi            # imm = 0x200
callq 0x9c1c
movq %rax, %r13
movq %rbx, -0x50(%rbp)
testq %rbx, %rbx
sete %al
testq %r15, %r15
sete %cl
testq %r13, %r13
sete %dl
orb %al, %dl
orb %cl, %dl
pushq $-0x1
popq %r12
jne 0x14f65
pushq $0x1
popq %rbx
xorl %edi, %edi
movl %ebx, %esi
callq 0x190c4
xorl %edi, %edi
movl %ebx, %esi
movq %r13, -0x58(%rbp)
movq %r13, %rdx
callq 0x1f945
xorl %r13d, %r13d
movl %r13d, %ebx
movl (%r14,%rbx,4), %r12d
leal -0x1(%r12), %eax
cmpl $0x2, %eax
jb 0x14dc1
cmpl $0x5, %r12d
je 0x14dc1
testl %r12d, %r12d
je 0x14ed6
pushq $0x4
popq %rdi
leaq -0x44(%rbp), %rsi
callq 0xb09f
movl -0x44(%rbp), %eax
pushq $0x2
jmp 0x14dd5
movl 0x8(%r14,%rbx,4), %ecx
leal -0x1(%rcx), %eax
addl 0xc(%r14,%rbx,4), %ecx
movl %ecx, 0x8(%r14,%rbx,4)
pushq $0x4
popq %r13
movl 0x4(%r14,%rbx,4), %ecx
leal -0x1(%rcx), %edx
cmpl $0x2, %ecx
movl $0x0, %ecx
cmovgel %ecx, %r13d
movl %edx, 0x4(%r14,%rbx,4)
addl %ebx, %r13d
andl $0x7fffffff, %eax       # imm = 0x7FFFFFFF
xorl %edx, %edx
idivl -0x60(%rbp)
movl %edx, -0x44(%rbp)
incl %edx
movl %edx, %ecx
andb $0x7, %cl
pushq $0x1
popq %rax
shll %cl, %eax
movl %edx, %ecx
shrl $0x3, %ecx
movb (%r15,%rcx), %sil
testb $0x1, %r12b
jne 0x14e38
notb %al
andb %al, %sil
movb %sil, (%r15,%rcx)
movq -0x50(%rbp), %rdi
movl %edx, %esi
movq -0x58(%rbp), %rdx
callq 0x1f945
jmp 0x14d8e
orb %al, %sil
movb %sil, (%r15,%rcx)
cmpl $0x5, %r12d
je 0x14d8e
movq -0x50(%rbp), %rdi
movl %edx, %esi
callq 0x190c4
testl %eax, %eax
je 0x14d8e
pushq $-0x1
popq %r12
jmp 0x14f61
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movl (%rax), %r12d
jmp 0x14f7e
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movq (%rax), %rax
movq -0x38(%rbp), %rcx
leaq 0x8(%rcx), %rdx
movq %rdx, -0x38(%rbp)
movzwl (%rcx), %ecx
movw %cx, 0x4c(%rax)
jmp 0x14f7e
movq -0x38(%rbp), %rax
leaq 0x8(%rax), %rcx
movq %rcx, -0x38(%rbp)
movq (%rax), %rax
movq -0x38(%rbp), %rcx
leaq 0x8(%rcx), %rdx
movq %rdx, -0x38(%rbp)
movl (%rcx), %edx
movq 0x20(%rax), %rax
movq 0x8(%rax), %rdi
xorl %r12d, %r12d
xorl %esi, %esi
xorl %ecx, %ecx
callq 0x14f93
jmp 0x14f7e
xorl %r14d, %r14d
xorl %edi, %edi
xorl %esi, %esi
callq 0x18dd4
movl %eax, -0x68(%rbp)
movq -0x60(%rbp), %r13
leal 0x1(%r13), %esi
movq -0x50(%rbp), %rbx
movq %rbx, %rdi
callq 0x18dd4
movl %eax, -0x64(%rbp)
movq %rbx, %rdi
xorl %esi, %esi
callq 0x18dd4
movl %eax, %r12d
movl -0x68(%rbp), %eax
subl %r13d, %eax
addl -0x64(%rbp), %r12d
addl %eax, %r12d
addl (%rbx), %r12d
testl %r13d, %r13d
cmovgl %r13d, %r14d
negl %r14d
pushq $0x1
popq %r13
leal (%r14,%r13), %eax
cmpl $0x1, %eax
je 0x14f61
movl %r13d, %eax
shrl $0x3, %eax
movzbl (%r15,%rax), %eax
movl %r13d, %ecx
andl $0x7, %ecx
xorl %ebx, %ebx
btl %ecx, %eax
setb %bl
movq -0x50(%rbp), %rdi
movl %r13d, %esi
callq 0x18dd4
cmpl %eax, %ebx
jne 0x14f5e
incl %r13d
jmp 0x14f27
movl %r13d, %r12d
movq -0x58(%rbp), %r13
movq %r13, %rdi
callq 0x9c7b
movq %r15, %rdi
callq 0x9c7b
movq -0x50(%rbp), %rdi
callq 0x1b557
movl %r12d, %eax
addq $0xf8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq