ua2005.cc revision 12620:fe5cdc0293dd 
1/*
2 * Copyright (c) 2006 The Regents of The University of Michigan
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are
7 * met: redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer;
9 * redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution;
12 * neither the name of the copyright holders nor the names of its
13 * contributors may be used to endorse or promote products derived from
14 * this software without specific prior written permission.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
17 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
18 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
19 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
20 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
21 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
22 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29#include "arch/sparc/isa.hh"
30#include "arch/sparc/kernel_stats.hh"
31#include "arch/sparc/registers.hh"
32#include "base/bitfield.hh"
33#include "base/trace.hh"
34#include "cpu/base.hh"
35#include "cpu/thread_context.hh"
36#include "debug/Quiesce.hh"
37#include "debug/Timer.hh"
38#include "sim/full_system.hh"
39#include "sim/system.hh"
40
41using namespace SparcISA;
42using namespace std;
43
44
45void
46ISA::checkSoftInt(ThreadContext *tc)
47{
48    BaseCPU *cpu = tc->getCpuPtr();
49
50    // If PIL < 14, copy over the tm and sm bits
51    if (pil < 14 && softint & 0x10000)
52        cpu->postInterrupt(0, IT_SOFT_INT, 16);
53    else
54        cpu->clearInterrupt(0, IT_SOFT_INT, 16);
55    if (pil < 14 && softint & 0x1)
56        cpu->postInterrupt(0, IT_SOFT_INT, 0);
57    else
58        cpu->clearInterrupt(0, IT_SOFT_INT, 0);
59
60    // Copy over any of the other bits that are set
61    for (int bit = 15; bit > 0; --bit) {
62        if (1 << bit & softint && bit > pil)
63            cpu->postInterrupt(0, IT_SOFT_INT, bit);
64        else
65            cpu->clearInterrupt(0, IT_SOFT_INT, bit);
66    }
67}
68
69// These functions map register indices to names
70static inline string
71getMiscRegName(RegIndex index)
72{
73    static string miscRegName[NumMiscRegs] =
74        {/*"y", "ccr",*/ "asi", "tick", "fprs", "pcr", "pic",
75         "gsr", "softint_set", "softint_clr", "softint", "tick_cmpr",
76         "stick", "stick_cmpr",
77         "tpc", "tnpc", "tstate", "tt", "privtick", "tba", "pstate", "tl",
78         "pil", "cwp", /*"cansave", "canrestore", "cleanwin", "otherwin",
79         "wstate",*/ "gl",
80         "hpstate", "htstate", "hintp", "htba", "hver", "strand_sts_reg",
81         "hstick_cmpr",
82         "fsr", "prictx", "secctx", "partId", "lsuCtrlReg",
83         "scratch0", "scratch1", "scratch2", "scratch3", "scratch4",
84         "scratch5", "scratch6", "scratch7", "cpuMondoHead", "cpuMondoTail",
85         "devMondoHead", "devMondoTail", "resErrorHead", "resErrorTail",
86         "nresErrorHead", "nresErrorTail", "TlbData" };
87    return miscRegName[index];
88}
89
90void
91ISA::setFSReg(int miscReg, const MiscReg &val, ThreadContext *tc)
92{
93    BaseCPU *cpu = tc->getCpuPtr();
94
95    int64_t time;
96    switch (miscReg) {
97        /* Full system only ASRs */
98      case MISCREG_SOFTINT:
99        setMiscRegNoEffect(miscReg, val);;
100        checkSoftInt(tc);
101        break;
102      case MISCREG_SOFTINT_CLR:
103        return setMiscReg(MISCREG_SOFTINT, ~val & softint, tc);
104      case MISCREG_SOFTINT_SET:
105        return setMiscReg(MISCREG_SOFTINT, val | softint, tc);
106
107      case MISCREG_TICK_CMPR:
108        if (tickCompare == NULL)
109            tickCompare = new TickCompareEvent(this, tc);
110        setMiscRegNoEffect(miscReg, val);
111        if ((tick_cmpr & ~mask(63)) && tickCompare->scheduled())
112            cpu->deschedule(tickCompare);
113        time = (tick_cmpr & mask(63)) - (tick & mask(63));
114        if (!(tick_cmpr & ~mask(63)) && time > 0) {
115            if (tickCompare->scheduled())
116                cpu->deschedule(tickCompare);
117            cpu->schedule(tickCompare, cpu->clockEdge(Cycles(time)));
118        }
119        DPRINTF(Timer, "writing to TICK compare register value %#X\n", val);
120        break;
121
122      case MISCREG_STICK_CMPR:
123        if (sTickCompare == NULL)
124            sTickCompare = new STickCompareEvent(this, tc);
125        setMiscRegNoEffect(miscReg, val);
126        if ((stick_cmpr & ~mask(63)) && sTickCompare->scheduled())
127            cpu->deschedule(sTickCompare);
128        time = ((int64_t)(stick_cmpr & mask(63)) - (int64_t)stick) -
129            cpu->instCount();
130        if (!(stick_cmpr & ~mask(63)) && time > 0) {
131            if (sTickCompare->scheduled())
132                cpu->deschedule(sTickCompare);
133            cpu->schedule(sTickCompare, cpu->clockEdge(Cycles(time)));
134        }
135        DPRINTF(Timer, "writing to sTICK compare register value %#X\n", val);
136        break;
137
138      case MISCREG_PSTATE:
139        setMiscRegNoEffect(miscReg, val);
140        break;
141
142      case MISCREG_PIL:
143        setMiscRegNoEffect(miscReg, val);
144        checkSoftInt(tc);
145        break;
146
147      case MISCREG_HVER:
148        panic("Shouldn't be writing HVER\n");
149
150      case MISCREG_HINTP:
151        setMiscRegNoEffect(miscReg, val);
152        if (hintp)
153            cpu->postInterrupt(0, IT_HINTP, 0);
154        else
155            cpu->clearInterrupt(0, IT_HINTP, 0);
156        break;
157
158      case MISCREG_HTBA:
159        // clear lower 7 bits on writes.
160        setMiscRegNoEffect(miscReg, val & ULL(~0x7FFF));
161        break;
162
163      case MISCREG_QUEUE_CPU_MONDO_HEAD:
164      case MISCREG_QUEUE_CPU_MONDO_TAIL:
165        setMiscRegNoEffect(miscReg, val);
166        if (cpu_mondo_head != cpu_mondo_tail)
167            cpu->postInterrupt(0, IT_CPU_MONDO, 0);
168        else
169            cpu->clearInterrupt(0, IT_CPU_MONDO, 0);
170        break;
171      case MISCREG_QUEUE_DEV_MONDO_HEAD:
172      case MISCREG_QUEUE_DEV_MONDO_TAIL:
173        setMiscRegNoEffect(miscReg, val);
174        if (dev_mondo_head != dev_mondo_tail)
175            cpu->postInterrupt(0, IT_DEV_MONDO, 0);
176        else
177            cpu->clearInterrupt(0, IT_DEV_MONDO, 0);
178        break;
179      case MISCREG_QUEUE_RES_ERROR_HEAD:
180      case MISCREG_QUEUE_RES_ERROR_TAIL:
181        setMiscRegNoEffect(miscReg, val);
182        if (res_error_head != res_error_tail)
183            cpu->postInterrupt(0, IT_RES_ERROR, 0);
184        else
185            cpu->clearInterrupt(0, IT_RES_ERROR, 0);
186        break;
187      case MISCREG_QUEUE_NRES_ERROR_HEAD:
188      case MISCREG_QUEUE_NRES_ERROR_TAIL:
189        setMiscRegNoEffect(miscReg, val);
190        // This one doesn't have an interrupt to report to the guest OS
191        break;
192
193      case MISCREG_HSTICK_CMPR:
194        if (hSTickCompare == NULL)
195            hSTickCompare = new HSTickCompareEvent(this, tc);
196        setMiscRegNoEffect(miscReg, val);
197        if ((hstick_cmpr & ~mask(63)) && hSTickCompare->scheduled())
198            cpu->deschedule(hSTickCompare);
199        time = ((int64_t)(hstick_cmpr & mask(63)) - (int64_t)stick) -
200            cpu->instCount();
201        if (!(hstick_cmpr & ~mask(63)) && time > 0) {
202            if (hSTickCompare->scheduled())
203                cpu->deschedule(hSTickCompare);
204            cpu->schedule(hSTickCompare, cpu->clockEdge(Cycles(time)));
205        }
206        DPRINTF(Timer, "writing to hsTICK compare register value %#X\n", val);
207        break;
208
209      case MISCREG_HPSTATE:
210        {
211            HPSTATE newVal = val;
212            newVal.id = 1;
213            // T1000 spec says impl. dependent val must always be 1
214            setMiscRegNoEffect(miscReg, newVal);
215            newVal = hpstate;
216            if (newVal.tlz && tl == 0 && !newVal.hpriv)
217                cpu->postInterrupt(0, IT_TRAP_LEVEL_ZERO, 0);
218            else
219                cpu->clearInterrupt(0, IT_TRAP_LEVEL_ZERO, 0);
220            break;
221        }
222      case MISCREG_HTSTATE:
223        setMiscRegNoEffect(miscReg, val);
224        break;
225
226      case MISCREG_STRAND_STS_REG:
227        if (bits(val,2,2))
228            panic("No support for setting spec_en bit\n");
229        setMiscRegNoEffect(miscReg, bits(val,0,0));
230        if (!bits(val,0,0)) {
231            DPRINTF(Quiesce, "Cpu executed quiescing instruction\n");
232            // Time to go to sleep
233            tc->suspend();
234            if (FullSystem && tc->getKernelStats())
235                tc->getKernelStats()->quiesce();
236        }
237        break;
238
239      default:
240        panic("Invalid write to FS misc register %s\n",
241              getMiscRegName(miscReg));
242    }
243}
244
245MiscReg
246ISA::readFSReg(int miscReg, ThreadContext * tc)
247{
248    uint64_t temp;
249
250    switch (miscReg) {
251        /* Privileged registers. */
252      case MISCREG_QUEUE_CPU_MONDO_HEAD:
253      case MISCREG_QUEUE_CPU_MONDO_TAIL:
254      case MISCREG_QUEUE_DEV_MONDO_HEAD:
255      case MISCREG_QUEUE_DEV_MONDO_TAIL:
256      case MISCREG_QUEUE_RES_ERROR_HEAD:
257      case MISCREG_QUEUE_RES_ERROR_TAIL:
258      case MISCREG_QUEUE_NRES_ERROR_HEAD:
259      case MISCREG_QUEUE_NRES_ERROR_TAIL:
260      case MISCREG_SOFTINT:
261      case MISCREG_TICK_CMPR:
262      case MISCREG_STICK_CMPR:
263      case MISCREG_PIL:
264      case MISCREG_HPSTATE:
265      case MISCREG_HINTP:
266      case MISCREG_HTSTATE:
267      case MISCREG_HSTICK_CMPR:
268        return readMiscRegNoEffect(miscReg) ;
269
270      case MISCREG_HTBA:
271        return readMiscRegNoEffect(miscReg) & ULL(~0x7FFF);
272      case MISCREG_HVER:
273        // XXX set to match Legion
274        return ULL(0x3e) << 48 |
275               ULL(0x23) << 32 |
276               ULL(0x20) << 24 |
277                   // MaxGL << 16 | XXX For some reason legion doesn't set GL
278                   MaxTL << 8  |
279           (NWindows -1) << 0;
280
281      case MISCREG_STRAND_STS_REG:
282        System *sys;
283        int x;
284        sys = tc->getSystemPtr();
285
286        temp = readMiscRegNoEffect(miscReg) & (STS::active | STS::speculative);
287        // Check that the CPU array is fully populated
288        // (by calling getNumCPus())
289        assert(sys->numContexts() > tc->contextId());
290
291        temp |= tc->contextId()  << STS::shft_id;
292
293        for (x = tc->contextId() & ~3; x < sys->threadContexts.size(); x++) {
294            switch (sys->threadContexts[x]->status()) {
295              case ThreadContext::Active:
296                temp |= STS::st_run << (STS::shft_fsm0 -
297                        ((x & 0x3) * (STS::shft_fsm0-STS::shft_fsm1)));
298                break;
299              case ThreadContext::Suspended:
300                // should this be idle?
301                temp |= STS::st_idle << (STS::shft_fsm0 -
302                        ((x & 0x3) * (STS::shft_fsm0-STS::shft_fsm1)));
303                break;
304              case ThreadContext::Halted:
305                temp |= STS::st_halt << (STS::shft_fsm0 -
306                        ((x & 0x3) * (STS::shft_fsm0-STS::shft_fsm1)));
307                break;
308              default:
309                panic("What state are we in?!\n");
310            } // switch
311        } // for
312
313        return temp;
314      default:
315        panic("Invalid read to FS misc register\n");
316    }
317}
318
319void
320ISA::processTickCompare(ThreadContext *tc)
321{
322    panic("tick compare not implemented\n");
323}
324
325void
326ISA::processSTickCompare(ThreadContext *tc)
327{
328    BaseCPU *cpu = tc->getCpuPtr();
329
330    // since our microcode instructions take two cycles we need to check if
331    // we're actually at the correct cycle or we need to wait a little while
332    // more
333    int delay;
334    delay = ((int64_t)(stick_cmpr & mask(63)) - (int64_t)stick) -
335        cpu->instCount();
336    assert(delay >= 0 && "stick compare missed interrupt cycle");
337
338    if (delay == 0 || tc->status() == ThreadContext::Suspended) {
339        DPRINTF(Timer, "STick compare cycle reached at %#x\n",
340                (stick_cmpr & mask(63)));
341        if (!(tc->readMiscRegNoEffect(MISCREG_STICK_CMPR) & (ULL(1) << 63))) {
342            setMiscReg(MISCREG_SOFTINT, softint | (ULL(1) << 16), tc);
343        }
344    } else {
345        cpu->schedule(sTickCompare, cpu->clockEdge(Cycles(delay)));
346    }
347}
348
349void
350ISA::processHSTickCompare(ThreadContext *tc)
351{
352    BaseCPU *cpu = tc->getCpuPtr();
353
354    // since our microcode instructions take two cycles we need to check if
355    // we're actually at the correct cycle or we need to wait a little while
356    // more
357    int delay;
358    if ( tc->status() == ThreadContext::Halted)
359       return;
360
361    delay = ((int64_t)(hstick_cmpr & mask(63)) - (int64_t)stick) -
362        cpu->instCount();
363    assert(delay >= 0 && "hstick compare missed interrupt cycle");
364
365    if (delay == 0 || tc->status() == ThreadContext::Suspended) {
366        DPRINTF(Timer, "HSTick compare cycle reached at %#x\n",
367                (stick_cmpr & mask(63)));
368        if (!(tc->readMiscRegNoEffect(MISCREG_HSTICK_CMPR) & (ULL(1) << 63))) {
369            setMiscReg(MISCREG_HINTP, 1, tc);
370        }
371        // Need to do something to cause interrupt to happen here !!! @todo
372    } else {
373        cpu->schedule(hSTickCompare, cpu->clockEdge(Cycles(delay)));
374    }
375}
376
377