call.py (7872:b21a94bf6a28) call.py (9700:2ea56473f400)
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 CALL_NEAR_I
40{
41 # Make the default data size of calls 64 bits in 64 bit mode
42 .adjust_env oszIn64Override
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 CALL_NEAR_I
40{
41 # Make the default data size of calls 64 bits in 64 bit mode
42 .adjust_env oszIn64Override
43 .function_call
43
44 limm t1, imm
45 rdip t7
46 # Check target of call
47 st t7, ss, [0, t0, rsp], "-env.dataSize"
48 subi rsp, rsp, ssz
49 wrip t7, t1
50};
51
52def macroop CALL_NEAR_R
53{
54 # Make the default data size of calls 64 bits in 64 bit mode
55 .adjust_env oszIn64Override
44
45 limm t1, imm
46 rdip t7
47 # Check target of call
48 st t7, ss, [0, t0, rsp], "-env.dataSize"
49 subi rsp, rsp, ssz
50 wrip t7, t1
51};
52
53def macroop CALL_NEAR_R
54{
55 # Make the default data size of calls 64 bits in 64 bit mode
56 .adjust_env oszIn64Override
57 .function_call
56
57 rdip t1
58 # Check target of call
59 st t1, ss, [0, t0, rsp], "-env.dataSize"
60 subi rsp, rsp, ssz
61 wripi reg, 0
62};
63
64def macroop CALL_NEAR_M
65{
66 # Make the default data size of calls 64 bits in 64 bit mode
67 .adjust_env oszIn64Override
58
59 rdip t1
60 # Check target of call
61 st t1, ss, [0, t0, rsp], "-env.dataSize"
62 subi rsp, rsp, ssz
63 wripi reg, 0
64};
65
66def macroop CALL_NEAR_M
67{
68 # Make the default data size of calls 64 bits in 64 bit mode
69 .adjust_env oszIn64Override
70 .function_call
68
69 rdip t7
70 ld t1, seg, sib, disp
71 # Check target of call
72 st t7, ss, [0, t0, rsp], "-env.dataSize"
73 subi rsp, rsp, ssz
74 wripi t1, 0
75};
76
77def macroop CALL_NEAR_P
78{
79 # Make the default data size of calls 64 bits in 64 bit mode
80 .adjust_env oszIn64Override
71
72 rdip t7
73 ld t1, seg, sib, disp
74 # Check target of call
75 st t7, ss, [0, t0, rsp], "-env.dataSize"
76 subi rsp, rsp, ssz
77 wripi t1, 0
78};
79
80def macroop CALL_NEAR_P
81{
82 # Make the default data size of calls 64 bits in 64 bit mode
83 .adjust_env oszIn64Override
84 .function_call
81
82 rdip t7
83 ld t1, seg, riprel, disp
84 # Check target of call
85 st t7, ss, [0, t0, rsp], "-env.dataSize"
86 subi rsp, rsp, ssz
87 wripi t1, 0
88};
89'''
90#let {{
91# class CALL(Inst):
92# "GenFault ${new UnimpInstFault}"
93#}};
85
86 rdip t7
87 ld t1, seg, riprel, disp
88 # Check target of call
89 st t7, ss, [0, t0, rsp], "-env.dataSize"
90 subi rsp, rsp, ssz
91 wripi t1, 0
92};
93'''
94#let {{
95# class CALL(Inst):
96# "GenFault ${new UnimpInstFault}"
97#}};