/* DBCServer_Release_x64.exe sha256 d9e4fccdf3482e50247686d4452c0b13c75a53efc4bd7320668eece8d1ce828c
 * Ghidra 12.1.2 decompiler output for 0x1401bf500 FUN_1401bf500
 * Pseudocode, not original source. */

/* WARNING: Removing unreachable block (ram,0x0001401bf564) */

void FUN_1401bf500(longlong *param_1,undefined8 param_2,undefined8 param_3,undefined8 param_4)

{
  longlong lVar1;
  longlong *plVar2;
  longlong *plVar3;
  undefined8 *puVar4;
  undefined8 uVar5;
  
  uVar5 = 0xfffffffffffffffe;
  puVar4 = (undefined8 *)param_1[2];
  while( true ) {
    if (puVar4 == (undefined8 *)0x0) {
      lVar1 = param_1[4];
      while( true ) {
        if (lVar1 == 0) {
          param_1[2] = 0;
          param_1[3] = 0;
          puVar4 = (undefined8 *)param_1[1];
          if (puVar4 != (undefined8 *)0x0) {
            (**(code **)*puVar4)(puVar4,1);
          }
          lVar1 = *param_1;
          while (lVar1 != 0) {
            lVar1 = *param_1;
            *param_1 = *(longlong *)(lVar1 + 0x38);
            *(undefined8 *)(lVar1 + 0x38) = 0;
            FUN_14019a9e0(lVar1 + 8);
            FUN_14016d970(lVar1);
            lVar1 = *param_1;
          }
          return;
        }
        plVar2 = (longlong *)param_1[2];
        if (plVar2 == (longlong *)0x0) break;
        param_1[2] = *plVar2;
        plVar3 = (longlong *)param_1[1];
        if (plVar3 == (longlong *)0x0) {
          FUN_14016d970();
        }
        else {
          (**(code **)(*plVar3 + 0x10))(plVar3,plVar2,plVar3,param_4,uVar5);
        }
        param_1[4] = param_1[4] + -1;
        lVar1 = param_1[4];
      }
                    /* WARNING: Subroutine does not return */
      FUN_14004dc60(0x80004005);
    }
    lVar1 = puVar4[2];
    if ((*(short *)(lVar1 + -8) != 0x1de6) || (*(longlong *)(lVar1 + 0x30) != 0)) break;
    *(longlong *)(lVar1 + 0x30) = *param_1;
    *param_1 = lVar1 + -8;
    puVar4 = (undefined8 *)*puVar4;
  }
                    /* WARNING: Subroutine does not return */
  FUN_14016d6b0();
}