RtlpHpSegContextCompact

INT64 **__fastcall RtlpHpSegContextCompact(INT64 a1, CHAR a2){
  bool v2; 
  CHAR v5; 
  _QWORD *v6; 
  unsigned __int8 v7; 
  unsigned __int64 v8; 
  unsigned __int64 v9; 
  INT64 *v10; 
  INT64 **result; 
  __int64 v12; 
  INT64 *v13; 
  _ETHREAD *CurrentThread; 
  unsigned int SessionId; 
  char v16; 
  int v17; 
  __int64 v18; 
  unsigned __int64 v19; 
  __int64 v20; 
  INT64 v21; 
  INT64 **v22; 
  INT64 **v23; 
  INT64 v24; 
  INT64 v25; 
  INT64 *v26; 
  CHAR v27; 
  int v28; 
  int v29; 
  v2 = *(_QWORD *)(a1 + 88) == 0i64;
  v26 = &v25;
  v25 = (INT64)&v25;
  if( !v2 )
  {
    v5 = RtlpHpSegLockAcquire(a1, a2);
    v6 = *(_QWORD **)(a1 + 72);
    v27 = v5;
    v7 = v5;
    if( v6 != (_QWORD *)(a1 + 72) )
    {
      do
      {
        v8 = (unsigned __int64)&v6[4 * *(unsigned __int8 *)(a1 + 10)];
        v9 = v8 + 32 * (256i64 - *(unsigned __int8 *)(a1 + 10));
        if( v8 < v9 )
        {
          while( 1 )
          {
            if( (*(_BYTE *)(v8 + 24) & 1) == 0 && *(_WORD *)(v8 + 28) != 0xFFFF )
            {
              RtlpHpSegFreeRangeRemove(a1, v8);
              *(_BYTE *)(v8 + 24) |= 1u;
              v12 = 32i64 * ((unsigned int)*(unsigned __int8 *)(v8 + 31) - 1);
              *(_BYTE *)(v12 + v8 + 24) |= 1u;
              v8 = RtlpHpSegPageRangeCoalesce(a1, v8, a2, 1i64, &v27);
              v13 = (INT64 *)RtlpHpSegFreeRangeInsert(a1, v8, 0i64);
              if( v13 )
                break;
            }
            v8 += 32i64 * *(unsigned __int8 *)(v8 + 31);
            if( v8 >= v9 )
              goto LABEL_6;
          }
          v21 = *v13;
          v6 = (_QWORD *)v6[1];
          v22 = (INT64 **)v13[1];
          if( *(INT64 **)(*v13 + 8) != v13
            || *v22 != v13
            || (*v22 = (INT64 *)v21,
                *(_QWORD *)(v21 + 8) = v22,
                v23 = (INT64 **)v26,
                --*(_QWORD *)(a1 + 88),
                *v23 != &v25) )
          {
            __fastfail(3u);
          }
          v13[1] = (INT64)v23;
          *v13 = (INT64)&v25;
          *v23 = v13;
          v26 = v13;
        }
LABEL_6:
        v6 = (_QWORD *)*v6;
      }
      while( v6 != (_QWORD *)(a1 + 72) );
      v7 = v27;
    }
    if( (a2 & 1) == 0 )
    {
      if( (*(_DWORD *)(a1 + 40) & 1) != 0 )
      {
        ExReleaseSpinLockExclusiveFromDpcLevel((INT64 *)(a1 + 64));
        __writecr8(v7);
      }
      else
      {
        if( (_InterlockedExchangeAdd64((volatile signed __int64 *)(a1 + 64), 0xFFFFFFFFFFFFFFFFui64) & 6) == 2 )
          ExfTryToWakePushLock((volatile INT64 *)(a1 + 64));
        v29 = 0;
        CurrentThread = (_ETHREAD *)KeGetCurrentThread();
        if( (unsigned int)MiGetSystemRegionType(a1 + 64) == 1 )
          SessionId = MmGetSessionIdEx(*((_QWORD *)CurrentThread + 23));
        else
          SessionId = -1;
        --*((_WORD *)CurrentThread + 243);
        v16 = ++*((_BYTE *)CurrentThread + 794);
        v17 = (*((char *)CurrentThread + 792) | *((char *)CurrentThread + 870)) ^ 0x3F;
        v2 = !_BitScanReverse((unsigned int *)&v18, v17);
        v28 = v18;
        if( v2 )
          goto LABEL_37;
        while( 1 )
        {
          v19 = *((_QWORD *)CurrentThread + 100) + 96 * v18;
          v17 &= ~(1 << v18);
          if( (*(_BYTE *)(v19 + 26) & 1) != 0
            && (*(_DWORD *)(v19 + 32) & 1) == 0
            && (*(_QWORD *)(v19 + 32) & 0x7FFFFFFFFFFFFFFCi64) == ((a1 + 64) & 0x7FFFFFFFFFFFFFFCi64)
            && *(_DWORD *)(v19 + 40) == SessionId )
          {
            *(_BYTE *)(v19 + 26) &= ~1u;
            if( *(_QWORD *)(v19 + 32) )
              break;
          }
          v2 = !_BitScanReverse((unsigned int *)&v18, v17);
          v28 = v18;
          if( v2 )
            goto LABEL_37;
        }
        if( !v19 )
        {
LABEL_37:
          if( (*((_DWORD *)CurrentThread + 30) & 0x10000) == 0 )
            KeBugCheckEx(0x162u, (ULONG_PTR)CurrentThread, a1 + 64, SessionId, 0i64);
        }
        else
        {
          *(_BYTE *)(v19 + 32) |= 2u;
          if( *(__int64 *)(v19 + 32) < 0 )
            KiAbEntryRemoveFromTree(v19);
          v29 = *(_DWORD *)(v19 + 88) & 0x1FFFF;
          *(_DWORD *)(v19 + 88) &= 0xFFFE0000;
          *(_BYTE *)(v19 + 25) &= ~1u;
          *(_QWORD *)(v19 + 32) = 0i64;
          v20 = (__int64)(v19 - *((_QWORD *)CurrentThread + 100)) / 96;
          if( v16 == 1 )
            *((_BYTE *)CurrentThread + 792) |= 1 << v20;
          else
            _InterlockedOr8((volatile signed __int8 *)CurrentThread + 870, 1 << v20);
        }
        --*((_BYTE *)CurrentThread + 794);
        KiAbThreadRemoveBoosts((ULONG_PTR)CurrentThread, a1 + 64, (unsigned int *)&v29);
        v2 = (*((_WORD *)CurrentThread + 243))++ == 0xFFFF;
        if( v2 && *((_ETHREAD **)CurrentThread + 19) != (_ETHREAD *)((char *)CurrentThread + 152) )
          KiCheckForKernelApcDelivery();
        KiLeaveGuardedRegionUnsafe((__int64)KeGetCurrentThread());
      }
    }
  }
  v10 = (INT64 *)v25;
  for( result = (INT64 **)&v25; v10 != &v25; result = (INT64 **)&v25 )
  {
    v24 = (INT64)v10;
    v10 = (INT64 *)*v10;
    RtlpHpSegSegmentFree(a1, v24, 0x7FFFFFFFi64, 1i64);
  }
  return result;
}

Referenced by:

RtlpHpHeapCompact