Code/Resource
Windows Develop
Linux-Unix program
Internet-Socket-Network
Web Server
Browser Client
Ftp Server
Ftp Client
Browser Plugins
Proxy Server
Email Server
Email Client
WEB Mail
Firewall-Security
Telnet Server
Telnet Client
ICQ-IM-Chat
Search Engine
Sniffer Package capture
Remote Control
xml-soap-webservice
P2P
WEB(ASP,PHP,...)
TCP/IP Stack
SNMP
Grid Computing
SilverLight
DNS
Cluster Service
Network Security
Communication-Mobile
Game Program
Editor
Multimedia program
Graph program
Compiler program
Compress-Decompress algrithms
Crypt_Decrypt algrithms
Mathimatics-Numerical algorithms
MultiLanguage
Disk/Storage
Java Develop
assembly language
Applications
Other systems
Database system
Embeded-SCM Develop
FlashMX/Flex
source in ebook
Delphi VCL
OS Develop
MiddleWare
MPI
MacOS develop
LabView
ELanguage
Software/Tools
E-Books
Artical/Document
bdiv_dbm1c.asm
Package: gmp-5.0.1.tar.gz [view]
Upload User: qaz666999
Upload Date: 2022-08-06
Package Size: 2570k
Code Size: 2k
Category:
Algorithm
Development Platform:
Unix_Linux
- dnl PPC32 mpn_bdiv_dbm1c.
- dnl Copyright 2008 Free Software Foundation, Inc.
- dnl This file is part of the GNU MP Library.
- dnl The GNU MP Library is free software; you can redistribute it and/or modify
- dnl it under the terms of the GNU Lesser General Public License as published
- dnl by the Free Software Foundation; either version 3 of the License, or (at
- dnl your option) any later version.
- dnl The GNU MP Library is distributed in the hope that it will be useful, but
- dnl WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
- dnl or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
- dnl License for more details.
- dnl You should have received a copy of the GNU Lesser General Public License
- dnl along with the GNU MP Library. If not, see http://www.gnu.org/licenses/.
- include(`../config.m4')
- C cycles/limb
- C 603e: ?
- C 604e: ?
- C 75x (G3): ?
- C 7400,7410 (G4): 9.43
- C 744x,745x (G4+): 6.28
- C power4/ppc970: ?
- C power5: ?
- C TODO
- C * Nothing to do...
- C INPUT PARAMETERS
- define(`rp', `r3')
- define(`up', `r4')
- define(`n', `r5')
- define(`bd', `r6')
- define(`cy', `r7')
- ASM_START()
- PROLOGUE(mpn_bdiv_dbm1c)
- lwz r0, 0(r4)
- rlwinm. r12, r5, 0,30,31
- cmplwi cr6, r12, 2
- cmplwi cr7, r5, 4
- addi r5, r5, 1
- srwi r5, r5, 2
- mtctr r5
- beq cr0, L(b00)
- blt cr6, L(b01)
- beq cr6, L(b10)
- L(b11): mullw r5, r0, r6
- mulhwu r12, r0, r6
- lwz r0, 4(r4)
- addi r4, r4, -12
- addi r3, r3, -12
- b L(3)
- L(b00): mullw r9, r0, r6
- mulhwu r8, r0, r6
- lwz r0, 4(r4)
- addi r4, r4, -8
- addi r3, r3, -8
- b L(0)
- L(b01): mullw r5, r0, r6
- mulhwu r12, r0, r6
- addi r3, r3, -4
- ble cr7, L(e1)
- lwz r0, 4(r4)
- addi r4, r4, -4
- b L(1)
- L(b10): mullw r9, r0, r6
- mulhwu r8, r0, r6
- lwz r0, 4(r4)
- ble cr7, L(e2)
- ALIGN(16)
- L(top): mullw r5, r0, r6
- mulhwu r12, r0, r6
- subfc r11, r9, r7
- lwz r0, 8(r4)
- subfe r7, r8, r11
- stw r11, 0(r3)
- L(1): mullw r9, r0, r6
- mulhwu r8, r0, r6
- subfc r11, r5, r7
- lwz r0, 12(r4)
- subfe r7, r12, r11
- stw r11, 4(r3)
- L(0): mullw r5, r0, r6
- mulhwu r12, r0, r6
- subfc r11, r9, r7
- lwz r0, 16(r4)
- subfe r7, r8, r11
- stw r11, 8(r3)
- L(3): mullw r9, r0, r6
- mulhwu r8, r0, r6
- subfc r11, r5, r7
- lwz r0, 20(r4)
- subfe r7, r12, r11
- stw r11, 12(r3)
- addi r4, r4, 16
- addi r3, r3, 16
- bdnz L(top)
- L(e2): mullw r5, r0, r6
- mulhwu r12, r0, r6
- subfc r11, r9, r7
- subfe r7, r8, r11
- stw r11, 0(r3)
- L(e1): subfc r11, r5, r7
- stw r11, 4(r3)
- subfe r3, r12, r11
- blr
- EPILOGUE()