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
|
/* Copyright 2013-2014 IBM 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.
*/
#include <stdio.h>
#include <string.h>
#include <bt.h>
#include <ipmi.h>
#include <opal.h>
#include <opal-api.h>
#include <device.h>
#include <skiboot.h>
#include <lock.h>
#include <cpu.h>
#include <timebase.h>
struct ipmi_backend *ipmi_backend = NULL;
static struct lock sync_lock = LOCK_UNLOCKED;
static struct ipmi_msg *sync_msg = NULL;
void ipmi_free_msg(struct ipmi_msg *msg)
{
msg->backend->free_msg(msg);
}
void ipmi_init_msg(struct ipmi_msg *msg, int interface,
uint32_t code, void (*complete)(struct ipmi_msg *),
void *user_data, size_t req_size, size_t resp_size)
{
/* We don't actually support multiple interfaces at the moment. */
assert(interface == IPMI_DEFAULT_INTERFACE);
msg->backend = ipmi_backend;
msg->cmd = IPMI_CMD(code);
msg->netfn = IPMI_NETFN(code) << 2;
msg->req_size = req_size;
msg->resp_size = resp_size;
msg->complete = complete;
msg->user_data = user_data;
}
struct ipmi_msg *ipmi_mkmsg_simple(uint32_t code, void *req_data, size_t req_size)
{
return ipmi_mkmsg(IPMI_DEFAULT_INTERFACE, code, ipmi_free_msg, NULL,
req_data, req_size, 0);
}
struct ipmi_msg *ipmi_mkmsg(int interface, uint32_t code,
void (*complete)(struct ipmi_msg *),
void *user_data, void *req_data, size_t req_size,
size_t resp_size)
{
struct ipmi_msg *msg;
msg = ipmi_backend->alloc_msg(req_size, resp_size);
if (!msg)
return NULL;
ipmi_init_msg(msg, interface, code, complete, user_data, req_size,
resp_size);
/* Commands are free to over ride this if they want to handle errors */
msg->error = ipmi_free_msg;
if (req_data)
memcpy(msg->data, req_data, req_size);
return msg;
}
int ipmi_queue_msg_head(struct ipmi_msg *msg)
{
return msg->backend->queue_msg_head(msg);
}
int ipmi_queue_msg(struct ipmi_msg *msg)
{
/* Here we could choose which interface to use if we want to support
multiple interfaces. */
return msg->backend->queue_msg(msg);
}
void ipmi_cmd_done(uint8_t cmd, uint8_t netfn, uint8_t cc, struct ipmi_msg *msg)
{
msg->cc = cc;
if (msg->cmd != cmd) {
prerror("IPMI: Incorrect cmd 0x%02x in response\n", cmd);
cc = IPMI_ERR_UNSPECIFIED;
}
if ((msg->netfn >> 2) + 1 != (netfn >> 2)) {
prerror("IPMI: Incorrect netfn 0x%02x in response\n", netfn);
cc = IPMI_ERR_UNSPECIFIED;
}
msg->netfn = netfn;
if (cc != IPMI_CC_NO_ERROR) {
prlog(PR_DEBUG, "IPMI: Got error response 0x%02x\n", msg->cc);
assert(msg->error);
msg->error(msg);
} else if (msg->complete)
msg->complete(msg);
/* At this point the message has should have been freed by the
completion functions. */
/* If this is a synchronous message flag that we are done */
if (msg == sync_msg)
sync_msg = NULL;
}
void ipmi_queue_msg_sync(struct ipmi_msg *msg)
{
lock(&sync_lock);
assert(!sync_msg);
sync_msg = msg;
ipmi_queue_msg(msg);
while (sync_msg)
time_wait_ms(100);
unlock(&sync_lock);
}
static void ipmi_read_event_complete(struct ipmi_msg *msg)
{
prlog(PR_DEBUG, "IPMI read event %02x complete: %d bytes. cc: %02x\n",
msg->cmd, msg->resp_size, msg->cc);
/* TODO: Handle power control & PNOR handshake events */
ipmi_free_msg(msg);
}
static void ipmi_get_message_flags_complete(struct ipmi_msg *msg)
{
uint8_t flags = msg->data[0];
ipmi_free_msg(msg);
prlog(PR_DEBUG, "IPMI Get Message Flags: %02x\n", flags);
/* Message available in the event buffer? Queue a Read Event command
* to retrieve it. The flag is cleared by performing a read */
if (flags & IPMI_MESSAGE_FLAGS_EVENT_BUFFER) {
msg = ipmi_mkmsg(IPMI_DEFAULT_INTERFACE, IPMI_READ_EVENT,
ipmi_read_event_complete, NULL, NULL, 0, 16);
ipmi_queue_msg(msg);
}
}
void ipmi_sms_attention(void)
{
struct ipmi_msg *msg;
/* todo: when we handle multiple IPMI interfaces, we'll need to
* ensure that this message is associated with the appropriate
* backend. */
msg = ipmi_mkmsg(IPMI_DEFAULT_INTERFACE, IPMI_GET_MESSAGE_FLAGS,
ipmi_get_message_flags_complete, NULL, NULL, 0, 1);
ipmi_queue_msg(msg);
}
void ipmi_register_backend(struct ipmi_backend *backend)
{
/* We only support one backend at the moment */
assert(backend->alloc_msg);
assert(backend->free_msg);
assert(backend->queue_msg);
assert(backend->dequeue_msg);
ipmi_backend = backend;
ipmi_backend->opal_event_ipmi_recv = opal_dynamic_event_alloc();
}
bool ipmi_present(void)
{
return ipmi_backend != NULL;
}
|
