← Back to branch summary

~ubuntu-branches/ubuntu/karmic/gnupg2/karmic-updates

« back to all changes in this revision

Viewing changes to mpi/sparc32v8/mpih-mul2.S

  • Committer: Bazaar Package Importer
  • Author(s): Matthias Urlichs
  • Date: 2006-01-24 04:31:42 UTC
  • mfrom: (1.1.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20060124043142-pbg192or6qxv3yk2
Tags: 1.9.20-1
http://bugs.debian.org/306890
http://bugs.debian.org/344530
http://bugs.debian.org/320490
http://bugs.debian.org/348106
* New Upstream version. Closes:#306890,#344530
  * Closes:#320490: gpg-protect-tool fails to decrypt PKCS-12 files 
* Depend on libopensc2-dev, not -1-. Closes:#348106

Show diffs side-by-side

added added

removed removed

Lines of Context:
mpi/sparc32v8/mpih-mul2.S
 
1
/* SPARC v8 __mpn_addmul_1 -- Multiply a limb vector with a limb and
 
2
 *                            add the result to a second limb vector.
 
3
 *
 
4
 *      Copyright (C) 1992, 1993, 1994, 1995, 1998, 
 
5
 *                    2001 Free Software Foundation, Inc.
 
6
 *       
 
7
 * This file is part of GnuPG.
 
8
 *
 
9
 * GnuPG is free software; you can redistribute it and/or modify
 
10
 * it under the terms of the GNU General Public License as published by
 
11
 * the Free Software Foundation; either version 2 of the License, or
 
12
 * (at your option) any later version.
 
13
 *
 
14
 * GnuPG is distributed in the hope that it will be useful,
 
15
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 
16
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
17
 * GNU General Public License for more details.
 
18
 *
 
19
 * You should have received a copy of the GNU General Public License
 
20
 * along with this program; if not, write to the Free Software
 
21
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
 
22
 *
 
23
 * Note: This code is heavily based on the GNU MP Library.
 
24
 *       Actually it's the same code with only minor changes in the
 
25
 *       way the data is stored; this is to support the abstraction
 
26
 *       of an optional secure memory allocation which may be used
 
27
 *       to avoid revealing of sensitive data due to paging etc.
 
28
 *       The GNU MP Library itself is published under the LGPL;
 
29
 *       however I decided to publish this code under the plain GPL.
 
30
 */
 
31
 
 
32
 
 
33
 
 
34
! INPUT PARAMETERS
 
35
! res_ptr       o0
 
36
! s1_ptr        o1
 
37
! size          o2
 
38
! s2_limb       o3
 
39
 
 
40
#include "sysdep.h"
 
41
 
 
42
.text
 
43
        .align 4
 
44
        .global C_SYMBOL_NAME(mpihelp_addmul_1)
 
45
C_SYMBOL_NAME(mpihelp_addmul_1):
 
46
        orcc    %g0,%g0,%g2
 
47
        ld      [%o1+0],%o4     ! 1
 
48
 
 
49
        sll     %o2,4,%g1
 
50
        and     %g1,(4-1)<<4,%g1
 
51
#if PIC
 
52
        mov     %o7,%g4                 ! Save return address register
 
53
        call    1f
 
54
        add     %o7,LL-1f,%g3
 
55
1:      mov     %g4,%o7                 ! Restore return address register
 
56
#else
 
57
        sethi   %hi(LL),%g3
 
58
        or      %g3,%lo(LL),%g3
 
59
#endif
 
60
        jmp     %g3+%g1
 
61
        nop
 
62
LL:
 
63
LL00:   add     %o0,-4,%o0
 
64
        b       Loop00          /* 4, 8, 12, ... */
 
65
        add     %o1,-4,%o1
 
66
        nop
 
67
LL01:   b       Loop01          /* 1, 5, 9, ... */
 
68
        nop
 
69
        nop
 
70
        nop
 
71
LL10:   add     %o0,-12,%o0     /* 2, 6, 10, ... */
 
72
        b       Loop10
 
73
        add     %o1,4,%o1
 
74
        nop
 
75
LL11:   add     %o0,-8,%o0      /* 3, 7, 11, ... */
 
76
        b       Loop11
 
77
        add     %o1,-8,%o1
 
78
        nop
 
79
 
 
80
1:      addcc   %g3,%g2,%g3     ! 1
 
81
        ld      [%o1+4],%o4     ! 2
 
82
        rd      %y,%g2          ! 1
 
83
        addx    %g0,%g2,%g2
 
84
        ld      [%o0+0],%g1     ! 2
 
85
        addcc   %g1,%g3,%g3
 
86
        st      %g3,[%o0+0]     ! 1
 
87
Loop00: umul    %o4,%o3,%g3     ! 2
 
88
        ld      [%o0+4],%g1     ! 2
 
89
        addxcc  %g3,%g2,%g3     ! 2
 
90
        ld      [%o1+8],%o4     ! 3
 
91
        rd      %y,%g2          ! 2
 
92
        addx    %g0,%g2,%g2
 
93
        nop
 
94
        addcc   %g1,%g3,%g3
 
95
        st      %g3,[%o0+4]     ! 2
 
96
Loop11: umul    %o4,%o3,%g3     ! 3
 
97
        addxcc  %g3,%g2,%g3     ! 3
 
98
        ld      [%o1+12],%o4    ! 4
 
99
        rd      %y,%g2          ! 3
 
100
        add     %o1,16,%o1
 
101
        addx    %g0,%g2,%g2
 
102
        ld      [%o0+8],%g1     ! 2
 
103
        addcc   %g1,%g3,%g3
 
104
        st      %g3,[%o0+8]     ! 3
 
105
Loop10: umul    %o4,%o3,%g3     ! 4
 
106
        addxcc  %g3,%g2,%g3     ! 4
 
107
        ld      [%o1+0],%o4     ! 1
 
108
        rd      %y,%g2          ! 4
 
109
        addx    %g0,%g2,%g2
 
110
        ld      [%o0+12],%g1    ! 2
 
111
        addcc   %g1,%g3,%g3
 
112
        st      %g3,[%o0+12]    ! 4
 
113
        add     %o0,16,%o0
 
114
        addx    %g0,%g2,%g2
 
115
Loop01: addcc   %o2,-4,%o2
 
116
        bg      1b
 
117
        umul    %o4,%o3,%g3     ! 1
 
118
 
 
119
        addcc   %g3,%g2,%g3     ! 4
 
120
        rd      %y,%g2          ! 4
 
121
        addx    %g0,%g2,%g2
 
122
        ld      [%o0+0],%g1     ! 2
 
123
        addcc   %g1,%g3,%g3
 
124
        st      %g3,[%o0+0]     ! 4
 
125
        addx    %g0,%g2,%o0
 
126
 
 
127
        retl
 
128
         nop
 
129
 
 
130
 
 
131
!       umul, ld, addxcc, rd, st
 
132
 
 
133
!       umul, ld, addxcc, rd, ld, addcc, st, addx
 
134