// File: /workspace/github_c_makefile_star2_O2/genometools[P]genometools/src/external/sqlite-3.33.0/sqlite3.c
// Function: walTryBeginRead
static int walTryBeginRead(Wal *pWal, int *pChanged, int useWal, int cnt){
  volatile WalCkptInfo *pInfo;    /* Checkpoint information in wal-index */
  u32 mxReadMark;                 /* Largest aReadMark[] value */
  int mxI;                        /* Index of largest aReadMark[] value */
  int i;                          /* Loop counter */
  int rc = SQLITE_OK;             /* Return code  */
  u32 mxFrame;                    /* Wal frame to lock to */

  assert( pWal->readLock<0 );     /* Not currently locked */

  /* useWal may only be set for read/write connections */
  assert( (pWal->readOnly & WAL_SHM_RDONLY)==0 || useWal==0 );

  /* Take steps to avoid spinning forever if there is a protocol error.
  **
  ** Circumstances that cause a RETRY should only last for the briefest
  ** instances of time.  No I/O or other system calls are done while the
  ** locks are held, so the locks should not be held for very long. But
  ** if we are unlucky, another process that is holding a lock might get
  ** paged out or take a page-fault that is time-consuming to resolve,
  ** during the few nanoseconds that it is holding the lock.  In that case,
  ** it might take longer than normal for the lock to free.
  **
  ** After 5 RETRYs, we begin calling sqlite3OsSleep().  The first few
  ** calls to sqlite3OsSleep() have a delay of 1 microsecond.  Really this
  ** is more of a scheduler yield than an actual delay.  But on the 10th
  ** an subsequent retries, the delays start becoming longer and longer,
  ** so that on the 100th (and last) RETRY we delay for 323 milliseconds.
  ** The total delay time before giving up is less than 10 seconds.
  */
  if( cnt>5 ){
    int nDelay = 1;                      /* Pause time in microseconds */
    if( cnt>100 ){
      VVA_ONLY( pWal->lockError = 1; )
      return SQLITE_PROTOCOL;
    }
    if( cnt>=10 ) nDelay = (cnt-9)*(cnt-9)*39;
    sqlite3OsSleep(pWal->pVfs, nDelay);
  }

  if( !useWal ){
    assert( rc==SQLITE_OK );
    if( pWal->bShmUnreliable==0 ){
      rc = walIndexReadHdr(pWal, pChanged);
    }
    if( rc==SQLITE_BUSY ){
      /* If there is not a recovery running in another thread or process
      ** then convert BUSY errors to WAL_RETRY.  If recovery is known to
      ** be running, convert BUSY to BUSY_RECOVERY.  There is a race here
      ** which might cause WAL_RETRY to be returned even if BUSY_RECOVERY
      ** would be technically correct.  But the race is benign since with
      ** WAL_RETRY this routine will be called again and will probably be
      ** right on the second iteration.
      */
      if( pWal->apWiData[0]==0 ){
        /* This branch is taken when the xShmMap() method returns SQLITE_BUSY.
        ** We assume this is a transient condition, so return WAL_RETRY. The
        ** xShmMap() implementation used by the default unix and win32 VFS
        ** modules may return SQLITE_BUSY due to a race condition in the
        ** code that determines whether or not the shared-memory region
        ** must be zeroed before the requested page is returned.
        */
        rc = WAL_RETRY;
      }else if( SQLITE_OK==(rc = walLockShared(pWal, WAL_RECOVER_LOCK)) ){
        walUnlockShared(pWal, WAL_RECOVER_LOCK);
        rc = WAL_RETRY;
      }else if( rc==SQLITE_BUSY ){
        rc = SQLITE_BUSY_RECOVERY;
      }
    }
    if( rc!=SQLITE_OK ){
      return rc;
    }
    else if( pWal->bShmUnreliable ){
      return walBeginShmUnreliable(pWal, pChanged);
    }
  }

  assert( pWal->nWiData>0 );
  assert( pWal->apWiData[0]!=0 );
  pInfo = walCkptInfo(pWal);
  if( !useWal && AtomicLoad(&pInfo->nBackfill)==pWal->hdr.mxFrame
#ifdef SQLITE_ENABLE_SNAPSHOT
   && (pWal->pSnapshot==0 || pWal->hdr.mxFrame==0)
#endif
  ){
    /* The WAL has been completely backfilled (or it is empty).
    ** and can be safely ignored.
    */
    rc = walLockShared(pWal, WAL_READ_LOCK(0));
    walShmBarrier(pWal);
    if( rc==SQLITE_OK ){
      if( memcmp((void *)walIndexHdr(pWal), &pWal->hdr, sizeof(WalIndexHdr)) ){
        /* It is not safe to allow the reader to continue here if frames
        ** may have been appended to the log before READ_LOCK(0) was obtained.
        ** When holding READ_LOCK(0), the reader ignores the entire log file,
        ** which implies that the database file contains a trustworthy
        ** snapshot. Since holding READ_LOCK(0) prevents a checkpoint from
        ** happening, this is usually correct.
        **
        ** However, if frames have been appended to the log (or if the log
        ** is wrapped and written for that matter) before the READ_LOCK(0)
        ** is obtained, that is not necessarily true. A checkpointer may
        ** have started to backfill the appended frames but crashed before
        ** it finished. Leaving a corrupt image in the database file.
        */
        walUnlockShared(pWal, WAL_READ_LOCK(0));
        return WAL_RETRY;
      }
      pWal->readLock = 0;
      return SQLITE_OK;
    }else if( rc!=SQLITE_BUSY ){
      return rc;
    }
  }

  /* If we get this far, it means that the reader will want to use
  ** the WAL to get at content from recent commits.  The job now is
  ** to select one of the aReadMark[] entries that is closest to
  ** but not exceeding pWal->hdr.mxFrame and lock that entry.
  */
  mxReadMark = 0;
  mxI = 0;
  mxFrame = pWal->hdr.mxFrame;
#ifdef SQLITE_ENABLE_SNAPSHOT
  if( pWal->pSnapshot && pWal->pSnapshot->mxFrame<mxFrame ){
    mxFrame = pWal->pSnapshot->mxFrame;
  }
#endif
  for(i=1; i<WAL_NREADER; i++){
    u32 thisMark = AtomicLoad(pInfo->aReadMark+i);
    if( mxReadMark<=thisMark && thisMark<=mxFrame ){
      assert( thisMark!=READMARK_NOT_USED );
      mxReadMark = thisMark;
      mxI = i;
    }
  }
  if( (pWal->readOnly & WAL_SHM_RDONLY)==0
   && (mxReadMark<mxFrame || mxI==0)
  ){
    for(i=1; i<WAL_NREADER; i++){
      rc = walLockExclusive(pWal, WAL_READ_LOCK(i), 1);
      if( rc==SQLITE_OK ){
        AtomicStore(pInfo->aReadMark+i,mxFrame);
        mxReadMark = mxFrame;
        mxI = i;
        walUnlockExclusive(pWal, WAL_READ_LOCK(i), 1);
        break;
      }else if( rc!=SQLITE_BUSY ){
        return rc;
      }
    }
  }
  if( mxI==0 ){
    assert( rc==SQLITE_BUSY || (pWal->readOnly & WAL_SHM_RDONLY)!=0 );
    return rc==SQLITE_BUSY ? WAL_RETRY : SQLITE_READONLY_CANTINIT;
  }

  rc = walLockShared(pWal, WAL_READ_LOCK(mxI));
  if( rc ){
    return rc==SQLITE_BUSY ? WAL_RETRY : rc;
  }
  /* Now that the read-lock has been obtained, check that neither the
  ** value in the aReadMark[] array or the contents of the wal-index
  ** header have changed.
  **
  ** It is necessary to check that the wal-index header did not change
  ** between the time it was read and when the shared-lock was obtained
  ** on WAL_READ_LOCK(mxI) was obtained to account for the possibility
  ** that the log file may have been wrapped by a writer, or that frames
  ** that occur later in the log than pWal->hdr.mxFrame may have been
  ** copied into the database by a checkpointer. If either of these things
  ** happened, then reading the database with the current value of
  ** pWal->hdr.mxFrame risks reading a corrupted snapshot. So, retry
  ** instead.
  **
  ** Before checking that the live wal-index header has not changed
  ** since it was read, set Wal.minFrame to the first frame in the wal
  ** file that has not yet been checkpointed. This client will not need
  ** to read any frames earlier than minFrame from the wal file - they
  ** can be safely read directly from the database file.
  **
  ** Because a ShmBarrier() call is made between taking the copy of
  ** nBackfill and checking that the wal-header in shared-memory still
  ** matches the one cached in pWal->hdr, it is guaranteed that the
  ** checkpointer that set nBackfill was not working with a wal-index
  ** header newer than that cached in pWal->hdr. If it were, that could
  ** cause a problem. The checkpointer could omit to checkpoint
  ** a version of page X that lies before pWal->minFrame (call that version
  ** A) on the basis that there is a newer version (version B) of the same
  ** page later in the wal file. But if version B happens to like past
  ** frame pWal->hdr.mxFrame - then the client would incorrectly assume
  ** that it can read version A from the database file. However, since
  ** we can guarantee that the checkpointer that set nBackfill could not
  ** see any pages past pWal->hdr.mxFrame, this problem does not come up.
  */
  pWal->minFrame = AtomicLoad(&pInfo->nBackfill)+1;
  walShmBarrier(pWal);
  if( AtomicLoad(pInfo->aReadMark+mxI)!=mxReadMark
   || memcmp((void *)walIndexHdr(pWal), &pWal->hdr, sizeof(WalIndexHdr))
  ){
    walUnlockShared(pWal, WAL_READ_LOCK(mxI));
    return WAL_RETRY;
  }else{
    assert( mxReadMark<=pWal->hdr.mxFrame );
    pWal->readLock = (i16)mxI;
  }
  return rc;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x78, %rsp
movl %edx, %ebp
movq %rsi, %r14
movq %rdi, %rbx
cmpl $0x6, %ecx
jl 0x231663
cmpl $0x64, %ecx
ja 0x231743
pushq $0x1
popq %rax
leal -0x9(%rcx), %edx
imull %edx, %edx
imull $0x27, %edx, %esi
cmpl $0xa, %ecx
cmovbl %eax, %esi
movq (%rbx), %rdi
callq *0x70(%rdi)
testl %ebp, %ebp
je 0x2316ec
leaq 0x30(%rbx), %rax
movq %rax, 0x8(%rsp)
movq 0x30(%rbx), %rax
movq (%rax), %r12
addq $0x60, %r12
xorl %edi, %edi
movl 0x58(%rbx), %r14d
xorl %ebp, %ebp
pushq $0x2
popq %rax
xorl %r15d, %r15d
cmpq $0x6, %rax
je 0x2316b4
movl (%r12,%rax,4), %ecx
cmpl %ecx, %r15d
seta %dl
cmpl %r14d, %ecx
seta %sil
orb %dl, %sil
jne 0x2316af
leal -0x1(%rax), %ebp
movl %ecx, %r15d
incq %rax
jmp 0x23168d
testb $0x2, 0x42(%rbx)
jne 0x23171a
cmpl %r14d, %r15d
jb 0x2316c3
testl %ebp, %ebp
jne 0x231722
xorl %r13d, %r13d
cmpl $0x4, %r13d
je 0x23171a
leal 0x4(%r13), %esi
movq %rbx, %rdi
pushq $0x1
popq %rdx
callq 0x231569
cmpl $0x5, %eax
jne 0x2317fe
incq %r13
pushq $0x5
popq %rdi
jmp 0x2316c6
cmpb $0x0, 0x46(%rbx)
je 0x231797
pushq $0x3
popq %rsi
movq %rbx, %rdi
callq 0x2320f1
testl %eax, %eax
je 0x23182a
cmpl $0x5, %eax
pushq $-0x1
popq %rbp
cmovnel %eax, %ebp
xorl %r15d, %r15d
jmp 0x231894
testl %ebp, %ebp
je 0x2317e8
leal 0x3(%rbp), %r14d
movq %rbx, %rdi
movl %r14d, %esi
callq 0x2320f1
testl %eax, %eax
je 0x231747
cmpl $0x5, %eax
pushq $-0x1
popq %rdi
cmovnel %eax, %edi
jmp 0x2318e0
pushq $0xf
jmp 0x231791
movl (%r12), %eax
incl %eax
movl %eax, 0x78(%rbx)
movq %rbx, %rdi
callq 0x23210d
movslq %ebp, %rax
movl 0x4(%r12,%rax,4), %eax
cmpl %r15d, %eax
jne 0x231784
leaq 0x48(%rbx), %rsi
movq 0x8(%rsp), %rax
movq (%rax), %rax
movq (%rax), %rdi
pushq $0x30
popq %rdx
callq 0x177e0
testl %eax, %eax
je 0x231963
movq %rbx, %rdi
movl %r14d, %esi
callq 0x23160d
pushq $-0x1
popq %rdi
jmp 0x2318e0
movq %rbx, %rdi
movq %r14, %rsi
callq 0x231aa0
testl %eax, %eax
je 0x2318f1
movl %eax, %edi
cmpl $0x5, %eax
jne 0x2318e0
movq 0x30(%rbx), %rax
pushq $-0x1
popq %rdi
cmpq $0x0, (%rax)
je 0x2318e0
movl %edi, %ebp
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x2320f1
testl %eax, %eax
je 0x23199a
cmpl $0x5, %eax
movl $0x105, %edi            # imm = 0x105
jmp 0x23173b
xorl %eax, %eax
cmpl $0x5, %edi
sete %al
negl %eax
orl $0x508, %eax            # imm = 0x508
movl %eax, %edi
jmp 0x2318e0
movl %eax, %edi
testl %eax, %eax
jne 0x2318e0
movl %r14d, 0x8(%r12,%r13,4)
leal 0x4(%r13), %esi
pushq $0x1
popq %rdx
movq %rbx, %rdi
callq 0x2315f6
incl %r13d
movl %r14d, %r15d
movl %r13d, %ebp
jmp 0x231722
andw $0x0, 0x3c(%rbx)
movq 0x8(%rbx), %rdi
movq (%rdi), %rax
xorl %r15d, %r15d
leaq 0x48(%rsp), %r8
xorl %esi, %esi
movl $0x8000, %edx           # imm = 0x8000
xorl %ecx, %ecx
callq *0x68(%rax)
cmpl $0x8, %eax
je 0x23195b
cmpl $0x508, %eax            # imm = 0x508
jne 0x231892
movq 0x10(%rbx), %rdi
movq 0x30(%rbx), %rax
movq (%rax), %rax
movups (%rax), %xmm0
movups 0x10(%rax), %xmm1
movups 0x20(%rax), %xmm2
movups %xmm0, 0x48(%rbx)
movups %xmm1, 0x58(%rbx)
movups %xmm2, 0x68(%rbx)
movq (%rdi), %rax
leaq 0x18(%rsp), %rsi
callq *0x30(%rax)
testl %eax, %eax
je 0x23196e
xorl %r15d, %r15d
movl %eax, %ebp
movq %r15, %rdi
callq 0x21f7f9
testl %ebp, %ebp
movl %ebp, %edi
je 0x2318e0
movl %edi, %ebp
xorl %r15d, %r15d
movslq 0x28(%rbx), %rax
cmpq %rax, %r15
jge 0x2318cb
movq 0x30(%rbx), %rax
movq (%rax,%r15,8), %rdi
callq 0x21f7f9
movq 0x30(%rbx), %rax
andq $0x0, (%rax,%r15,8)
incq %r15
jmp 0x2318a7
movb $0x0, 0x46(%rbx)
movq %rbx, %rdi
callq 0x2324ab
movl $0x1, (%r14)
movl %ebp, %edi
movl %edi, %eax
addq $0x78, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
cmpb $0x0, 0x46(%rbx)
jne 0x2316f6
leaq 0x30(%rbx), %r14
movq 0x30(%rbx), %rax
movq (%rax), %r12
movl 0x60(%r12), %eax
addq $0x60, %r12
xorl %edi, %edi
cmpl 0x58(%rbx), %eax
jne 0x231990
pushq $0x3
popq %rsi
movq %rbx, %rdi
callq 0x2320f1
movl %eax, %ebp
movq %rbx, %rdi
callq 0x23210d
movl %ebp, %edi
cmpl $0x5, %ebp
je 0x231990
testl %edi, %edi
jne 0x2318e0
leaq 0x48(%rbx), %rsi
movq (%r14), %rax
movq (%rax), %rdi
pushq $0x30
popq %rdx
callq 0x177e0
testl %eax, %eax
je 0x2319df
pushq $0x3
popq %rsi
movq %rbx, %rdi
jmp 0x23178a
pushq $-0x1
popq %rbp
jmp 0x231712
movw %bp, 0x3c(%rbx)
xorl %edi, %edi
jmp 0x2318e0
cmpq $0x1f, 0x18(%rsp)
jg 0x2319aa
movl $0x1, (%r14)
xorl %r15d, %r15d
cmpl 0x58(%rbx), %r15d
movl $0x0, %ebp
sbbl %ebp, %ebp
jmp 0x231894
movq %r14, 0x8(%rsp)
jmp 0x231681
pushq $0x2
popq %rsi
movq %rbx, %rdi
callq 0x23160d
jmp 0x2318de
movq 0x10(%rbx), %rdi
movq (%rdi), %rax
xorl %r15d, %r15d
leaq 0x50(%rsp), %rsi
pushq $0x20
popq %rdx
xorl %ecx, %ecx
callq *0x10(%rax)
testl %eax, %eax
jne 0x231892
movq 0x68(%rbx), %rax
cmpq 0x60(%rsp), %rax
je 0x2319e6
xorl %r15d, %r15d
pushq $-0x1
popq %rbp
jmp 0x231894
andw $0x0, 0x3c(%rbx)
jmp 0x231967
movzwl 0x56(%rbx), %eax
movq %rax, 0x8(%rsp)
leaq 0x18(%rax), %r12
movq %r12, %rdi
callq 0x21f7df
testq %rax, %rax
je 0x231a85
movq %rax, %r15
addq $0x18, %rax
movq %rax, 0x20(%rsp)
movsd 0x60(%rbx), %xmm0
movaps %xmm0, 0x30(%rsp)
movl 0x58(%rbx), %eax
movzwl 0x56(%rbx), %r13d
addq $0x18, %r13
imulq %rax, %r13
addq $0x20, %r13
pushq $-0x1
popq %rbp
movq 0x8(%rsp), %rax
addq %r13, %rax
addq $0x18, %rax
cmpq 0x18(%rsp), %rax
jg 0x231a8c
movq 0x10(%rbx), %rdi
movq (%rdi), %rax
movq %r15, %rsi
movl %r12d, %edx
movq %r13, %rcx
callq *0x10(%rax)
testl %eax, %eax
jne 0x231a90
movq %rbx, %rdi
leaq 0x2c(%rsp), %rsi
leaq 0x14(%rsp), %rdx
movq 0x20(%rsp), %rcx
movq %r15, %r8
callq 0x2323ce
testl %eax, %eax
je 0x231a8c
cmpl $0x0, 0x14(%rsp)
jne 0x231a92
addq %r12, %r13
jmp 0x231a31
pushq $0x7
jmp 0x23195d
xorl %ebp, %ebp
jmp 0x231a92
movl %eax, %ebp
movaps 0x30(%rsp), %xmm0
movlps %xmm0, 0x60(%rbx)
jmp 0x231894