ua2005.cc revision 5100:7a0180040755 
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/kernel_stats.hh"
30#include "arch/sparc/miscregfile.hh"
31#include "base/bitfield.hh"
32#include "base/trace.hh"
33#include "cpu/base.hh"
34#include "cpu/thread_context.hh"
35#include "sim/system.hh"
36
37using namespace SparcISA;
38
39
40void
41MiscRegFile::checkSoftInt(ThreadContext *tc)
42{
43    // If PIL < 14, copy over the tm and sm bits
44    if (pil < 14 && softint & 0x10000)
45        tc->getCpuPtr()->post_interrupt(IT_SOFT_INT,16);
46    else
47        tc->getCpuPtr()->clear_interrupt(IT_SOFT_INT,16);
48    if (pil < 14 && softint & 0x1)
49        tc->getCpuPtr()->post_interrupt(IT_SOFT_INT,0);
50    else
51        tc->getCpuPtr()->clear_interrupt(IT_SOFT_INT,0);
52
53    // Copy over any of the other bits that are set
54    for (int bit = 15; bit > 0; --bit) {
55        if (1 << bit & softint && bit > pil)
56            tc->getCpuPtr()->post_interrupt(IT_SOFT_INT,bit);
57        else
58            tc->getCpuPtr()->clear_interrupt(IT_SOFT_INT,bit);
59    }
60}
61
62
63void
64MiscRegFile::setFSReg(int miscReg, const MiscReg &val, ThreadContext *tc)
65{
66    int64_t time;
67    switch (miscReg) {
68        /* Full system only ASRs */
69      case MISCREG_SOFTINT:
70        setRegNoEffect(miscReg, val);;
71        checkSoftInt(tc);
72        break;
73      case MISCREG_SOFTINT_CLR:
74        return setReg(MISCREG_SOFTINT, ~val & softint, tc);
75      case MISCREG_SOFTINT_SET:
76        return setReg(MISCREG_SOFTINT, val | softint, tc);
77
78      case MISCREG_TICK_CMPR:
79        if (tickCompare == NULL)
80            tickCompare = new TickCompareEvent(this, tc);
81        setRegNoEffect(miscReg, val);
82        if ((tick_cmpr & ~mask(63)) && tickCompare->scheduled())
83            tickCompare->deschedule();
84        time = (tick_cmpr & mask(63)) - (tick & mask(63));
85        if (!(tick_cmpr & ~mask(63)) && time > 0) {
86            if (tickCompare->scheduled())
87                tickCompare->deschedule();
88            tickCompare->schedule(time * tc->getCpuPtr()->ticks(1));
89        }
90        panic("writing to TICK compare register %#X\n", val);
91        break;
92
93      case MISCREG_STICK_CMPR:
94        if (sTickCompare == NULL)
95            sTickCompare = new STickCompareEvent(this, tc);
96        setRegNoEffect(miscReg, val);
97        if ((stick_cmpr & ~mask(63)) && sTickCompare->scheduled())
98            sTickCompare->deschedule();
99        time = ((int64_t)(stick_cmpr & mask(63)) - (int64_t)stick) -
100            tc->getCpuPtr()->instCount();
101        if (!(stick_cmpr & ~mask(63)) && time > 0) {
102            if (sTickCompare->scheduled())
103                sTickCompare->deschedule();
104            sTickCompare->schedule(time * tc->getCpuPtr()->ticks(1) + curTick);
105        }
106        DPRINTF(Timer, "writing to sTICK compare register value %#X\n", val);
107        break;
108
109      case MISCREG_PSTATE:
110        setRegNoEffect(miscReg, val);
111
112      case MISCREG_PIL:
113        setRegNoEffect(miscReg, val);
114        checkSoftInt(tc);
115        break;
116
117      case MISCREG_HVER:
118        panic("Shouldn't be writing HVER\n");
119
120      case MISCREG_HINTP:
121        setRegNoEffect(miscReg, val);
122        if (hintp)
123            tc->getCpuPtr()->post_interrupt(IT_HINTP,0);
124        else
125            tc->getCpuPtr()->clear_interrupt(IT_HINTP,0);
126        break;
127
128      case MISCREG_HTBA:
129        // clear lower 7 bits on writes.
130        setRegNoEffect(miscReg, val & ULL(~0x7FFF));
131        break;
132
133      case MISCREG_QUEUE_CPU_MONDO_HEAD:
134      case MISCREG_QUEUE_CPU_MONDO_TAIL:
135        setRegNoEffect(miscReg, val);
136        if (cpu_mondo_head != cpu_mondo_tail)
137            tc->getCpuPtr()->post_interrupt(IT_CPU_MONDO,0);
138        else
139            tc->getCpuPtr()->clear_interrupt(IT_CPU_MONDO,0);
140        break;
141      case MISCREG_QUEUE_DEV_MONDO_HEAD:
142      case MISCREG_QUEUE_DEV_MONDO_TAIL:
143        setRegNoEffect(miscReg, val);
144        if (dev_mondo_head != dev_mondo_tail)
145            tc->getCpuPtr()->post_interrupt(IT_DEV_MONDO,0);
146        else
147            tc->getCpuPtr()->clear_interrupt(IT_DEV_MONDO,0);
148        break;
149      case MISCREG_QUEUE_RES_ERROR_HEAD:
150      case MISCREG_QUEUE_RES_ERROR_TAIL:
151        setRegNoEffect(miscReg, val);
152        if (res_error_head != res_error_tail)
153            tc->getCpuPtr()->post_interrupt(IT_RES_ERROR,0);
154        else
155            tc->getCpuPtr()->clear_interrupt(IT_RES_ERROR,0);
156        break;
157      case MISCREG_QUEUE_NRES_ERROR_HEAD:
158      case MISCREG_QUEUE_NRES_ERROR_TAIL:
159        setRegNoEffect(miscReg, val);
160        // This one doesn't have an interrupt to report to the guest OS
161        break;
162
163      case MISCREG_HSTICK_CMPR:
164        if (hSTickCompare == NULL)
165            hSTickCompare = new HSTickCompareEvent(this, tc);
166        setRegNoEffect(miscReg, val);
167        if ((hstick_cmpr & ~mask(63)) && hSTickCompare->scheduled())
168            hSTickCompare->deschedule();
169        time = ((int64_t)(hstick_cmpr & mask(63)) - (int64_t)stick) -
170            tc->getCpuPtr()->instCount();
171        if (!(hstick_cmpr & ~mask(63)) && time > 0) {
172            if (hSTickCompare->scheduled())
173                hSTickCompare->deschedule();
174            hSTickCompare->schedule(curTick + time * tc->getCpuPtr()->ticks(1));
175        }
176        DPRINTF(Timer, "writing to hsTICK compare register value %#X\n", val);
177        break;
178
179      case MISCREG_HPSTATE:
180        // T1000 spec says impl. dependent val must always be 1
181        setRegNoEffect(miscReg, val | HPSTATE::id);
182#if FULL_SYSTEM
183        if (hpstate & HPSTATE::tlz && tl == 0 && !(hpstate & HPSTATE::hpriv))
184            tc->getCpuPtr()->post_interrupt(IT_TRAP_LEVEL_ZERO,0);
185        else
186            tc->getCpuPtr()->clear_interrupt(IT_TRAP_LEVEL_ZERO,0);
187#endif
188        break;
189      case MISCREG_HTSTATE:
190        setRegNoEffect(miscReg, val);
191        break;
192
193      case MISCREG_STRAND_STS_REG:
194        if (bits(val,2,2))
195            panic("No support for setting spec_en bit\n");
196        setRegNoEffect(miscReg, bits(val,0,0));
197        if (!bits(val,0,0)) {
198            DPRINTF(Quiesce, "Cpu executed quiescing instruction\n");
199            // Time to go to sleep
200            tc->suspend();
201            if (tc->getKernelStats())
202                tc->getKernelStats()->quiesce();
203            }
204        break;
205
206      default:
207        panic("Invalid write to FS misc register %s\n", getMiscRegName(miscReg));
208    }
209}
210
211MiscReg
212MiscRegFile::readFSReg(int miscReg, ThreadContext * tc)
213{
214    uint64_t temp;
215
216    switch (miscReg) {
217        /* Privileged registers. */
218      case MISCREG_QUEUE_CPU_MONDO_HEAD:
219      case MISCREG_QUEUE_CPU_MONDO_TAIL:
220      case MISCREG_QUEUE_DEV_MONDO_HEAD:
221      case MISCREG_QUEUE_DEV_MONDO_TAIL:
222      case MISCREG_QUEUE_RES_ERROR_HEAD:
223      case MISCREG_QUEUE_RES_ERROR_TAIL:
224      case MISCREG_QUEUE_NRES_ERROR_HEAD:
225      case MISCREG_QUEUE_NRES_ERROR_TAIL:
226      case MISCREG_SOFTINT:
227      case MISCREG_TICK_CMPR:
228      case MISCREG_STICK_CMPR:
229      case MISCREG_PIL:
230      case MISCREG_HPSTATE:
231      case MISCREG_HINTP:
232      case MISCREG_HTSTATE:
233      case MISCREG_HSTICK_CMPR:
234        return readRegNoEffect(miscReg) ;
235
236      case MISCREG_HTBA:
237        return readRegNoEffect(miscReg) & ULL(~0x7FFF);
238      case MISCREG_HVER:
239        // XXX set to match Legion
240        return ULL(0x3e) << 48 |
241               ULL(0x23) << 32 |
242               ULL(0x20) << 24 |
243                   //MaxGL << 16 | XXX For some reason legion doesn't set GL
244                   MaxTL << 8  |
245           (NWindows -1) << 0;
246
247      case MISCREG_STRAND_STS_REG:
248        System *sys;
249        int x;
250        sys = tc->getSystemPtr();
251
252        temp = readRegNoEffect(miscReg) & (STS::active | STS::speculative);
253        // Check that the CPU array is fully populated (by calling getNumCPus())
254        assert(sys->getNumCPUs() > tc->readCpuId());
255
256        temp |= tc->readCpuId()  << STS::shft_id;
257
258        for (x = tc->readCpuId() & ~3; x < sys->threadContexts.size(); x++) {
259            switch (sys->threadContexts[x]->status()) {
260              case ThreadContext::Active:
261                temp |= STS::st_run << (STS::shft_fsm0 -
262                        ((x & 0x3) * (STS::shft_fsm0-STS::shft_fsm1)));
263                break;
264              case ThreadContext::Suspended:
265                // should this be idle?
266                temp |= STS::st_idle << (STS::shft_fsm0 -
267                        ((x & 0x3) * (STS::shft_fsm0-STS::shft_fsm1)));
268                break;
269              case ThreadContext::Halted:
270                temp |= STS::st_halt << (STS::shft_fsm0 -
271                        ((x & 0x3) * (STS::shft_fsm0-STS::shft_fsm1)));
272                break;
273              default:
274                panic("What state are we in?!\n");
275            } // switch
276        } // for
277
278        return temp;
279      default:
280        panic("Invalid read to FS misc register\n");
281    }
282}
283/*
284  In Niagra STICK==TICK so this isn't needed
285  case MISCREG_STICK:
286  SparcSystem *sys;
287  sys = dynamic_cast<SparcSystem*>(tc->getSystemPtr());
288  assert(sys != NULL);
289  return curTick/Clock::Int::ns - sys->sysTick | (stick & ~(mask(63)));
290*/
291
292
293
294void
295MiscRegFile::processTickCompare(ThreadContext *tc)
296{
297    panic("tick compare not implemented\n");
298}
299
300void
301MiscRegFile::processSTickCompare(ThreadContext *tc)
302{
303    // since our microcode instructions take two cycles we need to check if
304    // we're actually at the correct cycle or we need to wait a little while
305    // more
306    int ticks;
307    ticks = ((int64_t)(stick_cmpr & mask(63)) - (int64_t)stick) -
308        tc->getCpuPtr()->instCount();
309    assert(ticks >= 0 && "stick compare missed interrupt cycle");
310
311    if (ticks == 0 || tc->status() == ThreadContext::Suspended) {
312        DPRINTF(Timer, "STick compare cycle reached at %#x\n",
313                (stick_cmpr & mask(63)));
314        if (!(tc->readMiscRegNoEffect(MISCREG_STICK_CMPR) & (ULL(1) << 63))) {
315            setReg(MISCREG_SOFTINT, softint | (ULL(1) << 16), tc);
316        }
317    } else
318        sTickCompare->schedule(ticks * tc->getCpuPtr()->ticks(1) + curTick);
319}
320
321void
322MiscRegFile::processHSTickCompare(ThreadContext *tc)
323{
324    // since our microcode instructions take two cycles we need to check if
325    // we're actually at the correct cycle or we need to wait a little while
326    // more
327    int ticks;
328    if ( tc->status() == ThreadContext::Halted ||
329         tc->status() == ThreadContext::Unallocated)
330       return;
331
332    ticks = ((int64_t)(hstick_cmpr & mask(63)) - (int64_t)stick) -
333        tc->getCpuPtr()->instCount();
334    assert(ticks >= 0 && "hstick compare missed interrupt cycle");
335
336    if (ticks == 0 || tc->status() == ThreadContext::Suspended) {
337        DPRINTF(Timer, "HSTick compare cycle reached at %#x\n",
338                (stick_cmpr & mask(63)));
339        if (!(tc->readMiscRegNoEffect(MISCREG_HSTICK_CMPR) & (ULL(1) << 63))) {
340            setReg(MISCREG_HINTP, 1, tc);
341        }
342        // Need to do something to cause interrupt to happen here !!! @todo
343    } else
344        hSTickCompare->schedule(ticks * tc->getCpuPtr()->ticks(1) + curTick);
345}
346
347