ipmi_bt_sm.c 20.3 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4
/*
 *  ipmi_bt_sm.c
 *
 *  The state machine for an Open IPMI BT sub-driver under ipmi_si.c, part
5
 *  of the driver architecture at http://sourceforge.net/projects/openipmi 
L
Linus Torvalds 已提交
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
 *
 *  Author:	Rocky Craig <first.last@hp.com>
 *
 *  This program is free software; you can redistribute it and/or modify it
 *  under the terms of the GNU General Public License as published by the
 *  Free Software Foundation; either version 2 of the License, or (at your
 *  option) any later version.
 *
 *  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
 *  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
 *  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 *  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 *  INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
 *  BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
 *  OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 *  ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
 *  TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
 *  USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 *  You should have received a copy of the GNU General Public License along
 *  with this program; if not, write to the Free Software Foundation, Inc.,
 *  675 Mass Ave, Cambridge, MA 02139, USA.  */

#include <linux/kernel.h> /* For printk. */
#include <linux/string.h>
C
Corey Minyard 已提交
31 32
#include <linux/module.h>
#include <linux/moduleparam.h>
L
Linus Torvalds 已提交
33 34 35
#include <linux/ipmi_msgdefs.h>		/* for completion codes */
#include "ipmi_si_sm.h"

C
Corey Minyard 已提交
36 37 38 39
#define BT_DEBUG_OFF	0	/* Used in production */
#define BT_DEBUG_ENABLE	1	/* Generic messages */
#define BT_DEBUG_MSG	2	/* Prints all request/response buffers */
#define BT_DEBUG_STATES	4	/* Verbose look at state changes */
40 41 42 43
/*
 * BT_DEBUG_OFF must be zero to correspond to the default uninitialized
 * value
 */
C
Corey Minyard 已提交
44

R
Randy Dunlap 已提交
45
static int bt_debug; /* 0 == BT_DEBUG_OFF */
L
Linus Torvalds 已提交
46

C
Corey Minyard 已提交
47 48
module_param(bt_debug, int, 0644);
MODULE_PARM_DESC(bt_debug, "debug bitmask, 1=enable, 2=messages, 4=states");
L
Linus Torvalds 已提交
49

50 51 52 53 54 55 56
/*
 * Typical "Get BT Capabilities" values are 2-3 retries, 5-10 seconds,
 * and 64 byte buffers.  However, one HP implementation wants 255 bytes of
 * buffer (with a documented message of 160 bytes) so go for the max.
 * Since the Open IPMI architecture is single-message oriented at this
 * stage, the queue depth of BT is of no concern.
 */
L
Linus Torvalds 已提交
57

C
Corey Minyard 已提交
58 59 60 61
#define BT_NORMAL_TIMEOUT	5	/* seconds */
#define BT_NORMAL_RETRY_LIMIT	2
#define BT_RESET_DELAY		6	/* seconds after warm reset */

62 63 64 65
/*
 * States are written in chronological order and usually cover
 * multiple rows of the state table discussion in the IPMI spec.
 */
L
Linus Torvalds 已提交
66 67

enum bt_states {
C
Corey Minyard 已提交
68
	BT_STATE_IDLE = 0,	/* Order is critical in this list */
L
Linus Torvalds 已提交
69 70 71
	BT_STATE_XACTION_START,
	BT_STATE_WRITE_BYTES,
	BT_STATE_WRITE_CONSUME,
C
Corey Minyard 已提交
72 73 74 75
	BT_STATE_READ_WAIT,
	BT_STATE_CLEAR_B2H,
	BT_STATE_READ_BYTES,
	BT_STATE_RESET1,	/* These must come last */
L
Linus Torvalds 已提交
76 77 78
	BT_STATE_RESET2,
	BT_STATE_RESET3,
	BT_STATE_RESTART,
C
Corey Minyard 已提交
79 80 81 82
	BT_STATE_PRINTME,
	BT_STATE_CAPABILITIES_BEGIN,
	BT_STATE_CAPABILITIES_END,
	BT_STATE_LONG_BUSY	/* BT doesn't get hosed :-) */
L
Linus Torvalds 已提交
83 84
};

85 86 87 88
/*
 * Macros seen at the end of state "case" blocks.  They help with legibility
 * and debugging.
 */
C
Corey Minyard 已提交
89

90
#define BT_STATE_CHANGE(X, Y) { bt->state = X; return Y; }
C
Corey Minyard 已提交
91 92 93

#define BT_SI_SM_RETURN(Y)   { last_printed = BT_STATE_PRINTME; return Y; }

L
Linus Torvalds 已提交
94 95 96 97
struct si_sm_data {
	enum bt_states	state;
	unsigned char	seq;		/* BT sequence number */
	struct si_sm_io	*io;
C
Corey Minyard 已提交
98 99 100 101 102 103 104
	unsigned char	write_data[IPMI_MAX_MSG_LENGTH];
	int		write_count;
	unsigned char	read_data[IPMI_MAX_MSG_LENGTH];
	int		read_count;
	int		truncated;
	long		timeout;	/* microseconds countdown */
	int		error_retries;	/* end of "common" fields */
L
Linus Torvalds 已提交
105
	int		nonzero_status;	/* hung BMCs stay all 0 */
C
Corey Minyard 已提交
106 107 108 109
	enum bt_states	complete;	/* to divert the state machine */
	int		BT_CAP_outreqs;
	long		BT_CAP_req2rsp;
	int		BT_CAP_retries;	/* Recommended retries */
L
Linus Torvalds 已提交
110 111 112 113 114 115 116 117 118 119 120
};

#define BT_CLR_WR_PTR	0x01	/* See IPMI 1.5 table 11.6.4 */
#define BT_CLR_RD_PTR	0x02
#define BT_H2B_ATN	0x04
#define BT_B2H_ATN	0x08
#define BT_SMS_ATN	0x10
#define BT_OEM0		0x20
#define BT_H_BUSY	0x40
#define BT_B_BUSY	0x80

121 122 123 124 125 126 127
/*
 * Some bits are toggled on each write: write once to set it, once
 * more to clear it; writing a zero does nothing.  To absolutely
 * clear it, check its state and write if set.  This avoids the "get
 * current then use as mask" scheme to modify one bit.  Note that the
 * variable "bt" is hardcoded into these macros.
 */
L
Linus Torvalds 已提交
128 129 130 131 132 133 134 135 136 137

#define BT_STATUS	bt->io->inputb(bt->io, 0)
#define BT_CONTROL(x)	bt->io->outputb(bt->io, 0, x)

#define BMC2HOST	bt->io->inputb(bt->io, 1)
#define HOST2BMC(x)	bt->io->outputb(bt->io, 1, x)

#define BT_INTMASK_R	bt->io->inputb(bt->io, 2)
#define BT_INTMASK_W(x)	bt->io->outputb(bt->io, 2, x)

138 139 140 141
/*
 * Convenience routines for debugging.  These are not multi-open safe!
 * Note the macros have hardcoded variables in them.
 */
L
Linus Torvalds 已提交
142 143 144 145

static char *state2txt(unsigned char state)
{
	switch (state) {
C
Corey Minyard 已提交
146 147 148 149 150 151 152 153 154 155 156 157 158 159
	case BT_STATE_IDLE:		return("IDLE");
	case BT_STATE_XACTION_START:	return("XACTION");
	case BT_STATE_WRITE_BYTES:	return("WR_BYTES");
	case BT_STATE_WRITE_CONSUME:	return("WR_CONSUME");
	case BT_STATE_READ_WAIT:	return("RD_WAIT");
	case BT_STATE_CLEAR_B2H:	return("CLEAR_B2H");
	case BT_STATE_READ_BYTES:	return("RD_BYTES");
	case BT_STATE_RESET1:		return("RESET1");
	case BT_STATE_RESET2:		return("RESET2");
	case BT_STATE_RESET3:		return("RESET3");
	case BT_STATE_RESTART:		return("RESTART");
	case BT_STATE_LONG_BUSY:	return("LONG_BUSY");
	case BT_STATE_CAPABILITIES_BEGIN: return("CAP_BEGIN");
	case BT_STATE_CAPABILITIES_END:	return("CAP_END");
L
Linus Torvalds 已提交
160 161 162 163 164
	}
	return("BAD STATE");
}
#define STATE2TXT state2txt(bt->state)

C
Corey Minyard 已提交
165
static char *status2txt(unsigned char status)
L
Linus Torvalds 已提交
166
{
C
Corey Minyard 已提交
167 168 169 170 171 172 173
	/*
	 * This cannot be called by two threads at the same time and
	 * the buffer is always consumed immediately, so the static is
	 * safe to use.
	 */
	static char buf[40];

L
Linus Torvalds 已提交
174
	strcpy(buf, "[ ");
C
Corey Minyard 已提交
175 176 177 178 179 180 181 182 183 184 185 186
	if (status & BT_B_BUSY)
		strcat(buf, "B_BUSY ");
	if (status & BT_H_BUSY)
		strcat(buf, "H_BUSY ");
	if (status & BT_OEM0)
		strcat(buf, "OEM0 ");
	if (status & BT_SMS_ATN)
		strcat(buf, "SMS ");
	if (status & BT_B2H_ATN)
		strcat(buf, "B2H ");
	if (status & BT_H2B_ATN)
		strcat(buf, "H2B ");
L
Linus Torvalds 已提交
187 188 189
	strcat(buf, "]");
	return buf;
}
C
Corey Minyard 已提交
190 191 192
#define STATUS2TXT status2txt(status)

/* called externally at insmod time, and internally on cleanup */
L
Linus Torvalds 已提交
193 194 195

static unsigned int bt_init_data(struct si_sm_data *bt, struct si_sm_io *io)
{
C
Corey Minyard 已提交
196
	memset(bt, 0, sizeof(struct si_sm_data));
197 198
	if (bt->io != io) {
		/* external: one-time only things */
C
Corey Minyard 已提交
199 200 201 202 203 204 205 206
		bt->io = io;
		bt->seq = 0;
	}
	bt->state = BT_STATE_IDLE;	/* start here */
	bt->complete = BT_STATE_IDLE;	/* end here */
	bt->BT_CAP_req2rsp = BT_NORMAL_TIMEOUT * 1000000;
	bt->BT_CAP_retries = BT_NORMAL_RETRY_LIMIT;
	/* BT_CAP_outreqs == zero is a flag to read BT Capabilities */
L
Linus Torvalds 已提交
207 208 209
	return 3; /* We claim 3 bytes of space; ought to check SPMI table */
}

C
Corey Minyard 已提交
210 211 212 213 214 215 216 217 218 219 220 221 222 223
/* Jam a completion code (probably an error) into a response */

static void force_result(struct si_sm_data *bt, unsigned char completion_code)
{
	bt->read_data[0] = 4;				/* # following bytes */
	bt->read_data[1] = bt->write_data[1] | 4;	/* Odd NetFn/LUN */
	bt->read_data[2] = bt->write_data[2];		/* seq (ignored) */
	bt->read_data[3] = bt->write_data[3];		/* Command */
	bt->read_data[4] = completion_code;
	bt->read_count = 5;
}

/* The upper state machine starts here */

L
Linus Torvalds 已提交
224 225 226 227 228 229
static int bt_start_transaction(struct si_sm_data *bt,
				unsigned char *data,
				unsigned int size)
{
	unsigned int i;

C
Corey Minyard 已提交
230 231 232 233
	if (size < 2)
		return IPMI_REQ_LEN_INVALID_ERR;
	if (size > IPMI_MAX_MSG_LENGTH)
		return IPMI_REQ_LEN_EXCEEDED_ERR;
L
Linus Torvalds 已提交
234

C
Corey Minyard 已提交
235 236 237 238 239
	if (bt->state == BT_STATE_LONG_BUSY)
		return IPMI_NODE_BUSY_ERR;

	if (bt->state != BT_STATE_IDLE)
		return IPMI_NOT_IN_MY_STATE_ERR;
L
Linus Torvalds 已提交
240 241

	if (bt_debug & BT_DEBUG_MSG) {
C
Corey Minyard 已提交
242 243
		printk(KERN_WARNING "BT: +++++++++++++++++ New command\n");
		printk(KERN_WARNING "BT: NetFn/LUN CMD [%d data]:", size - 2);
C
Corey Minyard 已提交
244
		for (i = 0; i < size; i ++)
245
			printk(" %02x", data[i]);
L
Linus Torvalds 已提交
246 247 248 249
		printk("\n");
	}
	bt->write_data[0] = size + 1;	/* all data plus seq byte */
	bt->write_data[1] = *data;	/* NetFn/LUN */
C
Corey Minyard 已提交
250
	bt->write_data[2] = bt->seq++;
L
Linus Torvalds 已提交
251 252 253 254 255 256
	memcpy(bt->write_data + 3, data + 1, size - 1);
	bt->write_count = size + 2;
	bt->error_retries = 0;
	bt->nonzero_status = 0;
	bt->truncated = 0;
	bt->state = BT_STATE_XACTION_START;
C
Corey Minyard 已提交
257 258
	bt->timeout = bt->BT_CAP_req2rsp;
	force_result(bt, IPMI_ERR_UNSPECIFIED);
L
Linus Torvalds 已提交
259 260 261
	return 0;
}

262 263 264 265
/*
 * After the upper state machine has been told SI_SM_TRANSACTION_COMPLETE
 * it calls this.  Strip out the length and seq bytes.
 */
L
Linus Torvalds 已提交
266 267

static int bt_get_result(struct si_sm_data *bt,
C
Corey Minyard 已提交
268 269
			 unsigned char *data,
			 unsigned int length)
L
Linus Torvalds 已提交
270 271 272 273 274
{
	int i, msg_len;

	msg_len = bt->read_count - 2;		/* account for length & seq */
	if (msg_len < 3 || msg_len > IPMI_MAX_MSG_LENGTH) {
C
Corey Minyard 已提交
275
		force_result(bt, IPMI_ERR_UNSPECIFIED);
L
Linus Torvalds 已提交
276
		msg_len = 3;
C
Corey Minyard 已提交
277 278 279 280 281 282 283 284
	}
	data[0] = bt->read_data[1];
	data[1] = bt->read_data[3];
	if (length < msg_len || bt->truncated) {
		data[2] = IPMI_ERR_MSG_TRUNCATED;
		msg_len = 3;
	} else
		memcpy(data + 2, bt->read_data + 4, msg_len - 2);
L
Linus Torvalds 已提交
285

C
Corey Minyard 已提交
286
	if (bt_debug & BT_DEBUG_MSG) {
287
		printk(KERN_WARNING "BT: result %d bytes:", msg_len);
C
Corey Minyard 已提交
288 289
		for (i = 0; i < msg_len; i++)
			printk(" %02x", data[i]);
290
		printk("\n");
L
Linus Torvalds 已提交
291 292 293 294 295 296 297 298 299
	}
	return msg_len;
}

/* This bit's functionality is optional */
#define BT_BMC_HWRST	0x80

static void reset_flags(struct si_sm_data *bt)
{
C
Corey Minyard 已提交
300 301 302
	if (bt_debug)
		printk(KERN_WARNING "IPMI BT: flag reset %s\n",
					status2txt(BT_STATUS));
C
Corey Minyard 已提交
303
	if (BT_STATUS & BT_H_BUSY)
C
Corey Minyard 已提交
304 305 306 307 308 309
		BT_CONTROL(BT_H_BUSY);	/* force clear */
	BT_CONTROL(BT_CLR_WR_PTR);	/* always reset */
	BT_CONTROL(BT_SMS_ATN);		/* always clear */
	BT_INTMASK_W(BT_BMC_HWRST);
}

310 311 312 313
/*
 * Get rid of an unwanted/stale response.  This should only be needed for
 * BMCs that support multiple outstanding requests.
 */
C
Corey Minyard 已提交
314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335

static void drain_BMC2HOST(struct si_sm_data *bt)
{
	int i, size;

	if (!(BT_STATUS & BT_B2H_ATN)) 	/* Not signalling a response */
		return;

	BT_CONTROL(BT_H_BUSY);		/* now set */
	BT_CONTROL(BT_B2H_ATN);		/* always clear */
	BT_STATUS;			/* pause */
	BT_CONTROL(BT_B2H_ATN);		/* some BMCs are stubborn */
	BT_CONTROL(BT_CLR_RD_PTR);	/* always reset */
	if (bt_debug)
		printk(KERN_WARNING "IPMI BT: stale response %s; ",
			status2txt(BT_STATUS));
	size = BMC2HOST;
	for (i = 0; i < size ; i++)
		BMC2HOST;
	BT_CONTROL(BT_H_BUSY);		/* now clear */
	if (bt_debug)
		printk("drained %d bytes\n", size + 1);
L
Linus Torvalds 已提交
336 337 338 339 340 341 342
}

static inline void write_all_bytes(struct si_sm_data *bt)
{
	int i;

	if (bt_debug & BT_DEBUG_MSG) {
C
Corey Minyard 已提交
343
		printk(KERN_WARNING "BT: write %d bytes seq=0x%02X",
L
Linus Torvalds 已提交
344 345
			bt->write_count, bt->seq);
		for (i = 0; i < bt->write_count; i++)
346 347
			printk(" %02x", bt->write_data[i]);
		printk("\n");
L
Linus Torvalds 已提交
348
	}
C
Corey Minyard 已提交
349
	for (i = 0; i < bt->write_count; i++)
C
Corey Minyard 已提交
350
		HOST2BMC(bt->write_data[i]);
L
Linus Torvalds 已提交
351 352 353 354 355 356
}

static inline int read_all_bytes(struct si_sm_data *bt)
{
	unsigned char i;

357 358 359 360
	/*
	 * length is "framing info", minimum = 4: NetFn, Seq, Cmd, cCode.
	 * Keep layout of first four bytes aligned with write_data[]
	 */
C
Corey Minyard 已提交
361

L
Linus Torvalds 已提交
362 363 364 365 366
	bt->read_data[0] = BMC2HOST;
	bt->read_count = bt->read_data[0];

	if (bt->read_count < 4 || bt->read_count >= IPMI_MAX_MSG_LENGTH) {
		if (bt_debug & BT_DEBUG_MSG)
C
Corey Minyard 已提交
367 368
			printk(KERN_WARNING "BT: bad raw rsp len=%d\n",
				bt->read_count);
L
Linus Torvalds 已提交
369 370 371
		bt->truncated = 1;
		return 1;	/* let next XACTION START clean it up */
	}
C
Corey Minyard 已提交
372
	for (i = 1; i <= bt->read_count; i++)
C
Corey Minyard 已提交
373 374
		bt->read_data[i] = BMC2HOST;
	bt->read_count++;	/* Account internally for length byte */
L
Linus Torvalds 已提交
375 376

	if (bt_debug & BT_DEBUG_MSG) {
C
Corey Minyard 已提交
377 378 379 380 381 382 383
		int max = bt->read_count;

		printk(KERN_WARNING "BT: got %d bytes seq=0x%02X",
			max, bt->read_data[2]);
		if (max > 16)
			max = 16;
		for (i = 0; i < max; i++)
384 385
			printk(KERN_CONT " %02x", bt->read_data[i]);
		printk(KERN_CONT "%s\n", bt->read_count == max ? "" : " ...");
L
Linus Torvalds 已提交
386 387
	}

C
Corey Minyard 已提交
388 389 390 391
	/* per the spec, the (NetFn[1], Seq[2], Cmd[3]) tuples must match */
	if ((bt->read_data[3] == bt->write_data[3]) &&
	    (bt->read_data[2] == bt->write_data[2]) &&
	    ((bt->read_data[1] & 0xF8) == (bt->write_data[1] & 0xF8)))
L
Linus Torvalds 已提交
392 393
			return 1;

C
Corey Minyard 已提交
394
	if (bt_debug & BT_DEBUG_MSG)
C
Corey Minyard 已提交
395
		printk(KERN_WARNING "IPMI BT: bad packet: "
L
Linus Torvalds 已提交
396
		"want 0x(%02X, %02X, %02X) got (%02X, %02X, %02X)\n",
C
Corey Minyard 已提交
397
		bt->write_data[1] | 0x04, bt->write_data[2], bt->write_data[3],
L
Linus Torvalds 已提交
398 399 400 401
		bt->read_data[1],  bt->read_data[2],  bt->read_data[3]);
	return 0;
}

C
Corey Minyard 已提交
402
/* Restart if retries are left, or return an error completion code */
L
Linus Torvalds 已提交
403

C
Corey Minyard 已提交
404 405 406
static enum si_sm_result error_recovery(struct si_sm_data *bt,
					unsigned char status,
					unsigned char cCode)
L
Linus Torvalds 已提交
407
{
C
Corey Minyard 已提交
408
	char *reason;
L
Linus Torvalds 已提交
409

C
Corey Minyard 已提交
410
	bt->timeout = bt->BT_CAP_req2rsp;
L
Linus Torvalds 已提交
411

C
Corey Minyard 已提交
412 413 414 415 416 417 418 419 420 421 422
	switch (cCode) {
	case IPMI_TIMEOUT_ERR:
		reason = "timeout";
		break;
	default:
		reason = "internal error";
		break;
	}

	printk(KERN_WARNING "IPMI BT: %s in %s %s ", 	/* open-ended line */
		reason, STATE2TXT, STATUS2TXT);
L
Linus Torvalds 已提交
423

424 425 426 427
	/*
	 * Per the IPMI spec, retries are based on the sequence number
	 * known only to this module, so manage a restart here.
	 */
L
Linus Torvalds 已提交
428
	(bt->error_retries)++;
C
Corey Minyard 已提交
429 430 431 432 433
	if (bt->error_retries < bt->BT_CAP_retries) {
		printk("%d retries left\n",
			bt->BT_CAP_retries - bt->error_retries);
		bt->state = BT_STATE_RESTART;
		return SI_SM_CALL_WITHOUT_DELAY;
L
Linus Torvalds 已提交
434 435
	}

436 437
	printk(KERN_WARNING "failed %d retries, sending error response\n",
	       bt->BT_CAP_retries);
C
Corey Minyard 已提交
438 439 440 441 442 443 444 445
	if (!bt->nonzero_status)
		printk(KERN_ERR "IPMI BT: stuck, try power cycle\n");

	/* this is most likely during insmod */
	else if (bt->seq <= (unsigned char)(bt->BT_CAP_retries & 0xFF)) {
		printk(KERN_WARNING "IPMI: BT reset (takes 5 secs)\n");
		bt->state = BT_STATE_RESET1;
		return SI_SM_CALL_WITHOUT_DELAY;
L
Linus Torvalds 已提交
446 447
	}

448 449 450 451
	/*
	 * Concoct a useful error message, set up the next state, and
	 * be done with this sequence.
	 */
C
Corey Minyard 已提交
452 453 454 455 456 457 458 459 460 461 462 463 464 465

	bt->state = BT_STATE_IDLE;
	switch (cCode) {
	case IPMI_TIMEOUT_ERR:
		if (status & BT_B_BUSY) {
			cCode = IPMI_NODE_BUSY_ERR;
			bt->state = BT_STATE_LONG_BUSY;
		}
		break;
	default:
		break;
	}
	force_result(bt, cCode);
	return SI_SM_TRANSACTION_COMPLETE;
L
Linus Torvalds 已提交
466 467
}

C
Corey Minyard 已提交
468
/* Check status and (usually) take action and change this state machine. */
L
Linus Torvalds 已提交
469 470 471

static enum si_sm_result bt_event(struct si_sm_data *bt, long time)
{
C
Corey Minyard 已提交
472 473
	unsigned char status, BT_CAP[8];
	static enum bt_states last_printed = BT_STATE_PRINTME;
L
Linus Torvalds 已提交
474 475 476 477
	int i;

	status = BT_STATUS;
	bt->nonzero_status |= status;
C
Corey Minyard 已提交
478
	if ((bt_debug & BT_DEBUG_STATES) && (bt->state != last_printed)) {
L
Linus Torvalds 已提交
479 480
		printk(KERN_WARNING "BT: %s %s TO=%ld - %ld \n",
			STATE2TXT,
C
Corey Minyard 已提交
481
			STATUS2TXT,
L
Linus Torvalds 已提交
482 483
			bt->timeout,
			time);
C
Corey Minyard 已提交
484 485
		last_printed = bt->state;
	}
L
Linus Torvalds 已提交
486

487 488 489 490 491 492
	/*
	 * Commands that time out may still (eventually) provide a response.
	 * This stale response will get in the way of a new response so remove
	 * it if possible (hopefully during IDLE).  Even if it comes up later
	 * it will be rejected by its (now-forgotten) seq number.
	 */
C
Corey Minyard 已提交
493 494 495 496 497

	if ((bt->state < BT_STATE_WRITE_BYTES) && (status & BT_B2H_ATN)) {
		drain_BMC2HOST(bt);
		BT_SI_SM_RETURN(SI_SM_CALL_WITH_DELAY);
	}
L
Linus Torvalds 已提交
498

C
Corey Minyard 已提交
499
	if ((bt->state != BT_STATE_IDLE) &&
500 501
	    (bt->state <  BT_STATE_PRINTME)) {
		/* check timeout */
L
Linus Torvalds 已提交
502
		bt->timeout -= time;
C
Corey Minyard 已提交
503 504 505 506
		if ((bt->timeout < 0) && (bt->state < BT_STATE_RESET1))
			return error_recovery(bt,
					      status,
					      IPMI_TIMEOUT_ERR);
L
Linus Torvalds 已提交
507 508 509 510
	}

	switch (bt->state) {

511 512 513 514
	/*
	 * Idle state first checks for asynchronous messages from another
	 * channel, then does some opportunistic housekeeping.
	 */
C
Corey Minyard 已提交
515 516

	case BT_STATE_IDLE:
L
Linus Torvalds 已提交
517 518 519 520 521
		if (status & BT_SMS_ATN) {
			BT_CONTROL(BT_SMS_ATN);	/* clear it */
			return SI_SM_ATTN;
		}

C
Corey Minyard 已提交
522
		if (status & BT_H_BUSY)		/* clear a leftover H_BUSY */
L
Linus Torvalds 已提交
523 524
			BT_CONTROL(BT_H_BUSY);

C
Corey Minyard 已提交
525 526 527 528 529 530 531 532
		/* Read BT capabilities if it hasn't been done yet */
		if (!bt->BT_CAP_outreqs)
			BT_STATE_CHANGE(BT_STATE_CAPABILITIES_BEGIN,
					SI_SM_CALL_WITHOUT_DELAY);
		bt->timeout = bt->BT_CAP_req2rsp;
		BT_SI_SM_RETURN(SI_SM_IDLE);

	case BT_STATE_XACTION_START:
C
Corey Minyard 已提交
533
		if (status & (BT_B_BUSY | BT_H2B_ATN))
C
Corey Minyard 已提交
534 535 536 537 538 539 540 541 542
			BT_SI_SM_RETURN(SI_SM_CALL_WITH_DELAY);
		if (BT_STATUS & BT_H_BUSY)
			BT_CONTROL(BT_H_BUSY);	/* force clear */
		BT_STATE_CHANGE(BT_STATE_WRITE_BYTES,
				SI_SM_CALL_WITHOUT_DELAY);

	case BT_STATE_WRITE_BYTES:
		if (status & BT_H_BUSY)
			BT_CONTROL(BT_H_BUSY);	/* clear */
L
Linus Torvalds 已提交
543 544
		BT_CONTROL(BT_CLR_WR_PTR);
		write_all_bytes(bt);
C
Corey Minyard 已提交
545 546 547
		BT_CONTROL(BT_H2B_ATN);	/* can clear too fast to catch */
		BT_STATE_CHANGE(BT_STATE_WRITE_CONSUME,
				SI_SM_CALL_WITHOUT_DELAY);
L
Linus Torvalds 已提交
548

C
Corey Minyard 已提交
549 550 551 552 553 554 555 556 557 558 559 560 561
	case BT_STATE_WRITE_CONSUME:
		if (status & (BT_B_BUSY | BT_H2B_ATN))
			BT_SI_SM_RETURN(SI_SM_CALL_WITH_DELAY);
		BT_STATE_CHANGE(BT_STATE_READ_WAIT,
				SI_SM_CALL_WITHOUT_DELAY);

	/* Spinning hard can suppress B2H_ATN and force a timeout */

	case BT_STATE_READ_WAIT:
		if (!(status & BT_B2H_ATN))
			BT_SI_SM_RETURN(SI_SM_CALL_WITH_DELAY);
		BT_CONTROL(BT_H_BUSY);		/* set */

562 563 564 565 566
		/*
		 * Uncached, ordered writes should just proceeed serially but
		 * some BMCs don't clear B2H_ATN with one hit.  Fast-path a
		 * workaround without too much penalty to the general case.
		 */
C
Corey Minyard 已提交
567 568 569 570 571 572

		BT_CONTROL(BT_B2H_ATN);		/* clear it to ACK the BMC */
		BT_STATE_CHANGE(BT_STATE_CLEAR_B2H,
				SI_SM_CALL_WITHOUT_DELAY);

	case BT_STATE_CLEAR_B2H:
573 574
		if (status & BT_B2H_ATN) {
			/* keep hitting it */
C
Corey Minyard 已提交
575 576 577 578 579 580 581
			BT_CONTROL(BT_B2H_ATN);
			BT_SI_SM_RETURN(SI_SM_CALL_WITH_DELAY);
		}
		BT_STATE_CHANGE(BT_STATE_READ_BYTES,
				SI_SM_CALL_WITHOUT_DELAY);

	case BT_STATE_READ_BYTES:
582 583
		if (!(status & BT_H_BUSY))
			/* check in case of retry */
C
Corey Minyard 已提交
584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601
			BT_CONTROL(BT_H_BUSY);
		BT_CONTROL(BT_CLR_RD_PTR);	/* start of BMC2HOST buffer */
		i = read_all_bytes(bt);		/* true == packet seq match */
		BT_CONTROL(BT_H_BUSY);		/* NOW clear */
		if (!i) 			/* Not my message */
			BT_STATE_CHANGE(BT_STATE_READ_WAIT,
					SI_SM_CALL_WITHOUT_DELAY);
		bt->state = bt->complete;
		return bt->state == BT_STATE_IDLE ?	/* where to next? */
			SI_SM_TRANSACTION_COMPLETE :	/* normal */
			SI_SM_CALL_WITHOUT_DELAY;	/* Startup magic */

	case BT_STATE_LONG_BUSY:	/* For example: after FW update */
		if (!(status & BT_B_BUSY)) {
			reset_flags(bt);	/* next state is now IDLE */
			bt_init_data(bt, bt->io);
		}
		return SI_SM_CALL_WITH_DELAY;	/* No repeat printing */
L
Linus Torvalds 已提交
602 603

	case BT_STATE_RESET1:
C
Corey Minyard 已提交
604 605 606 607
		reset_flags(bt);
		drain_BMC2HOST(bt);
		BT_STATE_CHANGE(BT_STATE_RESET2,
				SI_SM_CALL_WITH_DELAY);
L
Linus Torvalds 已提交
608 609 610 611 612 613 614 615

	case BT_STATE_RESET2:		/* Send a soft reset */
		BT_CONTROL(BT_CLR_WR_PTR);
		HOST2BMC(3);		/* number of bytes following */
		HOST2BMC(0x18);		/* NetFn/LUN == Application, LUN 0 */
		HOST2BMC(42);		/* Sequence number */
		HOST2BMC(3);		/* Cmd == Soft reset */
		BT_CONTROL(BT_H2B_ATN);
C
Corey Minyard 已提交
616 617 618
		bt->timeout = BT_RESET_DELAY * 1000000;
		BT_STATE_CHANGE(BT_STATE_RESET3,
				SI_SM_CALL_WITH_DELAY);
L
Linus Torvalds 已提交
619

C
Corey Minyard 已提交
620
	case BT_STATE_RESET3:		/* Hold off everything for a bit */
C
Corey Minyard 已提交
621
		if (bt->timeout > 0)
C
Corey Minyard 已提交
622 623 624 625
			return SI_SM_CALL_WITH_DELAY;
		drain_BMC2HOST(bt);
		BT_STATE_CHANGE(BT_STATE_RESTART,
				SI_SM_CALL_WITH_DELAY);
L
Linus Torvalds 已提交
626

C
Corey Minyard 已提交
627
	case BT_STATE_RESTART:		/* don't reset retries or seq! */
L
Linus Torvalds 已提交
628 629
		bt->read_count = 0;
		bt->nonzero_status = 0;
C
Corey Minyard 已提交
630 631 632 633
		bt->timeout = bt->BT_CAP_req2rsp;
		BT_STATE_CHANGE(BT_STATE_XACTION_START,
				SI_SM_CALL_WITH_DELAY);

634 635 636 637
	/*
	 * Get BT Capabilities, using timing of upper level state machine.
	 * Set outreqs to prevent infinite loop on timeout.
	 */
C
Corey Minyard 已提交
638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670
	case BT_STATE_CAPABILITIES_BEGIN:
		bt->BT_CAP_outreqs = 1;
		{
			unsigned char GetBT_CAP[] = { 0x18, 0x36 };
			bt->state = BT_STATE_IDLE;
			bt_start_transaction(bt, GetBT_CAP, sizeof(GetBT_CAP));
		}
		bt->complete = BT_STATE_CAPABILITIES_END;
		BT_STATE_CHANGE(BT_STATE_XACTION_START,
				SI_SM_CALL_WITH_DELAY);

	case BT_STATE_CAPABILITIES_END:
		i = bt_get_result(bt, BT_CAP, sizeof(BT_CAP));
		bt_init_data(bt, bt->io);
		if ((i == 8) && !BT_CAP[2]) {
			bt->BT_CAP_outreqs = BT_CAP[3];
			bt->BT_CAP_req2rsp = BT_CAP[6] * 1000000;
			bt->BT_CAP_retries = BT_CAP[7];
		} else
			printk(KERN_WARNING "IPMI BT: using default values\n");
		if (!bt->BT_CAP_outreqs)
			bt->BT_CAP_outreqs = 1;
		printk(KERN_WARNING "IPMI BT: req2rsp=%ld secs retries=%d\n",
			bt->BT_CAP_req2rsp / 1000000L, bt->BT_CAP_retries);
		bt->timeout = bt->BT_CAP_req2rsp;
		return SI_SM_CALL_WITHOUT_DELAY;

	default:	/* should never occur */
		return error_recovery(bt,
				      status,
				      IPMI_ERR_UNSPECIFIED);
	}
	return SI_SM_CALL_WITH_DELAY;
L
Linus Torvalds 已提交
671 672 673 674
}

static int bt_detect(struct si_sm_data *bt)
{
675 676 677 678 679 680
	/*
	 * It's impossible for the BT status and interrupt registers to be
	 * all 1's, (assuming a properly functioning, self-initialized BMC)
	 * but that's what you get from reading a bogus address, so we
	 * test that first.  The calling routine uses negative logic.
	 */
L
Linus Torvalds 已提交
681

C
Corey Minyard 已提交
682
	if ((BT_STATUS == 0xFF) && (BT_INTMASK_R == 0xFF))
C
Corey Minyard 已提交
683
		return 1;
L
Linus Torvalds 已提交
684 685 686 687 688 689 690 691 692 693 694 695 696
	reset_flags(bt);
	return 0;
}

static void bt_cleanup(struct si_sm_data *bt)
{
}

static int bt_size(void)
{
	return sizeof(struct si_sm_data);
}

697
struct si_sm_handlers bt_smi_handlers = {
C
Corey Minyard 已提交
698 699 700 701 702 703 704
	.init_data		= bt_init_data,
	.start_transaction	= bt_start_transaction,
	.get_result		= bt_get_result,
	.event			= bt_event,
	.detect			= bt_detect,
	.cleanup		= bt_cleanup,
	.size			= bt_size,
L
Linus Torvalds 已提交
705
};