1# Copyright (c) 2007 The Hewlett-Packard Development Company
2# Copyright (c) 2012-2013 AMD
3# All rights reserved.
4#
5# The license below extends only to copyright in the software and shall
6# not be construed as granting a license to any other intellectual
7# property including but not limited to intellectual property relating
8# to a hardware implementation of the functionality of the software
9# licensed hereunder.  You may use the software subject to the license
10# terms below provided that you ensure that this notice is replicated
11# unmodified and in its entirety in all distributions of the software,
12# modified or unmodified, in source code or in binary form.
13#
14# Redistribution and use in source and binary forms, with or without
15# modification, are permitted provided that the following conditions are
16# met: redistributions of source code must retain the above copyright
17# notice, this list of conditions and the following disclaimer;
18# redistributions in binary form must reproduce the above copyright
19# notice, this list of conditions and the following disclaimer in the
20# documentation and/or other materials provided with the distribution;
21# neither the name of the copyright holders nor the names of its
22# contributors may be used to endorse or promote products derived from
23# this software without specific prior written permission.
24#
25# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
26# "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
27# LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
28# A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
29# OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
30# SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
31# LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
32# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
33# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
34# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
35# OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
36#
37# Authors: Gabe Black
38
39microcode = '''
40def macroop JMP_I
41{
42    # Make the default data size of jumps 64 bits in 64 bit mode
43    .adjust_env oszIn64Override
44
45    rdip t1
46    limm t2, imm
47    wrip t1, t2
48};
49
50def macroop JMP_R
51{
52    # Make the default data size of jumps 64 bits in 64 bit mode
53    .adjust_env oszIn64Override
54
55    wripi reg, 0
56};
57
58def macroop JMP_M
59{
60    # Make the default data size of jumps 64 bits in 64 bit mode
61    .adjust_env oszIn64Override
62
63    ld t1, seg, sib, disp
64    wripi t1, 0
65};
66
67def macroop JMP_P
68{
69    # Make the default data size of jumps 64 bits in 64 bit mode
70    .adjust_env oszIn64Override
71
72    rdip t7
73    ld t1, seg, riprel, disp
74    wripi t1, 0
75};
76
77def macroop JMP_FAR_M
78{
79    limm t1, 0, dataSize=8
80    limm t2, 0, dataSize=8
81    lea t1, seg, sib, disp, dataSize=asz
82    ld t2, seg, [1, t0, t1], dsz
83    ld t1, seg, [1, t0, t1]
84    br rom_label("jmpFarWork")
85};
86
87def macroop JMP_FAR_P
88{
89    limm t1, 0, dataSize=8
90    limm t2, 0, dataSize=8
91    rdip t7, dataSize=asz
92    lea t1, seg, riprel, disp, dataSize=asz
93    ld t2, seg, [1, t0, t1], dsz
94    ld t1, seg, [1, t0, t1]
95    br rom_label("jmpFarWork")
96};
97
98def macroop JMP_FAR_I
99{
100    # Put the whole far pointer into a register.
101    limm t2, imm, dataSize=8
102    # Figure out the width of the offset.
103    limm t3, dsz, dataSize=8
104    slli t3, t3, 3, dataSize=8
105    # Get the offset into t1.
106    mov t1, t0, t2
107    # Get the selector into t2.
108    srl t2, t2, t3, dataSize=8
109    mov t2, t0, t2, dataSize=2
110    br rom_label("jmpFarWork")
111};
112
113def rom
114{
115    extern jmpFarWork:
116    # t1 has the offset and t2 has the new selector.
117    # This is intended to run in protected mode.
118    andi t0, t2, 0xFC, flags=(EZF,), dataSize=2
119    fault "std::make_shared<GeneralProtection>(0)", flags=(CEZF,)
120    andi t3, t2, 0xF8, dataSize=8
121    andi t0, t2, 0x4, flags=(EZF,), dataSize=2
122    br rom_local_label("farJmpGlobalDescriptor"), flags=(CEZF,)
123    ld t4, tsl, [1, t0, t3], dataSize=8, addressSize=8, atCPL0=True
124    br rom_local_label("farJmpProcessDescriptor")
125farJmpGlobalDescriptor:
126    ld t4, tsg, [1, t0, t3], dataSize=8, addressSize=8, atCPL0=True
127farJmpProcessDescriptor:
128    rcri t0, t4, 13, flags=(ECF,), dataSize=2
129    br rom_local_label("farJmpSystemDescriptor"), flags=(nCECF,)
130    chks t2, t4, CSCheck, dataSize=8
131    wrdl cs, t4, t2, dataSize=4
132    wrsel cs, t2, dataSize=4
133    wrip t0, t1, dataSize=4
134    eret
135
136farJmpSystemDescriptor:
137    panic "Far jumps to system descriptors aren't implemented"
138    eret
139};
140
141def macroop JMP_FAR_REAL_M
142{
143    lea t1, seg, sib, disp, dataSize=asz
144    ld t2, seg, [1, t0, t1], dsz
145    ld t1, seg, [1, t0, t1]
146    zexti t3, t1, 15, dataSize=8
147    slli t3, t3, 4, dataSize=8
148    wrsel cs, t1, dataSize=2
149    wrbase cs, t3, dataSize=8
150    wrip t0, t2, dataSize=asz
151};
152
153def macroop JMP_FAR_REAL_P
154{
155    panic "Real mode far jump executed in 64 bit mode!"
156};
157
158def macroop JMP_FAR_REAL_I
159{
160    # Put the whole far pointer into a register.
161    limm t2, imm, dataSize=8
162    # Figure out the width of the offset.
163    limm t3, dsz, dataSize=8
164    slli t3, t3, 3, dataSize=8
165    # Get the selector into t1.
166    srl t1, t2, t3, dataSize=8
167    mov t1, t0, t1, dataSize=2
168    # And get the offset into t2
169    mov t2, t0, t2
170    slli t3, t1, 4, dataSize=8
171    wrsel cs, t1, dataSize=2
172    wrbase cs, t3, dataSize=8
173    wrip t0, t2, dataSize=asz
174};
175'''
176