Quelle  divdi3.S   Sprache: Sparc

/* SPDX-License-Identifier: GPL-2.0-or-later */
/* Copyright (C) 1989, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.

This file is part of GNU CC.

 */

#include <linux/export.h>
 .text
 .align 4
 .globl __divdi3
__divdi3:
 save %sp,-104,%sp
 cmp %i0,0
 bge .LL40
 mov 0,%l4
 mov -1,%l4
 sub %g0,%i1,%o0
 mov %o0,%o5
 subcc %g0,%o0,%g0
 sub %g0,%i0,%o0
 subx %o0,0,%o4
 mov %o4,%i0
 mov %o5,%i1
.LL40:
 cmp %i2,0
 bge .LL84
 mov %i3,%o4
 xnor %g0,%l4,%l4
 sub %g0,%i3,%o0
 mov %o0,%o3
 subcc %g0,%o0,%g0
 sub %g0,%i2,%o0
 subx %o0,0,%o2
 mov %o2,%i2
 mov %o3,%i3
 mov %i3,%o4
.LL84:
 cmp %i2,0
 bne .LL45
 mov %i1,%i3
 cmp %o4,%i0
 bleu .LL46
 mov %i3,%o1
 mov 32,%g1
 subcc %i0,%o4,%g0
1: bcs 5f
  addxcc %o1,%o1,%o1 ! shift n1n0 and a q-bit in lsb
 sub %i0,%o4,%i0 ! this kills msb of n
 addx %i0,%i0,%i0 ! so this cannot give carry
 subcc %g1,1,%g1
2: bne 1b
  subcc %i0,%o4,%g0
 bcs 3f
  addxcc %o1,%o1,%o1 ! shift n1n0 and a q-bit in lsb
 b 3f
  sub %i0,%o4,%i0 ! this kills msb of n
4: sub %i0,%o4,%i0
5: addxcc %i0,%i0,%i0
 bcc 2b
  subcc %g1,1,%g1
! Got carry from n.  Subtract next step to cancel this carry.
 bne 4b
  addcc %o1,%o1,%o1 ! shift n1n0 and a 0-bit in lsb
 sub %i0,%o4,%i0
3: xnor %o1,0,%o1
 b .LL50
 mov 0,%o2
.LL46:
 cmp %o4,0
 bne .LL85
 mov %i0,%o2
 mov 1,%o0
 mov 0,%o1
 wr %g0, 0, %y
 udiv %o0, %o1, %o0
 mov %o0,%o4
 mov %i0,%o2
.LL85:
 mov 0,%g3
 mov 32,%g1
 subcc %g3,%o4,%g0
1: bcs 5f
  addxcc %o2,%o2,%o2 ! shift n1n0 and a q-bit in lsb
 sub %g3,%o4,%g3 ! this kills msb of n
 addx %g3,%g3,%g3 ! so this cannot give carry
 subcc %g1,1,%g1
2: bne 1b
  subcc %g3,%o4,%g0
 bcs 3f
  addxcc %o2,%o2,%o2 ! shift n1n0 and a q-bit in lsb
 b 3f
  sub %g3,%o4,%g3 ! this kills msb of n
4: sub %g3,%o4,%g3
5: addxcc %g3,%g3,%g3
 bcc 2b
  subcc %g1,1,%g1
! Got carry from n.  Subtract next step to cancel this carry.
 bne 4b
  addcc %o2,%o2,%o2 ! shift n1n0 and a 0-bit in lsb
 sub %g3,%o4,%g3
3: xnor %o2,0,%o2
 mov %g3,%i0
 mov %i3,%o1
 mov 32,%g1
 subcc %i0,%o4,%g0
1: bcs 5f
  addxcc %o1,%o1,%o1 ! shift n1n0 and a q-bit in lsb
 sub %i0,%o4,%i0 ! this kills msb of n
 addx %i0,%i0,%i0 ! so this cannot give carry
 subcc %g1,1,%g1
2: bne 1b
  subcc %i0,%o4,%g0
 bcs 3f
  addxcc %o1,%o1,%o1 ! shift n1n0 and a q-bit in lsb
 b 3f
  sub %i0,%o4,%i0 ! this kills msb of n
4: sub %i0,%o4,%i0
5: addxcc %i0,%i0,%i0
 bcc 2b
  subcc %g1,1,%g1
! Got carry from n.  Subtract next step to cancel this carry.
 bne 4b
  addcc %o1,%o1,%o1 ! shift n1n0 and a 0-bit in lsb
 sub %i0,%o4,%i0
3: xnor %o1,0,%o1
 b .LL86
 mov %o1,%l1
.LL45:
 cmp %i2,%i0
 bleu .LL51
 sethi %hi(65535),%o0
 b .LL78
 mov 0,%o1
.LL51:
 or %o0,%lo(65535),%o0
 cmp %i2,%o0
 bgu .LL58
 mov %i2,%o1
 cmp %i2,256
 addx %g0,-1,%o0
 b .LL64
 and %o0,8,%o2
.LL58:
 sethi %hi(16777215),%o0
 or %o0,%lo(16777215),%o0
 cmp %i2,%o0
 bgu .LL64
 mov 24,%o2
 mov 16,%o2
.LL64:
 srl %o1,%o2,%o0
 sethi %hi(__clz_tab),%o1
 or %o1,%lo(__clz_tab),%o1
 ldub [%o0+%o1],%o0
 add %o0,%o2,%o0
 mov 32,%o1
 subcc %o1,%o0,%o3
 bne,a .LL72
 sub %o1,%o3,%o1
 cmp %i0,%i2
 bgu .LL74
 cmp %i3,%o4
 blu .LL78
 mov 0,%o1
.LL74:
 b .LL78
 mov 1,%o1
.LL72:
 sll %i2,%o3,%o2
 srl %o4,%o1,%o0
 or %o2,%o0,%i2
 sll %o4,%o3,%o4
 srl %i0,%o1,%o2
 sll %i0,%o3,%o0
 srl %i3,%o1,%o1
 or %o0,%o1,%i0
 sll %i3,%o3,%i3
 mov %i0,%o1
 mov 32,%g1
 subcc %o2,%i2,%g0
1: bcs 5f
  addxcc %o1,%o1,%o1 ! shift n1n0 and a q-bit in lsb
 sub %o2,%i2,%o2 ! this kills msb of n
 addx %o2,%o2,%o2 ! so this cannot give carry
 subcc %g1,1,%g1
2: bne 1b
  subcc %o2,%i2,%g0
 bcs 3f
  addxcc %o1,%o1,%o1 ! shift n1n0 and a q-bit in lsb
 b 3f
  sub %o2,%i2,%o2 ! this kills msb of n
4: sub %o2,%i2,%o2
5: addxcc %o2,%o2,%o2
 bcc 2b
  subcc %g1,1,%g1
! Got carry from n.  Subtract next step to cancel this carry.
 bne 4b
  addcc %o1,%o1,%o1 ! shift n1n0 and a 0-bit in lsb
 sub %o2,%i2,%o2
3: xnor %o1,0,%o1
 mov %o2,%i0
 wr %g0,%o1,%y ! SPARC has 0-3 delay insn after a wr
 sra %o4,31,%g2 ! Do not move this insn
 and %o1,%g2,%g2 ! Do not move this insn
 andcc %g0,0,%g1 ! Do not move this insn
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,%o4,%g1
 mulscc %g1,0,%g1
 add %g1,%g2,%o0
 rd %y,%o2
 cmp %o0,%i0
 bgu,a .LL78
 add %o1,-1,%o1
 bne,a .LL50
 mov 0,%o2
 cmp %o2,%i3
 bleu .LL50
 mov 0,%o2
 add %o1,-1,%o1
.LL78:
 mov 0,%o2
.LL50:
 mov %o1,%l1
.LL86:
 mov %o2,%l0
 mov %l0,%i0
 mov %l1,%i1
 cmp %l4,0
 be .LL81
 sub %g0,%i1,%o0
 mov %o0,%l3
 subcc %g0,%o0,%g0
 sub %g0,%i0,%o0
 subx %o0,0,%l2
 mov %l2,%i0
 mov %l3,%i1
.LL81:
 ret
 restore
EXPORT_SYMBOL(__divdi3)