// File: /workspace/github_c_makefile_star2_O2/genometools[P]genometools/src/external/sqlite-3.33.0/sqlite3.c
// Function: sqlite3FkCheck
SQLITE_PRIVATE void sqlite3FkCheck(
  Parse *pParse,                  /* Parse context */
  Table *pTab,                    /* Row is being deleted from this table */
  int regOld,                     /* Previous row data is stored here */
  int regNew,                     /* New row data is stored here */
  int *aChange,                   /* Array indicating UPDATEd columns (or 0) */
  int bChngRowid                  /* True if rowid is UPDATEd */
){
  sqlite3 *db = pParse->db;       /* Database handle */
  FKey *pFKey;                    /* Used to iterate through FKs */
  int iDb;                        /* Index of database containing pTab */
  const char *zDb;                /* Name of database containing pTab */
  int isIgnoreErrors = pParse->disableTriggers;

  /* Exactly one of regOld and regNew should be non-zero. */
  assert( (regOld==0)!=(regNew==0) );

  /* If foreign-keys are disabled, this function is a no-op. */
  if( (db->flags&SQLITE_ForeignKeys)==0 ) return;

  iDb = sqlite3SchemaToIndex(db, pTab->pSchema);
  zDb = db->aDb[iDb].zDbSName;

  /* Loop through all the foreign key constraints for which pTab is the
  ** child table (the table that the foreign key definition is part of).  */
  for(pFKey=pTab->pFKey; pFKey; pFKey=pFKey->pNextFrom){
    Table *pTo;                   /* Parent table of foreign key pFKey */
    Index *pIdx = 0;              /* Index on key columns in pTo */
    int *aiFree = 0;
    int *aiCol;
    int iCol;
    int i;
    int bIgnore = 0;

    if( aChange
     && sqlite3_stricmp(pTab->zName, pFKey->zTo)!=0
     && fkChildIsModified(pTab, pFKey, aChange, bChngRowid)==0
    ){
      continue;
    }

    /* Find the parent table of this foreign key. Also find a unique index
    ** on the parent key columns in the parent table. If either of these
    ** schema items cannot be located, set an error in pParse and return
    ** early.  */
    if( pParse->disableTriggers ){
      pTo = sqlite3FindTable(db, pFKey->zTo, zDb);
    }else{
      pTo = sqlite3LocateTable(pParse, 0, pFKey->zTo, zDb);
    }
    if( !pTo || sqlite3FkLocateIndex(pParse, pTo, pFKey, &pIdx, &aiFree) ){
      assert( isIgnoreErrors==0 || (regOld!=0 && regNew==0) );
      if( !isIgnoreErrors || db->mallocFailed ) return;
      if( pTo==0 ){
        /* If isIgnoreErrors is true, then a table is being dropped. In this
        ** case SQLite runs a "DELETE FROM xxx" on the table being dropped
        ** before actually dropping it in order to check FK constraints.
        ** If the parent table of an FK constraint on the current table is
        ** missing, behave as if it is empty. i.e. decrement the relevant
        ** FK counter for each row of the current table with non-NULL keys.
        */
        Vdbe *v = sqlite3GetVdbe(pParse);
        int iJump = sqlite3VdbeCurrentAddr(v) + pFKey->nCol + 1;
        for(i=0; i<pFKey->nCol; i++){
          int iFromCol, iReg;
          iFromCol = pFKey->aCol[i].iFrom;
          iReg = sqlite3TableColumnToStorage(pFKey->pFrom,iFromCol) + regOld+1;
          sqlite3VdbeAddOp2(v, OP_IsNull, iReg, iJump); VdbeCoverage(v);
        }
        sqlite3VdbeAddOp2(v, OP_FkCounter, pFKey->isDeferred, -1);
      }
      continue;
    }
    assert( pFKey->nCol==1 || (aiFree && pIdx) );

    if( aiFree ){
      aiCol = aiFree;
    }else{
      iCol = pFKey->aCol[0].iFrom;
      aiCol = &iCol;
    }
    for(i=0; i<pFKey->nCol; i++){
      if( aiCol[i]==pTab->iPKey ){
        aiCol[i] = -1;
      }
      assert( pIdx==0 || pIdx->aiColumn[i]>=0 );
#ifndef SQLITE_OMIT_AUTHORIZATION
      /* Request permission to read the parent key columns. If the
      ** authorization callback returns SQLITE_IGNORE, behave as if any
      ** values read from the parent table are NULL. */
      if( db->xAuth ){
        int rcauth;
        char *zCol = pTo->aCol[pIdx ? pIdx->aiColumn[i] : pTo->iPKey].zName;
        rcauth = sqlite3AuthReadCol(pParse, pTo->zName, zCol, iDb);
        bIgnore = (rcauth==SQLITE_IGNORE);
      }
#endif
    }

    /* Take a shared-cache advisory read-lock on the parent table. Allocate
    ** a cursor to use to search the unique index on the parent key columns
    ** in the parent table.  */
    sqlite3TableLock(pParse, iDb, pTo->tnum, 0, pTo->zName);
    pParse->nTab++;

    if( regOld!=0 ){
      /* A row is being removed from the child table. Search for the parent.
      ** If the parent does not exist, removing the child row resolves an
      ** outstanding foreign key constraint violation. */
      fkLookupParent(pParse, iDb, pTo, pIdx, pFKey, aiCol, regOld, -1, bIgnore);
    }
    if( regNew!=0 && !isSetNullAction(pParse, pFKey) ){
      /* A row is being added to the child table. If a parent row cannot
      ** be found, adding the child row has violated the FK constraint.
      **
      ** If this operation is being performed as part of a trigger program
      ** that is actually a "SET NULL" action belonging to this very
      ** foreign key, then omit this scan altogether. As all child key
      ** values are guaranteed to be NULL, it is not possible for adding
      ** this row to cause an FK violation.  */
      fkLookupParent(pParse, iDb, pTo, pIdx, pFKey, aiCol, regNew, +1, bIgnore);
    }

    sqlite3DbFree(db, aiFree);
  }

  /* Loop through all the foreign key constraints that refer to this table.
  ** (the "child" constraints) */
  for(pFKey = sqlite3FkReferences(pTab); pFKey; pFKey=pFKey->pNextTo){
    Index *pIdx = 0;              /* Foreign key index for pFKey */
    SrcList *pSrc;
    int *aiCol = 0;

    if( aChange && fkParentIsModified(pTab, pFKey, aChange, bChngRowid)==0 ){
      continue;
    }

    if( !pFKey->isDeferred && !(db->flags & SQLITE_DeferFKs)
     && !pParse->pToplevel && !pParse->isMultiWrite
    ){
      assert( regOld==0 && regNew!=0 );
      /* Inserting a single row into a parent table cannot cause (or fix)
      ** an immediate foreign key violation. So do nothing in this case.  */
      continue;
    }

    if( sqlite3FkLocateIndex(pParse, pTab, pFKey, &pIdx, &aiCol) ){
      if( !isIgnoreErrors || db->mallocFailed ) return;
      continue;
    }
    assert( aiCol || pFKey->nCol==1 );

    /* Create a SrcList structure containing the child table.  We need the
    ** child table as a SrcList for sqlite3WhereBegin() */
    pSrc = sqlite3SrcListAppend(pParse, 0, 0, 0);
    if( pSrc ){
      struct SrcList_item *pItem = pSrc->a;
      pItem->pTab = pFKey->pFrom;
      pItem->zName = pFKey->pFrom->zName;
      pItem->pTab->nTabRef++;
      pItem->iCursor = pParse->nTab++;

      if( regNew!=0 ){
        fkScanChildren(pParse, pSrc, pTab, pIdx, pFKey, aiCol, regNew, -1);
      }
      if( regOld!=0 ){
        int eAction = pFKey->aAction[aChange!=0];
        fkScanChildren(pParse, pSrc, pTab, pIdx, pFKey, aiCol, regOld, 1);
        /* If this is a deferred FK constraint, or a CASCADE or SET NULL
        ** action applies, then any foreign key violations caused by
        ** removing the parent key will be rectified by the action trigger.
        ** So do not set the "may-abort" flag in this case.
        **
        ** Note 1: If the FK is declared "ON UPDATE CASCADE", then the
        ** may-abort flag will eventually be set on this statement anyway
        ** (when this function is called as part of processing the UPDATE
        ** within the action trigger).
        **
        ** Note 2: At first glance it may seem like SQLite could simply omit
        ** all OP_FkCounter related scans when either CASCADE or SET NULL
        ** applies. The trouble starts if the CASCADE or SET NULL action
        ** trigger causes other triggers or action rules attached to the
        ** child table to fire. In these cases the fk constraint counters
        ** might be set incorrectly if any OP_FkCounter related scans are
        ** omitted.  */
        if( !pFKey->isDeferred && eAction!=OE_Cascade && eAction!=OE_SetNull ){
          sqlite3MayAbort(pParse);
        }
      }
      pItem->zName = 0;
      sqlite3SrcListDelete(db, pSrc);
    }
    sqlite3DbFree(db, aiCol);
  }
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x88, %rsp
movl %r9d, 0x44(%rsp)
movq %rcx, 0x50(%rsp)
movq %rdx, 0x48(%rsp)
movq %rsi, 0x10(%rsp)
movq (%rdi), %rax
movq %rax, 0x18(%rsp)
testb $0x40, 0x31(%rax)
jne 0x27f522
addq $0x88, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
movq %r8, %r15
movq %rdi, %rbp
movb 0xd2(%rdi), %r13b
movq 0x10(%rsp), %rbx
movq 0x70(%rbx), %rsi
movq 0x18(%rsp), %r14
movq %r14, %rdi
callq 0x226e9e
movq 0x20(%r14), %rdx
movl %eax, 0x34(%rsp)
movslq %eax, %rcx
shlq $0x5, %rcx
movq (%rdx,%rcx), %r12
addq $0x20, %rbx
movq 0x48(%rsp), %rax
incl %eax
movl %eax, 0x68(%rsp)
movq %r15, 0x58(%rsp)
movq %rbp, 0x28(%rsp)
movq %r12, 0x78(%rsp)
movb %r13b, 0xf(%rsp)
movq (%rbx), %rbx
testq %rbx, %rbx
je 0x27f83e
andq $0x0, 0x38(%rsp)
andq $0x0, 0x20(%rsp)
testq %r15, %r15
je 0x27f5c9
movq 0x10(%rsp), %rax
movq (%rax), %rdi
movq 0x10(%rbx), %rsi
callq 0x221763
testl %eax, %eax
je 0x27f5c9
movq 0x10(%rsp), %rdi
movq %rbx, %rsi
movq %r15, %rdx
movl 0x44(%rsp), %ecx
callq 0x27f1d5
testl %eax, %eax
je 0x27f835
cmpb $0x0, 0xd2(%rbp)
movq 0x10(%rbx), %rdx
je 0x27f5e8
movq 0x18(%rsp), %rdi
movq %rdx, %rsi
movq %r12, %rdx
callq 0x22beb2
jmp 0x27f5f5
movq %rbp, %rdi
xorl %esi, %esi
movq %r12, %rcx
callq 0x226b48
movq %rax, %r14
testq %rax, %rax
je 0x27f61d
movq %rbp, %rdi
movq %r14, %rsi
movq %rbx, %rdx
leaq 0x38(%rsp), %rcx
leaq 0x20(%rsp), %r8
callq 0x280809
testl %eax, %eax
je 0x27f6b4
testb %r13b, %r13b
je 0x27f510
movq 0x18(%rsp), %rax
cmpb $0x0, 0x61(%rax)
jne 0x27f510
testq %r14, %r14
jne 0x27f835
movq %rbp, %rdi
callq 0x2645be
movq %rax, %r14
movl 0x90(%rax), %ecx
movl 0x28(%rbx), %eax
leal (%rcx,%rax), %ebp
incl %ebp
leaq 0x40(%rbx), %r15
xorl %r12d, %r12d
cltq
cmpq %rax, %r12
jge 0x27f691
movswl (%r15), %esi
movq (%rbx), %rdi
callq 0x265d66
movswl %ax, %edx
addl 0x68(%rsp), %edx
movq %r14, %rdi
pushq $0x32
popq %rsi
movl %ebp, %ecx
callq 0x24d51a
incq %r12
movl 0x28(%rbx), %eax
addq $0x10, %r15
jmp 0x27f65e
movzbl 0x2c(%rbx), %edx
movq %r14, %rdi
movl $0x95, %esi
pushq $-0x1
popq %rcx
callq 0x24d51a
movq 0x58(%rsp), %r15
movq 0x28(%rsp), %rbp
jmp 0x27f830
movq 0x20(%rsp), %r12
testq %r12, %r12
jne 0x27f6ca
movl 0x40(%rbx), %eax
movl %eax, 0x74(%rsp)
leaq 0x74(%rsp), %r12
movq 0x38(%rsp), %rcx
leaq 0x44(%r14), %rax
movq %rax, 0x80(%rsp)
xorl %ebp, %ebp
xorl %r13d, %r13d
xorl %r15d, %r15d
movq %rcx, 0x60(%rsp)
movslq 0x28(%rbx), %rax
cmpq %rax, %r13
jge 0x27f761
movq 0x10(%rsp), %rax
movswl 0x44(%rax), %eax
cmpl %eax, (%r12,%rbp,2)
jne 0x27f705
orl $-0x1, (%r12,%rbp,2)
movq 0x18(%rsp), %rax
cmpq $0x0, 0x1c8(%rax)
je 0x27f758
movq 0x80(%rsp), %rax
testq %rcx, %rcx
je 0x27f728
movq 0x8(%rcx), %rax
addq %rbp, %rax
movq 0x8(%r14), %rcx
movswq (%rax), %rax
shlq $0x5, %rax
movq (%rcx,%rax), %rdx
movq (%r14), %rsi
movq 0x28(%rsp), %rdi
movl 0x34(%rsp), %ecx
callq 0x26d20f
movq 0x60(%rsp), %rcx
xorl %r15d, %r15d
cmpl $0x2, %eax
sete %r15b
incq %r13
addq $0x2, %rbp
jmp 0x27f6e8
movl 0x38(%r14), %edx
movq (%r14), %r8
movq 0x28(%rsp), %rbp
movq %rbp, %rdi
movl 0x34(%rsp), %r13d
movl %r13d, %esi
xorl %ecx, %ecx
callq 0x264778
incl 0x34(%rbp)
movq 0x48(%rsp), %rax
testl %eax, %eax
je 0x27f7b1
subq $0x8, %rsp
movq %rbp, %rdi
movl %r13d, %esi
movq %r14, %rdx
movq 0x68(%rsp), %rcx
movq %rbx, %r8
movq %r12, %r9
pushq %r15
pushq $-0x1
pushq %rax
callq 0x280b74
addq $0x20, %rsp
cmpl $0x0, 0x50(%rsp)
movb 0xf(%rsp), %r13b
je 0x27f81c
movq 0xa0(%rbp), %rax
testq %rax, %rax
cmoveq %rbp, %rax
movq 0x188(%rax), %rax
testq %rax, %rax
je 0x27f7f2
movq (%rax), %rax
cmpq 0x30(%rbx), %rax
jne 0x27f7e6
cmpb $0x8, 0x2d(%rbx)
je 0x27f81c
cmpq 0x38(%rbx), %rax
jne 0x27f7f2
cmpb $0x8, 0x2e(%rbx)
je 0x27f81c
subq $0x8, %rsp
movq %rbp, %rdi
movl 0x3c(%rsp), %esi
movq %r14, %rdx
movq 0x68(%rsp), %rcx
movq %rbx, %r8
movq %r12, %r9
pushq %r15
pushq $0x1
pushq 0x68(%rsp)
callq 0x280b74
addq $0x20, %rsp
movq 0x20(%rsp), %rsi
movq 0x18(%rsp), %rdi
callq 0x21f26b
movq 0x58(%rsp), %r15
movq 0x78(%rsp), %r12
addq $0x8, %rbx
jmp 0x27f57b
movq 0x10(%rsp), %rdi
callq 0x270557
movq %rax, %rbx
xorl %eax, %eax
testq %r15, %r15
setne %al
movq %rax, 0x68(%rsp)
leaq 0x38(%rsp), %r14
leaq 0x20(%rsp), %r12
testq %rbx, %rbx
je 0x27f510
andq $0x0, 0x38(%rsp)
andq $0x0, 0x20(%rsp)
testq %r15, %r15
je 0x27f898
movq 0x10(%rsp), %rdi
movq %rbx, %rsi
movq %r15, %rdx
movl 0x44(%rsp), %ecx
callq 0x27f222
testl %eax, %eax
je 0x27f9e2
cmpb $0x0, 0x2c(%rbx)
jne 0x27f8bd
movq 0x18(%rsp), %rax
testb $0x8, 0x32(%rax)
jne 0x27f8bd
cmpq $0x0, 0xa0(%rbp)
jne 0x27f8bd
cmpb $0x0, 0x20(%rbp)
je 0x27f9e2
movq %rbp, %rdi
movq 0x10(%rsp), %rsi
movq %rbx, %rdx
movq %r14, %rcx
movq %r12, %r8
callq 0x280809
testl %eax, %eax
je 0x27f8f4
testb %r13b, %r13b
je 0x27f510
movq 0x18(%rsp), %rax
cmpb $0x0, 0x61(%rax)
je 0x27f9e2
jmp 0x27f510
movq %rbp, %rdi
xorl %esi, %esi
xorl %edx, %edx
xorl %ecx, %ecx
callq 0x25bf69
testq %rax, %rax
je 0x27f9ce
movq %rax, %rbp
movq (%rbx), %rax
movq %rax, 0x28(%rbp)
movq (%rax), %rcx
movq %rcx, 0x18(%rbp)
incl 0x3c(%rax)
movq 0x28(%rsp), %rdi
movl 0x34(%rdi), %eax
leal 0x1(%rax), %ecx
movl %ecx, 0x34(%rdi)
movl %eax, 0x48(%rbp)
movq 0x50(%rsp), %rax
testl %eax, %eax
je 0x27f958
movq 0x38(%rsp), %rcx
movq 0x20(%rsp), %r9
movq %rbp, %rsi
movq 0x10(%rsp), %rdx
movq %rbx, %r8
pushq $-0x1
pushq %rax
callq 0x281004
popq %rax
popq %rcx
cmpl $0x0, 0x48(%rsp)
je 0x27f9b7
movq 0x68(%rsp), %rax
movb 0x2d(%rbx,%rax), %r15b
movq 0x38(%rsp), %rcx
movq 0x20(%rsp), %r9
movq 0x28(%rsp), %rdi
movq %rbp, %rsi
movq 0x10(%rsp), %rdx
movq %rbx, %r8
pushq $0x1
pushq 0x50(%rsp)
callq 0x281004
popq %rax
popq %rcx
cmpb $0x0, 0x2c(%rbx)
jne 0x27f9b7
andb $-0x3, %r15b
cmpb $0x8, %r15b
je 0x27f9b7
movq 0x28(%rsp), %rcx
movq 0xa0(%rcx), %rax
testq %rax, %rax
cmoveq %rcx, %rax
movb $0x1, 0x21(%rax)
andq $0x0, 0x18(%rbp)
movq 0x18(%rsp), %rdi
movq %rbp, %rsi
callq 0x24b836
movq 0x58(%rsp), %r15
movq 0x20(%rsp), %rsi
movq 0x18(%rsp), %rdi
callq 0x21f26b
movq 0x28(%rsp), %rbp
movq 0x18(%rbx), %rbx
jmp 0x27f862