// File: /workspace/github_c_makefile_star2_O0/genometools[P]genometools/src/external/sqlite-3.33.0/sqlite3.c
// Function: sqlite3PagerSharedLock
SQLITE_PRIVATE int sqlite3PagerSharedLock(Pager *pPager){
  int rc = SQLITE_OK;                /* Return code */

  /* This routine is only called from b-tree and only when there are no
  ** outstanding pages. This implies that the pager state should either
  ** be OPEN or READER. READER is only possible if the pager is or was in
  ** exclusive access mode.  */
  assert( sqlite3PcacheRefCount(pPager->pPCache)==0 );
  assert( assert_pager_state(pPager) );
  assert( pPager->eState==PAGER_OPEN || pPager->eState==PAGER_READER );
  assert( pPager->errCode==SQLITE_OK );

  if( !pagerUseWal(pPager) && pPager->eState==PAGER_OPEN ){
    int bHotJournal = 1;          /* True if there exists a hot journal-file */

    assert( !MEMDB );
    assert( pPager->tempFile==0 || pPager->eLock==EXCLUSIVE_LOCK );

    rc = pager_wait_on_lock(pPager, SHARED_LOCK);
    if( rc!=SQLITE_OK ){
      assert( pPager->eLock==NO_LOCK || pPager->eLock==UNKNOWN_LOCK );
      goto failed;
    }

    /* If a journal file exists, and there is no RESERVED lock on the
    ** database file, then it either needs to be played back or deleted.
    */
    if( pPager->eLock<=SHARED_LOCK ){
      rc = hasHotJournal(pPager, &bHotJournal);
    }
    if( rc!=SQLITE_OK ){
      goto failed;
    }
    if( bHotJournal ){
      if( pPager->readOnly ){
        rc = SQLITE_READONLY_ROLLBACK;
        goto failed;
      }

      /* Get an EXCLUSIVE lock on the database file. At this point it is
      ** important that a RESERVED lock is not obtained on the way to the
      ** EXCLUSIVE lock. If it were, another process might open the
      ** database file, detect the RESERVED lock, and conclude that the
      ** database is safe to read while this process is still rolling the
      ** hot-journal back.
      **
      ** Because the intermediate RESERVED lock is not requested, any
      ** other process attempting to access the database file will get to
      ** this point in the code and fail to obtain its own EXCLUSIVE lock
      ** on the database file.
      **
      ** Unless the pager is in locking_mode=exclusive mode, the lock is
      ** downgraded to SHARED_LOCK before this function returns.
      */
      rc = pagerLockDb(pPager, EXCLUSIVE_LOCK);
      if( rc!=SQLITE_OK ){
        goto failed;
      }

      /* If it is not already open and the file exists on disk, open the
      ** journal for read/write access. Write access is required because
      ** in exclusive-access mode the file descriptor will be kept open
      ** and possibly used for a transaction later on. Also, write-access
      ** is usually required to finalize the journal in journal_mode=persist
      ** mode (and also for journal_mode=truncate on some systems).
      **
      ** If the journal does not exist, it usually means that some
      ** other connection managed to get in and roll it back before
      ** this connection obtained the exclusive lock above. Or, it
      ** may mean that the pager was in the error-state when this
      ** function was called and the journal file does not exist.
      */
      if( !isOpen(pPager->jfd) ){
        sqlite3_vfs * const pVfs = pPager->pVfs;
        int bExists;              /* True if journal file exists */
        rc = sqlite3OsAccess(
            pVfs, pPager->zJournal, SQLITE_ACCESS_EXISTS, &bExists);
        if( rc==SQLITE_OK && bExists ){
          int fout = 0;
          int f = SQLITE_OPEN_READWRITE|SQLITE_OPEN_MAIN_JOURNAL;
          assert( !pPager->tempFile );
          rc = sqlite3OsOpen(pVfs, pPager->zJournal, pPager->jfd, f, &fout);
          assert( rc!=SQLITE_OK || isOpen(pPager->jfd) );
          if( rc==SQLITE_OK && fout&SQLITE_OPEN_READONLY ){
            rc = SQLITE_CANTOPEN_BKPT;
            sqlite3OsClose(pPager->jfd);
          }
        }
      }

      /* Playback and delete the journal.  Drop the database write
      ** lock and reacquire the read lock. Purge the cache before
      ** playing back the hot-journal so that we don't end up with
      ** an inconsistent cache.  Sync the hot journal before playing
      ** it back since the process that crashed and left the hot journal
      ** probably did not sync it and we are required to always sync
      ** the journal before playing it back.
      */
      if( isOpen(pPager->jfd) ){
        assert( rc==SQLITE_OK );
        rc = pagerSyncHotJournal(pPager);
        if( rc==SQLITE_OK ){
          rc = pager_playback(pPager, !pPager->tempFile);
          pPager->eState = PAGER_OPEN;
        }
      }else if( !pPager->exclusiveMode ){
        pagerUnlockDb(pPager, SHARED_LOCK);
      }

      if( rc!=SQLITE_OK ){
        /* This branch is taken if an error occurs while trying to open
        ** or roll back a hot-journal while holding an EXCLUSIVE lock. The
        ** pager_unlock() routine will be called before returning to unlock
        ** the file. If the unlock attempt fails, then Pager.eLock must be
        ** set to UNKNOWN_LOCK (see the comment above the #define for
        ** UNKNOWN_LOCK above for an explanation).
        **
        ** In order to get pager_unlock() to do this, set Pager.eState to
        ** PAGER_ERROR now. This is not actually counted as a transition
        ** to ERROR state in the state diagram at the top of this file,
        ** since we know that the same call to pager_unlock() will very
        ** shortly transition the pager object to the OPEN state. Calling
        ** assert_pager_state() would fail now, as it should not be possible
        ** to be in ERROR state when there are zero outstanding page
        ** references.
        */
        pager_error(pPager, rc);
        goto failed;
      }

      assert( pPager->eState==PAGER_OPEN );
      assert( (pPager->eLock==SHARED_LOCK)
           || (pPager->exclusiveMode && pPager->eLock>SHARED_LOCK)
      );
    }

    if( !pPager->tempFile && pPager->hasHeldSharedLock ){
      /* The shared-lock has just been acquired then check to
      ** see if the database has been modified.  If the database has changed,
      ** flush the cache.  The hasHeldSharedLock flag prevents this from
      ** occurring on the very first access to a file, in order to save a
      ** single unnecessary sqlite3OsRead() call at the start-up.
      **
      ** Database changes are detected by looking at 15 bytes beginning
      ** at offset 24 into the file.  The first 4 of these 16 bytes are
      ** a 32-bit counter that is incremented with each change.  The
      ** other bytes change randomly with each file change when
      ** a codec is in use.
      **
      ** There is a vanishingly small chance that a change will not be
      ** detected.  The chance of an undetected change is so small that
      ** it can be neglected.
      */
      char dbFileVers[sizeof(pPager->dbFileVers)];

      IOTRACE(("CKVERS %p %d\n", pPager, sizeof(dbFileVers)));
      rc = sqlite3OsRead(pPager->fd, &dbFileVers, sizeof(dbFileVers), 24);
      if( rc!=SQLITE_OK ){
        if( rc!=SQLITE_IOERR_SHORT_READ ){
          goto failed;
        }
        memset(dbFileVers, 0, sizeof(dbFileVers));
      }

      if( memcmp(pPager->dbFileVers, dbFileVers, sizeof(dbFileVers))!=0 ){
        pager_reset(pPager);

        /* Unmap the database file. It is possible that external processes
        ** may have truncated the database file and then extended it back
        ** to its original size while this process was not holding a lock.
        ** In this case there may exist a Pager.pMap mapping that appears
        ** to be the right size but is not actually valid. Avoid this
        ** possibility by unmapping the db here. */
        if( USEFETCH(pPager) ){
          sqlite3OsUnfetch(pPager->fd, 0, 0);
        }
      }
    }

    /* If there is a WAL file in the file-system, open this database in WAL
    ** mode. Otherwise, the following function call is a no-op.
    */
    rc = pagerOpenWalIfPresent(pPager);
#ifndef SQLITE_OMIT_WAL
    assert( pPager->pWal==0 || rc==SQLITE_OK );
#endif
  }

  if( pagerUseWal(pPager) ){
    assert( rc==SQLITE_OK );
    rc = pagerBeginReadTransaction(pPager);
  }

  if( pPager->tempFile==0 && pPager->eState==PAGER_OPEN && rc==SQLITE_OK ){
    rc = pagerPagecount(pPager, &pPager->dbSize);
  }

 failed:
  if( rc!=SQLITE_OK ){
    assert( !MEMDB );
    pager_unlock(pPager);
    assert( pPager->eState==PAGER_OPEN );
  }else{
    pPager->eState = PAGER_READER;
    pPager->hasHeldSharedLock = 1;
  }
  return rc;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x40, %rsp
movq %rdi, -0x8(%rbp)
movl $0x0, -0xc(%rbp)
movq -0x8(%rbp), %rax
cmpq $0x0, 0x120(%rax)
jne 0x3e6ec5
movq -0x8(%rbp), %rax
movzbl 0x14(%rax), %eax
cmpl $0x0, %eax
jne 0x3e6ec5
movl $0x1, -0x10(%rbp)
movq -0x8(%rbp), %rdi
movl $0x1, %esi
callq 0x3e06e0
movl %eax, -0xc(%rbp)
cmpl $0x0, -0xc(%rbp)
je 0x3e6c79
jmp 0x3e6f15
movq -0x8(%rbp), %rax
movzbl 0x15(%rax), %eax
cmpl $0x1, %eax
jg 0x3e6c96
movq -0x8(%rbp), %rdi
leaq -0x10(%rbp), %rsi
callq 0x3e70f0
movl %eax, -0xc(%rbp)
cmpl $0x0, -0xc(%rbp)
je 0x3e6ca1
jmp 0x3e6f15
cmpl $0x0, -0x10(%rbp)
je 0x3e6e01
movq -0x8(%rbp), %rax
cmpb $0x0, 0x12(%rax)
je 0x3e6cc1
movl $0x308, -0xc(%rbp)      # imm = 0x308
jmp 0x3e6f15
movq -0x8(%rbp), %rdi
movl $0x4, %esi
callq 0x3e0740
movl %eax, -0xc(%rbp)
cmpl $0x0, -0xc(%rbp)
je 0x3e6cdd
jmp 0x3e6f15
movq -0x8(%rbp), %rax
movq 0x50(%rax), %rax
cmpq $0x0, (%rax)
jne 0x3e6d86
movq -0x8(%rbp), %rax
movq (%rax), %rax
movq %rax, -0x18(%rbp)
movq -0x18(%rbp), %rdi
movq -0x8(%rbp), %rax
movq 0xd8(%rax), %rsi
xorl %edx, %edx
leaq -0x1c(%rbp), %rcx
callq 0x3e36f0
movl %eax, -0xc(%rbp)
cmpl $0x0, -0xc(%rbp)
jne 0x3e6d84
cmpl $0x0, -0x1c(%rbp)
je 0x3e6d84
movl $0x0, -0x20(%rbp)
movl $0x802, -0x24(%rbp)     # imm = 0x802
movq -0x18(%rbp), %rdi
movq -0x8(%rbp), %rax
movq 0xd8(%rax), %rsi
movq -0x8(%rbp), %rax
movq 0x50(%rax), %rdx
movl -0x24(%rbp), %ecx
leaq -0x20(%rbp), %r8
callq 0x3dbb90
movl %eax, -0xc(%rbp)
cmpl $0x0, -0xc(%rbp)
jne 0x3e6d82
movl -0x20(%rbp), %eax
andl $0x1, %eax
cmpl $0x0, %eax
je 0x3e6d82
movl $0xde84, %edi           # imm = 0xDE84
callq 0x3d80e0
movl %eax, -0xc(%rbp)
movq -0x8(%rbp), %rax
movq 0x50(%rax), %rdi
callq 0x3dbe40
jmp 0x3e6d84
jmp 0x3e6d86
movq -0x8(%rbp), %rax
movq 0x50(%rax), %rax
cmpq $0x0, (%rax)
je 0x3e6dce
movq -0x8(%rbp), %rdi
callq 0x3e53a0
movl %eax, -0xc(%rbp)
cmpl $0x0, -0xc(%rbp)
jne 0x3e6dcc
movq -0x8(%rbp), %rdi
movq -0x8(%rbp), %rax
cmpb $0x0, 0x10(%rax)
setne %al
xorb $-0x1, %al
andb $0x1, %al
movzbl %al, %esi
callq 0x3e1f00
movl %eax, -0xc(%rbp)
movq -0x8(%rbp), %rax
movb $0x0, 0x14(%rax)
jmp 0x3e6de8
movq -0x8(%rbp), %rax
cmpb $0x0, 0x8(%rax)
jne 0x3e6de6
movq -0x8(%rbp), %rdi
movl $0x1, %esi
callq 0x3e3fb0
jmp 0x3e6de8
cmpl $0x0, -0xc(%rbp)
je 0x3e6dff
movq -0x8(%rbp), %rdi
movl -0xc(%rbp), %esi
callq 0x3dc6f0
jmp 0x3e6f15
jmp 0x3e6e01
movq -0x8(%rbp), %rax
cmpb $0x0, 0x10(%rax)
jne 0x3e6eb9
movq -0x8(%rbp), %rax
movzbl 0x1b(%rax), %eax
cmpl $0x0, %eax
je 0x3e6eb9
movq -0x8(%rbp), %rax
movq 0x48(%rax), %rdi
leaq -0x40(%rbp), %rsi
movl $0x10, %edx
movl $0x18, %ecx
callq 0x3dfc00
movl %eax, -0xc(%rbp)
cmpl $0x0, -0xc(%rbp)
je 0x3e6e62
cmpl $0x20a, -0xc(%rbp)      # imm = 0x20A
je 0x3e6e52
jmp 0x3e6f15
leaq -0x40(%rbp), %rdi
xorl %esi, %esi
movl $0x10, %edx
callq 0x19360
movq -0x8(%rbp), %rax
addq $0x88, %rax
leaq -0x40(%rbp), %rcx
movups (%rcx), %xmm1
movups (%rax), %xmm0
pcmpeqb %xmm1, %xmm0
pmovmskb %xmm0, %eax
subl $0xffff, %eax           # imm = 0xFFFF
setne %al
movzbl %al, %eax
cmpl $0x0, %eax
je 0x3e6eb7
movq -0x8(%rbp), %rdi
callq 0x3e3850
movq -0x8(%rbp), %rax
cmpb $0x0, 0x1a(%rax)
je 0x3e6eb5
movq -0x8(%rbp), %rax
movq 0x48(%rax), %rdi
xorl %eax, %eax
movl %eax, %edx
movq %rdx, %rsi
callq 0x3e1110
jmp 0x3e6eb7
jmp 0x3e6eb9
movq -0x8(%rbp), %rdi
callq 0x3e72e0
movl %eax, -0xc(%rbp)
movq -0x8(%rbp), %rax
cmpq $0x0, 0x120(%rax)
je 0x3e6edf
movq -0x8(%rbp), %rdi
callq 0x3e73b0
movl %eax, -0xc(%rbp)
movq -0x8(%rbp), %rax
movzbl 0x10(%rax), %eax
cmpl $0x0, %eax
jne 0x3e6f13
movq -0x8(%rbp), %rax
movzbl 0x14(%rax), %eax
cmpl $0x0, %eax
jne 0x3e6f13
cmpl $0x0, -0xc(%rbp)
jne 0x3e6f13
movq -0x8(%rbp), %rdi
movq -0x8(%rbp), %rsi
addq $0x1c, %rsi
callq 0x3e7430
movl %eax, -0xc(%rbp)
jmp 0x3e6f15
cmpl $0x0, -0xc(%rbp)
je 0x3e6f26
movq -0x8(%rbp), %rdi
callq 0x3e1bf0
jmp 0x3e6f36
movq -0x8(%rbp), %rax
movb $0x1, 0x14(%rax)
movq -0x8(%rbp), %rax
movb $0x1, 0x1b(%rax)
movl -0xc(%rbp), %eax
addq $0x40, %rsp
popq %rbp
retq
nop