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 PSRLW_XMM_XMM {
40    msrl xmmh, xmmh, xmmlm, size=2, ext=0
41    msrl xmml, xmml, xmmlm, size=2, ext=0
42};
43
44def macroop PSRLW_XMM_M {
45    ldfp ufp1, seg, sib, disp, dataSize=8
46    msrl xmml, xmml, ufp1, size=2, ext=0
47    msrl xmmh, xmmh, ufp1, size=2, ext=0
48};
49
50def macroop PSRLW_XMM_P {
51    rdip t7
52    ldfp ufp1, seg, riprel, disp, dataSize=8
53    msrl xmml, xmml, ufp1, size=2, ext=0
54    msrl xmmh, xmmh, ufp1, size=2, ext=0
55};
56
57def macroop PSRLW_XMM_I {
58    msrli xmml, xmml, imm, size=2, ext=0
59    msrli xmmh, xmmh, imm, size=2, ext=0
60};
61
62def macroop PSRLD_XMM_XMM {
63    msrl xmmh, xmmh, xmmlm, size=4, ext=0
64    msrl xmml, xmml, xmmlm, size=4, ext=0
65};
66
67def macroop PSRLD_XMM_M {
68    ldfp ufp1, seg, sib, disp, dataSize=8
69    msrl xmml, xmml, ufp1, size=4, ext=0
70    msrl xmmh, xmmh, ufp1, size=4, ext=0
71};
72
73def macroop PSRLD_XMM_P {
74    rdip t7
75    ldfp ufp1, seg, riprel, disp, dataSize=8
76    msrl xmml, xmml, ufp1, size=4, ext=0
77    msrl xmmh, xmmh, ufp1, size=4, ext=0
78};
79
80def macroop PSRLD_XMM_I {
81    msrli xmml, xmml, imm, size=4, ext=0
82    msrli xmmh, xmmh, imm, size=4, ext=0
83};
84
85def macroop PSRLQ_XMM_XMM {
86    msrl xmmh, xmmh, xmmlm, size=8, ext=0
87    msrl xmml, xmml, xmmlm, size=8, ext=0
88};
89
90def macroop PSRLQ_XMM_M {
91    ldfp ufp1, seg, sib, disp, dataSize=8
92    msrl xmml, xmml, ufp1, size=8, ext=0
93    msrl xmmh, xmmh, ufp1, size=8, ext=0
94};
95
96def macroop PSRLQ_XMM_P {
97    rdip t7
98    ldfp ufp1, seg, riprel, disp, dataSize=8
99    msrl xmml, xmml, ufp1, size=8, ext=0
100    msrl xmmh, xmmh, ufp1, size=8, ext=0
101};
102
103def macroop PSRLQ_XMM_I {
104    msrli xmml, xmml, imm, size=8, ext=0
105    msrli xmmh, xmmh, imm, size=8, ext=0
106};
107
108def macroop PSRLDQ_XMM_I {
109    limm  t2, 8
110    subi t1, t2, imm, flags=(ECF,), dataSize=1
111    br label("psrldq_less_8"), flags=(nCECF,)
112    # Greater than 8
113
114    limm  t2, 16
115    subi t1, t2, imm, flags=(ECF,), dataSize=1
116    br label("psrldq_less_16"), flags=(nCECF,)
117
118    # Greater than 16
119
120    lfpimm  xmml, 0
121    lfpimm  xmmh, 0
122    br label("psrldq_end")
123
124psrldq_less_16:
125
126    # Between 8 and 16
127
128    msrli xmml, xmmh, "(IMMEDIATE-8)<<3", size=8, ext=0
129    lfpimm  xmmh, 0
130    br label("psrldq_end")
131
132psrldq_less_8:
133
134    # Less than 8
135
136    mslli ufp1, xmmh, "(8-IMMEDIATE) << 3", size=8, ext=0
137    msrli xmml, xmml, "IMMEDIATE << 3", size=8, ext=0
138    msrli xmmh, xmmh, "IMMEDIATE << 3", size=8, ext=0
139    mor   xmml, xmml, ufp1
140
141psrldq_end:
142    fault "NoFault"
143};
144'''
145