string_io.py revision 7087:fb8d5786ff30 
1# Copyright (c) 2007-2008 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 INS_M_R {
40    # Find the constant we need to either add or subtract from rdi
41    ruflag t0, 10
42    movi t3, t3, dsz, flags=(CEZF,), dataSize=asz
43    subi t4, t0, dsz, dataSize=asz
44    mov t3, t3, t4, flags=(nCEZF,), dataSize=asz
45
46    zexti t2, reg, 15, dataSize=8
47
48    ld t6, intseg, [1, t2, t0], "IntAddrPrefixIO << 3", addressSize=8
49    st t6, es, [1, t0, rdi]
50
51    add rdi, rdi, t3, dataSize=asz
52};
53
54def macroop INS_E_M_R {
55    and t0, rcx, rcx, flags=(EZF,), dataSize=asz
56    br label("end"), flags=(CEZF,)
57    # Find the constant we need to either add or subtract from rdi
58    ruflag t0, 10
59    movi t3, t3, dsz, flags=(CEZF,), dataSize=asz
60    subi t4, t0, dsz, dataSize=asz
61    mov t3, t3, t4, flags=(nCEZF,), dataSize=asz
62
63    zexti t2, reg, 15, dataSize=8
64
65topOfLoop:
66    ld t6, intseg, [1, t2, t0], "IntAddrPrefixIO << 3", addressSize=8
67    st t6, es, [1, t0, rdi]
68
69    subi rcx, rcx, 1, flags=(EZF,), dataSize=asz
70    add rdi, rdi, t3, dataSize=asz
71    br label("topOfLoop"), flags=(nCEZF,)
72end:
73    fault "NoFault"
74};
75
76def macroop OUTS_R_M {
77    # Find the constant we need to either add or subtract from rdi
78    ruflag t0, 10
79    movi t3, t3, dsz, flags=(CEZF,), dataSize=asz
80    subi t4, t0, dsz, dataSize=asz
81    mov t3, t3, t4, flags=(nCEZF,), dataSize=asz
82
83    zexti t2, reg, 15, dataSize=8
84
85    ld t6, ds, [1, t0, rsi]
86    st t6, intseg, [1, t2, t0], "IntAddrPrefixIO << 3", addressSize=8
87
88    add rsi, rsi, t3, dataSize=asz
89};
90
91def macroop OUTS_E_R_M {
92    and t0, rcx, rcx, flags=(EZF,), dataSize=asz
93    br label("end"), flags=(CEZF,)
94    # Find the constant we need to either add or subtract from rdi
95    ruflag t0, 10
96    movi t3, t3, dsz, flags=(CEZF,), dataSize=asz
97    subi t4, t0, dsz, dataSize=asz
98    mov t3, t3, t4, flags=(nCEZF,), dataSize=asz
99
100    zexti t2, reg, 15, dataSize=8
101
102topOfLoop:
103    ld t6, ds, [1, t0, rsi]
104    st t6, intseg, [1, t2, t0], "IntAddrPrefixIO << 3", addressSize=8
105
106    subi rcx, rcx, 1, flags=(EZF,), dataSize=asz
107    add rsi, rsi, t3, dataSize=asz
108    br label("topOfLoop"), flags=(nCEZF,)
109end:
110    fault "NoFault"
111};
112'''
113