X-Git-Url: http://git.jankratochvil.net/?p=reactos.git;a=blobdiff_plain;f=ntoskrnl%2Frtl%2Fi386%2Fallmul.s;fp=ntoskrnl%2Frtl%2Fi386%2Fallmul.s;h=ab310d06c6c4ba017b59de10e3cd35c6277dc5e4;hp=0000000000000000000000000000000000000000;hb=ee8b63255465d8c28be3e7bd11628015708fc1ab;hpb=c99688ef1ab339c8746ecc385bde679623084c71

diff --git a/ntoskrnl/rtl/i386/allmul.s b/ntoskrnl/rtl/i386/allmul.s
new file mode 100644
index 0000000..ab310d0
--- /dev/null
+++ b/ntoskrnl/rtl/i386/allmul.s
@@ -0,0 +1,54 @@
+/* $Id$
+ *
+ * COPYRIGHT:         See COPYING in the top level directory
+ * PROJECT:           ReactOS kernel
+ * PURPOSE:           Math support for IA-32
+ * FILE:              ntoskrnl/rtl/i386/allmul.s
+ * PROGRAMER:         Eric Kohl (ekohl@rz-online.de)
+ */
+
+/*
+ * long long
+ * __allmul(long long Multiplier, long long Multiplicand);
+ *
+ * Parameters:
+ *   [ESP+04h] - long long Multiplier
+ *   [ESP+0Ch] - long long Multiplicand
+ * Registers:
+ *   Unknown
+ * Returns:
+ *   EDX:EAX - long long product (Multiplier*Multiplicand)
+ * Notes:
+ *   Routine removes the arguments from the stack.
+ */
+.globl __allmul
+__allmul:
+	pushl	%ebp
+	movl	%esp, %ebp
+	pushl	%edi
+	pushl	%esi
+	pushl	%ebx
+	subl	$12, %esp
+	movl	16(%ebp), %ebx
+	movl	8(%ebp), %eax
+	mull	%ebx
+	movl	20(%ebp), %ecx
+	movl	%eax, -24(%ebp)
+	movl	8(%ebp), %eax
+	movl	%edx, %esi
+	imull	%ecx, %eax
+	addl	%eax, %esi
+	movl	12(%ebp), %eax
+	imull	%eax, %ebx
+	leal	(%ebx,%esi), %eax
+	movl	%eax, -20(%ebp)
+	movl	-24(%ebp), %eax
+	movl	-20(%ebp), %edx
+	addl	$12, %esp
+	popl	%ebx
+	popl	%esi
+	popl	%edi
+	popl	%ebp
+	ret		$0x10
+
+/* EOF */