summaryrefslogtreecommitdiff
path: root/MdePkg/Library/BaseLib/Ia32/DivU64x64Remainder.s
blob: f604f7c72e1875fed33353897eb5428efe5ecfd3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
#------------------------------------------------------------------------------
#
# 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
#
#------------------------------------------------------------------------------



     

.extern _InternalMathDivRemU64x32

.global _InternalMathDivRemU64x64
_InternalMathDivRemU64x64: 
    movl    16(%esp),%ecx
    testl   %ecx,%ecx
    jnz     _DivRemU64x64
    movl    20(%esp),%ecx
    jecxz   L1
    and     $0,4(%ecx)
    movl    %ecx,16(%esp)
L1: 
    jmp     _InternalMathDivRemU64x32


.global DivRemU64x64
DivRemU64x64:
# MISMATCH: "DivRemU64x64:    USES    ebx esi edi"
    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
    push   %edi                                        
    push   %esi                                                                             
    push   %ebx                                                                             
    ret