1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
|
/* IBM_PROLOG_BEGIN_TAG */
/* This is an automatically generated prolog. */
/* */
/* $Source: src/occ/common.c $ */
/* */
/* OpenPOWER OnChipController Project */
/* */
/* Contributors Listed Below - COPYRIGHT 2011,2015 */
/* [+] International Business Machines Corp. */
/* */
/* */
/* Licensed under the Apache License, Version 2.0 (the "License"); */
/* you may not use this file except in compliance with the License. */
/* You may obtain a copy of the License at */
/* */
/* http://www.apache.org/licenses/LICENSE-2.0 */
/* */
/* Unless required by applicable law or agreed to in writing, software */
/* distributed under the License is distributed on an "AS IS" BASIS, */
/* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or */
/* implied. See the License for the specific language governing */
/* permissions and limitations under the License. */
/* */
/* IBM_PROLOG_END_TAG */
// Description: Common 405 functions
#include <common.h>
#include <trac.h>
uint8_t G_host_notifications_pending = 0;
// Function Specification
//
// Name: task_misc_405_checks
//
// Description: Perform periodic checks on the 405 including:
// - host notifications
// - checkstops
//
// End Function Specification
void task_misc_405_checks(task_t *i_self)
{
if (G_host_notifications_pending != 0)
{
notify_host(G_host_notifications_pending);
}
// Check for checkstops
/* TEMP -- NO MORE PORE / check_stop field no longer exists */
#if 0
pore_status_t l_gpe0_status;
ocb_oisr0_t l_oisr0_status;
static bool L_checkstop_traced = FALSE;
uint8_t l_reason_code = 0;
do
{
// This check is disabled once a checkstop or frozen GPE is detected
if(L_checkstop_traced)
{
break;
}
// Looked for a frozen GPE, a sign that the chip has stopped working or
// check-stopped. This check also looks for an interrupt status flag that
// indicates if the system has check-stopped.
l_gpe0_status.value = in64(PORE_GPE0_STATUS);
l_oisr0_status.value = in32(OCB_OISR0);
if (l_gpe0_status.fields.freeze_action
||
l_oisr0_status.fields.check_stop)
{
errlHndl_t l_err = NULL;
if (l_gpe0_status.fields.freeze_action)
{
TRAC_IMP("Frozen GPE0 detected by RTL");
l_reason_code = OCC_GPE_HALTED;
}
if (l_oisr0_status.fields.check_stop)
{
TRAC_IMP("System checkstop detected by RTL");
l_reason_code = OCC_SYSTEM_HALTED;
}
L_checkstop_traced = TRUE;
/*
* @errortype
* @moduleid MAIN_SYSTEM_HALTED_MID
* @reasoncode OCC_GPE_HALTED
* @userdata1 High order word of PORE_GPE0_STATUS
* @userdata2 OCB_OISR0
* @devdesc OCC detected frozen GPE0
*/
/*
* @errortype
* @moduleid MAIN_SYSTEM_HALTED_MID
* @reasoncode OCC_SYSTEM_HALTED
* @userdata1 High order word of PORE_GPE0_STATUS
* @userdata2 OCB_OISR0
* @devdesc OCC detected system checkstop
*/
l_err = createErrl(MAIN_SYSTEM_HALTED_MID,
l_reason_code,
OCC_NO_EXTENDED_RC,
ERRL_SEV_INFORMATIONAL,
NULL,
DEFAULT_TRACE_SIZE,
l_gpe0_status.words.high_order,
l_oisr0_status.value);
// The commit code will check for the frozen GPE0 and system
// checkstop conditions and take appropriate actions.
commitErrl(&l_err);
}
}
while(0);
#endif // #if 0
} // end task_misc_405_checks()
// Trigger interrupt to the host with the specified reason (OCCMISC/core_ext_intr)
// Returns true if notification was sent, false if interrupt already outstanding
// If notifcation was not sent, G_host_notifications_pending will be set
// so that it is retried during next tick.
bool notify_host(const ext_intr_reason_t i_reason)
{
bool notify_success = false;
//TRAC_INFO("notify_host(0x%02X) called (G_host_notifications_pending=0x%02X)", i_reason, G_host_notifications_pending);
// Use input reason unless there are outstanding notifications pending
uint8_t notifyReason = i_reason;
if (G_host_notifications_pending)
{
// Add reason to pending notifications
notifyReason = G_host_notifications_pending | i_reason;
// Determine next outstanding notifcation (highest priority first)
if (notifyReason & INTR_REASON_OPAL_SHARED_MEM_CHANGE)
{
notifyReason = INTR_REASON_OPAL_SHARED_MEM_CHANGE;
}
else if (notifyReason & INTR_REASON_HTMGT_SERVICE_REQUIRED)
{
notifyReason = INTR_REASON_HTMGT_SERVICE_REQUIRED;
}
else if (notifyReason & INTR_REASON_I2C_OWNERSHIP_CHANGE)
{
notifyReason = INTR_REASON_I2C_OWNERSHIP_CHANGE;
}
else
{
INTR_TRAC_ERR("notify_host: G_host_notification_pending has unrecognized value: 0x%02X",
notifyReason);
notifyReason = i_reason;
}
}
// Build new value for register
ocb_occmisc_t new_occmisc = {0};
new_occmisc.fields.core_ext_intr = 1;
switch(notifyReason)
{
case INTR_REASON_HTMGT_SERVICE_REQUIRED:
new_occmisc.fields.ext_intr_service_required = 1;
break;
case INTR_REASON_I2C_OWNERSHIP_CHANGE:
new_occmisc.fields.ext_intr_i2c_change = 1;
break;
case INTR_REASON_OPAL_SHARED_MEM_CHANGE:
new_occmisc.fields.ext_intr_shmem_change = 1;
break;
default:
INTR_TRAC_ERR("notify_host: Invalid reason specified: 0x%02X", notifyReason);
new_occmisc.value = 0;
break;
}
if (new_occmisc.value != 0)
{
// Check if we can send interrupt to host (no other interrupts outstanding)
ocb_occmisc_t current_occmisc;
current_occmisc.value = in32(OCB_OCCMISC);
if (current_occmisc.fields.core_ext_intr == 0)
{
#ifdef SIMICS_FLAG_ISSUE
out32(OCB_OCCMISC, new_occmisc.value); // _CLR and _OR not working
#else
if (current_occmisc.fields.ext_intr_service_required ||
current_occmisc.fields.ext_intr_i2c_change ||
current_occmisc.fields.ext_intr_shmem_change)
{
// clear external interrupt reason
current_occmisc.value = 0;
current_occmisc.fields.ext_intr_service_required = 1;
current_occmisc.fields.ext_intr_i2c_change = 1;
current_occmisc.fields.ext_intr_shmem_change = 1;
out32(OCB_OCCMISC_CLR, current_occmisc.value);
}
out32(OCB_OCCMISC_OR, new_occmisc.value);
#endif
notify_success = true;
TRAC_INFO("notify_host: notification of reason 0x%02X has been sent", notifyReason);
G_host_notifications_pending &= ~notifyReason;
}
else
{
// Host already has an interrupt outstanding, resend notification later
if ((G_host_notifications_pending & i_reason) == 0)
{
TRAC_INFO("notify_host: OCCMISC/core_ext_intr not clear yet (register=0x%08X, reason=0x%02X)",
current_occmisc.value, i_reason);
G_host_notifications_pending |= i_reason;
}
}
}
return notify_success;
}
|
