// File: /workspace/github_c_makefile_star2_O2/barabo[P]advanced-shell-history/src/sqlite3.c
// Function: freePage2
static int freePage2(BtShared *pBt, MemPage *pMemPage, Pgno iPage){
  MemPage *pTrunk = 0;                /* Free-list trunk page */
  Pgno iTrunk = 0;                    /* Page number of free-list trunk page */ 
  MemPage *pPage1 = pBt->pPage1;      /* Local reference to page 1 */
  MemPage *pPage;                     /* Page being freed. May be NULL. */
  int rc;                             /* Return Code */
  int nFree;                          /* Initial number of pages on free-list */

  assert( sqlite3_mutex_held(pBt->mutex) );
  assert( iPage>1 );
  assert( !pMemPage || pMemPage->pgno==iPage );

  if( pMemPage ){
    pPage = pMemPage;
    sqlite3PagerRef(pPage->pDbPage);
  }else{
    pPage = btreePageLookup(pBt, iPage);
  }

  /* Increment the free page count on pPage1 */
  rc = sqlite3PagerWrite(pPage1->pDbPage);
  if( rc ) goto freepage_out;
  nFree = get4byte(&pPage1->aData[36]);
  put4byte(&pPage1->aData[36], nFree+1);

  if( pBt->btsFlags & BTS_SECURE_DELETE ){
    /* If the secure_delete option is enabled, then
    ** always fully overwrite deleted information with zeros.
    */
    if( (!pPage && ((rc = btreeGetPage(pBt, iPage, &pPage, 0))!=0) )
     ||            ((rc = sqlite3PagerWrite(pPage->pDbPage))!=0)
    ){
      goto freepage_out;
    }
    memset(pPage->aData, 0, pPage->pBt->pageSize);
  }

  /* If the database supports auto-vacuum, write an entry in the pointer-map
  ** to indicate that the page is free.
  */
  if( ISAUTOVACUUM ){
    ptrmapPut(pBt, iPage, PTRMAP_FREEPAGE, 0, &rc);
    if( rc ) goto freepage_out;
  }

  /* Now manipulate the actual database free-list structure. There are two
  ** possibilities. If the free-list is currently empty, or if the first
  ** trunk page in the free-list is full, then this page will become a
  ** new free-list trunk page. Otherwise, it will become a leaf of the
  ** first trunk page in the current free-list. This block tests if it
  ** is possible to add the page as a new free-list leaf.
  */
  if( nFree!=0 ){
    u32 nLeaf;                /* Initial number of leaf cells on trunk page */

    iTrunk = get4byte(&pPage1->aData[32]);
    rc = btreeGetPage(pBt, iTrunk, &pTrunk, 0);
    if( rc!=SQLITE_OK ){
      goto freepage_out;
    }

    nLeaf = get4byte(&pTrunk->aData[4]);
    assert( pBt->usableSize>32 );
    if( nLeaf > (u32)pBt->usableSize/4 - 2 ){
      rc = SQLITE_CORRUPT_BKPT;
      goto freepage_out;
    }
    if( nLeaf < (u32)pBt->usableSize/4 - 8 ){
      /* In this case there is room on the trunk page to insert the page
      ** being freed as a new leaf.
      **
      ** Note that the trunk page is not really full until it contains
      ** usableSize/4 - 2 entries, not usableSize/4 - 8 entries as we have
      ** coded.  But due to a coding error in versions of SQLite prior to
      ** 3.6.0, databases with freelist trunk pages holding more than
      ** usableSize/4 - 8 entries will be reported as corrupt.  In order
      ** to maintain backwards compatibility with older versions of SQLite,
      ** we will continue to restrict the number of entries to usableSize/4 - 8
      ** for now.  At some point in the future (once everyone has upgraded
      ** to 3.6.0 or later) we should consider fixing the conditional above
      ** to read "usableSize/4-2" instead of "usableSize/4-8".
      */
      rc = sqlite3PagerWrite(pTrunk->pDbPage);
      if( rc==SQLITE_OK ){
        put4byte(&pTrunk->aData[4], nLeaf+1);
        put4byte(&pTrunk->aData[8+nLeaf*4], iPage);
        if( pPage && (pBt->btsFlags & BTS_SECURE_DELETE)==0 ){
          sqlite3PagerDontWrite(pPage->pDbPage);
        }
        rc = btreeSetHasContent(pBt, iPage);
      }
      TRACE(("FREE-PAGE: %d leaf on trunk page %d\n",pPage->pgno,pTrunk->pgno));
      goto freepage_out;
    }
  }

  /* If control flows to this point, then it was not possible to add the
  ** the page being freed as a leaf page of the first trunk in the free-list.
  ** Possibly because the free-list is empty, or possibly because the 
  ** first trunk in the free-list is full. Either way, the page being freed
  ** will become the new first trunk page in the free-list.
  */
  if( pPage==0 && SQLITE_OK!=(rc = btreeGetPage(pBt, iPage, &pPage, 0)) ){
    goto freepage_out;
  }
  rc = sqlite3PagerWrite(pPage->pDbPage);
  if( rc!=SQLITE_OK ){
    goto freepage_out;
  }
  put4byte(pPage->aData, iTrunk);
  put4byte(&pPage->aData[4], 0);
  put4byte(&pPage1->aData[32], iPage);
  TRACE(("FREE-PAGE: %d new trunk page replacing %d\n", pPage->pgno, iTrunk));

freepage_out:
  if( pPage ){
    pPage->isInit = 0;
  }
  releasePage(pPage);
  releasePage(pTrunk);
  return rc;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movl %edx, %r13d
andq $0x0, -0x38(%rbp)
movq %rdi, %r15
movq 0x18(%rdi), %r14
testq %rsi, %rsi
je 0x2dd09
movq %rsi, %rbx
movq 0x68(%rsi), %rax
incw 0x2e(%rax)
jmp 0x2dd17
movq %r15, %rdi
movl %r13d, %esi
callq 0x2dc8e
movq %rax, %rbx
movq %rbx, -0x40(%rbp)
movq 0x68(%r14), %rdi
callq 0xd10b
movl %eax, -0x30(%rbp)
testl %eax, %eax
je 0x2dd3f
movl %eax, %r12d
testq %rbx, %rbx
je 0x2de28
movb $0x0, (%rbx)
jmp 0x2de2a
movl %r13d, -0x2c(%rbp)
movq 0x50(%r14), %r12
leaq 0x24(%r12), %rdi
callq 0x180a3
movl %eax, %r13d
leal 0x1(%r13), %eax
bswapl %eax
movl %eax, 0x24(%r12)
testb $0x4, 0x26(%r15)
je 0x2dd95
testq %rbx, %rbx
je 0x2de4d
movq 0x68(%rbx), %rdi
callq 0xd10b
movl %eax, -0x30(%rbp)
testl %eax, %eax
jne 0x2de86
movq 0x48(%rbx), %rax
movq 0x50(%rbx), %rdi
movl 0x30(%rax), %edx
xorl %esi, %esi
callq 0x81e0
cmpb $0x0, 0x21(%r15)
je 0x2ddc0
pushq $0x2
popq %rdx
leaq -0x30(%rbp), %r12
movq %r15, %rdi
movl -0x2c(%rbp), %esi
xorl %ecx, %ecx
movq %r12, %r8
callq 0x1f801
movl (%r12), %r12d
testl %r12d, %r12d
jne 0x2dd2e
testl %r13d, %r13d
je 0x2de71
movq 0x50(%r14), %rdi
addq $0x20, %rdi
callq 0x180a3
movl %eax, %r13d
leaq -0x38(%rbp), %rdx
movq %r15, %rdi
movl %eax, %esi
xorl %ecx, %ecx
callq 0x1d84e
testl %eax, %eax
jne 0x2dd2b
movq -0x38(%rbp), %r12
movq 0x50(%r12), %rdi
addq $0x4, %rdi
callq 0x180a3
movl 0x34(%r15), %edx
shrl $0x2, %edx
leal -0x2(%rdx), %ecx
cmpl %ecx, %eax
jbe 0x2ded5
movl $0xd696, %edi           # imm = 0xD696
callq 0x1a1fc
pushq $0xb
popq %r12
jmp 0x2dd2e
xorl %ebx, %ebx
movq %rbx, %rdi
callq 0x1d90e
movq -0x38(%rbp), %rdi
callq 0x1d90e
movl %r12d, %eax
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq -0x40(%rbp), %rbx
movq %r15, %rdi
movl -0x2c(%rbp), %esi
movq %rbx, %rdx
xorl %ecx, %ecx
callq 0x1d84e
movq (%rbx), %rbx
testl %eax, %eax
jne 0x2dd2b
jmp 0x2dd6f
xorl %r13d, %r13d
testq %rbx, %rbx
je 0x2de8e
movq 0x68(%rbx), %rdi
callq 0xd10b
testl %eax, %eax
je 0x2deaf
movl %eax, %r12d
jmp 0x2dd37
leaq -0x40(%rbp), %rbx
movq %r15, %rdi
movl -0x2c(%rbp), %esi
movq %rbx, %rdx
xorl %ecx, %ecx
callq 0x1d84e
movq (%rbx), %rbx
testl %eax, %eax
jne 0x2dd2b
jmp 0x2de79
movq 0x50(%rbx), %rax
bswapl %r13d
movl %r13d, (%rax)
movq 0x50(%rbx), %rax
andl $0x0, 0x4(%rax)
movq 0x50(%r14), %rax
movl -0x2c(%rbp), %ecx
bswapl %ecx
movl %ecx, 0x20(%rax)
xorl %r12d, %r12d
jmp 0x2dd37
addl $-0x8, %edx
cmpl %edx, %eax
jae 0x2de74
movq %rax, %r14
movq 0x68(%r12), %rdi
callq 0xd10b
testl %eax, %eax
jne 0x2dd2b
movq 0x50(%r12), %rax
leal 0x1(%r14), %ecx
bswapl %ecx
movl %ecx, 0x4(%rax)
movq 0x50(%r12), %rax
leal 0x8(,%r14,4), %ecx
movl -0x2c(%rbp), %r14d
movl %r14d, %edx
bswapl %edx
movl %edx, (%rax,%rcx)
testq %rbx, %rbx
je 0x2df45
testb $0x4, 0x26(%r15)
jne 0x2df45
movq 0x68(%rbx), %rax
movzwl 0x2c(%rax), %ecx
testb $0x2, %cl
je 0x2df45
movq 0x20(%rax), %rdx
cmpl $0x0, 0x80(%rdx)
jne 0x2df45
orl $0x20, %ecx
movw %cx, 0x2c(%rax)
movq 0x58(%r15), %rdi
testq %rdi, %rdi
jne 0x2df63
movl 0x3c(%r15), %edi
callq 0x19221
movq %rax, %rdi
movq %rax, 0x58(%r15)
testq %rax, %rax
je 0x2df7c
xorl %r12d, %r12d
cmpl %r14d, (%rdi)
jb 0x2dd2e
movl %r14d, %esi
callq 0x190c4
jmp 0x2dd2b
pushq $0x7
jmp 0x2de21