mirror of https://github.com/acidanthera/audk.git
90 lines
2.5 KiB
ArmAsm
90 lines
2.5 KiB
ArmAsm
|
#------------------------------------------------------------------------------
|
||
|
|
#
|
||
|
|
# Copyright (c) 2006, Intel Corporation
|
||
|
|
# All rights reserved. This program and the accompanying materials
|
||
|
|
# are licensed and made available under the terms and conditions of the BSD License
|
||
|
|
# which accompanies this distribution. The full text of the license may be found at
|
||
|
|
# http://opensource.org/licenses/bsd-license.php
|
||
|
|
#
|
||
|
|
# THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,
|
||
|
|
# WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.
|
||
|
|
#
|
||
|
|
# Module Name:
|
||
|
|
#
|
||
|
|
# DivU64x64Remainder.asm
|
||
|
|
#
|
||
|
|
# Abstract:
|
||
|
|
#
|
||
|
|
# Calculate the quotient of a 64-bit integer by a 64-bit integer and returns
|
||
|
|
# both the quotient and the remainder
|
||
|
|
#
|
||
|
|
#------------------------------------------------------------------------------
|
||
|
|
|
||
|
|
.globl ASM_PFX(InternalMathDivRemU64x32), ASM_PFX(InternalMathDivRemU64x64)
|
||
|
|
|
||
|
|
#------------------------------------------------------------------------------
|
||
|
|
# UINT64
|
||
|
|
# EFIAPI
|
||
|
|
# InternalMathDivRemU64x64 (
|
||
|
|
# IN UINT64 Dividend,
|
||
|
|
# IN UINT64 Divisor,
|
||
|
|
# OUT UINT64 *Remainder OPTIONAL
|
||
|
|
# );
|
||
|
|
#------------------------------------------------------------------------------
|
||
|
|
ASM_PFX(InternalMathDivRemU64x64):
|
||
|
|
movl 16(%esp), %ecx
|
||
|
|
testl %ecx, %ecx
|
||
|
|
jnz Hard
|
||
|
|
movl 20(%esp), %ecx
|
||
|
|
jecxz L1
|
||
|
|
and $0, 4(%ecx)
|
||
|
|
movl %ecx, 16(%esp)
|
||
|
|
L1:
|
||
|
|
jmp ASM_PFX(InternalMathDivRemU64x32)
|
||
|
|
Hard:
|
||
|
|
push %ebx
|
||
|
|
push %esi
|
||
|
|
push %edi
|
||
|
|
mov 20(%esp), %edx
|
||
|
|
mov 16(%esp), %eax
|
||
|
|
movl %edx, %edi
|
||
|
|
movl %eax, %esi
|
||
|
|
mov 24(%esp), %ebx
|
||
|
|
L2:
|
||
|
|
shrl %edx
|
||
|
|
rcrl $1, %eax
|
||
|
|
shrdl $1, %ecx, %ebx
|
||
|
|
shrl %ecx
|
||
|
|
jnz L2
|
||
|
|
divl %ebx
|
||
|
|
movl %eax, %ebx
|
||
|
|
movl 28(%esp), %ecx
|
||
|
|
mull 24(%esp)
|
||
|
|
imull %ebx, %ecx
|
||
|
|
addl %ecx, %edx
|
||
|
|
mov 32(%esp), %ecx
|
||
|
|
jc TooLarge
|
||
|
|
cmpl %edx, %edi
|
||
|
|
ja Correct
|
||
|
|
jb TooLarge
|
||
|
|
cmpl %eax, %esi
|
||
|
|
jae Correct
|
||
|
|
TooLarge:
|
||
|
|
decl %ebx
|
||
|
|
jecxz Return
|
||
|
|
sub 24(%esp), %eax
|
||
|
|
sbb 28(%esp), %edx
|
||
|
|
Correct:
|
||
|
|
jecxz Return
|
||
|
|
subl %eax, %esi
|
||
|
|
sbbl %edx, %edi
|
||
|
|
movl %esi, (%ecx)
|
||
|
|
movl %edi, 4(%ecx)
|
||
|
|
Return:
|
||
|
|
movl %ebx, %eax
|
||
|
|
xorl %edx, %edx
|
||
|
|
pop %edi
|
||
|
|
pop %esi
|
||
|
|
pop %ebx
|
||
|
|
ret
|