1# Copyright (c) 2007 The Hewlett-Packard Development Company
2# All rights reserved.
3#
4# The license below extends only to copyright in the software and shall
5# not be construed as granting a license to any other intellectual
6# property including but not limited to intellectual property relating
7# to a hardware implementation of the functionality of the software
8# licensed hereunder.  You may use the software subject to the license
9# terms below provided that you ensure that this notice is replicated
10# unmodified and in its entirety in all distributions of the software,
11# modified or unmodified, in source code or in binary form.
12#
13# Redistribution and use in source and binary forms, with or without
14# modification, are permitted provided that the following conditions are
15# met: redistributions of source code must retain the above copyright
16# notice, this list of conditions and the following disclaimer;
17# redistributions in binary form must reproduce the above copyright
18# notice, this list of conditions and the following disclaimer in the
19# documentation and/or other materials provided with the distribution;
20# neither the name of the copyright holders nor the names of its
21# contributors may be used to endorse or promote products derived from
22# this software without specific prior written permission.
23#
24# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
25# "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
26# LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
27# A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
28# OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
29# SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
30# LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
31# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
32# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
33# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
34# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
35#
36# Authors: Gabe Black
37
38microcode = '''
39def macroop HADDPS_XMM_XMM {
40    shuffle ufp1, xmml, xmmh, ext=((0 << 0) | (2 << 2)), size=4
41    shuffle ufp2, xmml, xmmh, ext=((1 << 0) | (3 << 2)), size=4
42    shuffle ufp3, xmmlm, xmmhm, ext=((0 << 0) | (2 << 2)), size=4
43    shuffle ufp4, xmmlm, xmmhm, ext=((1 << 0) | (3 << 2)), size=4
44
45    maddf xmml, ufp1, ufp2, size=4
46    maddf xmmh, ufp3, ufp4, size=4
47};
48
49def macroop HADDPS_XMM_M {
50    ldfp ufp1, seg, sib, disp, dataSize=8
51    ldfp ufp2, seg, sib, "DISPLACEMENT+8", dataSize=8
52
53    shuffle ufp3, xmml, xmmh, ext=((0 << 0) | (2 << 2)), size=4
54    shuffle ufp4, xmml, xmmh, ext=((1 << 0) | (3 << 2)), size=4
55    shuffle ufp5, ufp1, ufp2, ext=((0 << 0) | (2 << 2)), size=4
56    shuffle ufp6, ufp1, ufp2, ext=((1 << 0) | (3 << 2)), size=4
57
58    maddf xmml, ufp3, ufp4, size=4
59    maddf xmmh, ufp5, ufp6, size=4
60};
61
62def macroop HADDPS_XMM_P {
63    rdip t7
64    ldfp ufp1, seg, riprel, disp, dataSize=8
65    ldfp ufp2, seg, riprel, "DISPLACEMENT+8", dataSize=8
66
67    shuffle ufp3, xmml, xmmh, ext=((0 << 0) | (2 << 2)), size=4
68    shuffle ufp4, xmml, xmmh, ext=((1 << 0) | (3 << 2)), size=4
69    shuffle ufp5, ufp1, ufp2, ext=((0 << 0) | (2 << 2)), size=4
70    shuffle ufp6, ufp1, ufp2, ext=((1 << 0) | (3 << 2)), size=4
71
72    maddf xmml, ufp3, ufp4, size=4
73    maddf xmmh, ufp5, ufp6, size=4
74};
75
76def macroop HADDPD_XMM_XMM {
77    maddf ufp1, xmmh , xmml, size=8, ext=Scalar
78    maddf xmmh, xmmlm, xmmhm, size=8, ext=Scalar
79    movfp xmml, ufp1
80};
81
82def macroop HADDPD_XMM_M {
83    ldfp ufp1, seg, sib, disp, dataSize=8
84    ldfp ufp2, seg, sib, "DISPLACEMENT+8", dataSize=8
85    maddf xmml, xmmh, xmml, size=8, ext=Scalar
86    maddf xmmh, ufp1, ufp2, size=8, ext=Scalar
87};
88
89def macroop HADDPD_XMM_P {
90    rdip t7
91    ldfp ufp1, seg, riprel, disp, dataSize=8
92    ldfp ufp2, seg, riprel, "DISPLACEMENT+8", dataSize=8
93    maddf xmml, xmmh, xmml, size=8, ext=Scalar
94    maddf xmmh, ufp1, ufp2, size=8, ext=Scalar
95};
96'''
97