security/nss/lib/freebl/mpi/montmulfv8.il

Wed, 31 Dec 2014 06:09:35 +0100

author
Michael Schloh von Bennewitz <michael@schloh.com>
date
Wed, 31 Dec 2014 06:09:35 +0100
changeset 0
6474c204b198
permissions
-rw-r--r--

Cloned upstream origin tor-browser at tor-browser-31.3.0esr-4.5-1-build1
revision ID fc1c9ff7c1b2defdbc039f12214767608f46423f for hacking purpose.

michael@0 1 !
michael@0 2 ! This Source Code Form is subject to the terms of the Mozilla Public
michael@0 3 ! License, v. 2.0. If a copy of the MPL was not distributed with this
michael@0 4 ! file, You can obtain one at http://mozilla.org/MPL/2.0/.
michael@0 5
michael@0 6 !
michael@0 7 ! double upper32(double /*frs1*/);
michael@0 8 !
michael@0 9 .inline upper32,8
michael@0 10 std %o0,[%sp+0x48]
michael@0 11 ldd [%sp+0x48],%f10
michael@0 12
michael@0 13 fdtox %f10,%f10
michael@0 14 fitod %f10,%f0
michael@0 15 .end
michael@0 16
michael@0 17 !
michael@0 18 ! double lower32(double /*frs1*/, double /* Zero */);
michael@0 19 !
michael@0 20 .inline lower32,8
michael@0 21 std %o0,[%sp+0x48]
michael@0 22 ldd [%sp+0x48],%f10
michael@0 23 std %o2,[%sp+0x48]
michael@0 24 ldd [%sp+0x48],%f12
michael@0 25
michael@0 26 fdtox %f10,%f10
michael@0 27 fmovs %f12,%f10
michael@0 28 fxtod %f10,%f0
michael@0 29 .end
michael@0 30
michael@0 31 !
michael@0 32 ! double mod(double /*x*/, double /*1/m*/, double /*m*/);
michael@0 33 !
michael@0 34 .inline mod,12
michael@0 35 std %o0,[%sp+0x48]
michael@0 36 ldd [%sp+0x48],%f2
michael@0 37 std %o2,[%sp+0x48]
michael@0 38 ldd [%sp+0x48],%f4
michael@0 39 std %o4,[%sp+0x48]
michael@0 40 ldd [%sp+0x48],%f6
michael@0 41
michael@0 42 fmuld %f2,%f4,%f4
michael@0 43 fdtox %f4,%f4
michael@0 44 fxtod %f4,%f4
michael@0 45 fmuld %f4,%f6,%f4
michael@0 46 fsubd %f2,%f4,%f0
michael@0 47 .end
michael@0 48
michael@0 49
michael@0 50 !
michael@0 51 ! void i16_to_d16_and_d32x4(double * /*1/(2^16)*/, double * /* 2^16*/,
michael@0 52 ! double * /* 0 */,
michael@0 53 ! double * /*result16*/, double * /* result32 */
michael@0 54 ! float * /*source - should be unsigned int*
michael@0 55 ! converted to float* */);
michael@0 56 !
michael@0 57 .inline i16_to_d16_and_d32x4,24
michael@0 58 ldd [%o0],%f2 ! 1/(2^16)
michael@0 59 ldd [%o1],%f4 ! 2^16
michael@0 60 ldd [%o2],%f22
michael@0 61
michael@0 62 fmovd %f22,%f6
michael@0 63 ld [%o5],%f7
michael@0 64 fmovd %f22,%f10
michael@0 65 ld [%o5+4],%f11
michael@0 66 fmovd %f22,%f14
michael@0 67 ld [%o5+8],%f15
michael@0 68 fmovd %f22,%f18
michael@0 69 ld [%o5+12],%f19
michael@0 70 fxtod %f6,%f6
michael@0 71 std %f6,[%o4]
michael@0 72 fxtod %f10,%f10
michael@0 73 std %f10,[%o4+8]
michael@0 74 fxtod %f14,%f14
michael@0 75 std %f14,[%o4+16]
michael@0 76 fxtod %f18,%f18
michael@0 77 std %f18,[%o4+24]
michael@0 78 fmuld %f2,%f6,%f8
michael@0 79 fmuld %f2,%f10,%f12
michael@0 80 fmuld %f2,%f14,%f16
michael@0 81 fmuld %f2,%f18,%f20
michael@0 82 fdtox %f8,%f8
michael@0 83 fdtox %f12,%f12
michael@0 84 fdtox %f16,%f16
michael@0 85 fdtox %f20,%f20
michael@0 86 fxtod %f8,%f8
michael@0 87 std %f8,[%o3+8]
michael@0 88 fxtod %f12,%f12
michael@0 89 std %f12,[%o3+24]
michael@0 90 fxtod %f16,%f16
michael@0 91 std %f16,[%o3+40]
michael@0 92 fxtod %f20,%f20
michael@0 93 std %f20,[%o3+56]
michael@0 94 fmuld %f8,%f4,%f8
michael@0 95 fmuld %f12,%f4,%f12
michael@0 96 fmuld %f16,%f4,%f16
michael@0 97 fmuld %f20,%f4,%f20
michael@0 98 fsubd %f6,%f8,%f8
michael@0 99 std %f8,[%o3]
michael@0 100 fsubd %f10,%f12,%f12
michael@0 101 std %f12,[%o3+16]
michael@0 102 fsubd %f14,%f16,%f16
michael@0 103 std %f16,[%o3+32]
michael@0 104 fsubd %f18,%f20,%f20
michael@0 105 std %f20,[%o3+48]
michael@0 106 .end
michael@0 107
michael@0 108

mercurial