ipmi_si_intf.c 89.0 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11
/*
 * ipmi_si.c
 *
 * The interface to the IPMI driver for the system interfaces (KCS, SMIC,
 * BT).
 *
 * Author: MontaVista Software, Inc.
 *         Corey Minyard <minyard@mvista.com>
 *         source@mvista.com
 *
 * Copyright 2002 MontaVista Software Inc.
12
 * Copyright 2006 IBM Corp., Christian Krafft <krafft@de.ibm.com>
L
Linus Torvalds 已提交
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
 *
 *  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.
 */

/*
 * This file holds the "policy" for the interface to the SMI state
 * machine.  It does the configuration, handles timers and interrupts,
 * and drives the real SMI state machine.
 */

#include <linux/module.h>
#include <linux/moduleparam.h>
#include <asm/system.h>
#include <linux/sched.h>
46
#include <linux/seq_file.h>
L
Linus Torvalds 已提交
47 48 49 50 51 52 53 54
#include <linux/timer.h>
#include <linux/errno.h>
#include <linux/spinlock.h>
#include <linux/slab.h>
#include <linux/delay.h>
#include <linux/list.h>
#include <linux/pci.h>
#include <linux/ioport.h>
55
#include <linux/notifier.h>
56
#include <linux/mutex.h>
M
Matt Domsch 已提交
57
#include <linux/kthread.h>
L
Linus Torvalds 已提交
58 59 60
#include <asm/irq.h>
#include <linux/interrupt.h>
#include <linux/rcupdate.h>
61
#include <linux/ipmi.h>
L
Linus Torvalds 已提交
62 63 64 65
#include <linux/ipmi_smi.h>
#include <asm/io.h>
#include "ipmi_si_sm.h"
#include <linux/init.h>
66
#include <linux/dmi.h>
67 68
#include <linux/string.h>
#include <linux/ctype.h>
69
#include <linux/pnp.h>
70 71
#include <linux/of_device.h>
#include <linux/of_platform.h>
72 73
#include <linux/of_address.h>
#include <linux/of_irq.h>
74

75
#define PFX "ipmi_si: "
L
Linus Torvalds 已提交
76 77 78 79 80 81 82 83 84

/* Measure times between events in the driver. */
#undef DEBUG_TIMING

/* Call every 10 ms. */
#define SI_TIMEOUT_TIME_USEC	10000
#define SI_USEC_PER_JIFFY	(1000000/HZ)
#define SI_TIMEOUT_JIFFIES	(SI_TIMEOUT_TIME_USEC/SI_USEC_PER_JIFFY)
#define SI_SHORT_TIMEOUT_USEC  250 /* .25ms when the SM request a
85
				      short timeout */
L
Linus Torvalds 已提交
86 87 88 89 90 91 92 93 94

enum si_intf_state {
	SI_NORMAL,
	SI_GETTING_FLAGS,
	SI_GETTING_EVENTS,
	SI_CLEARING_FLAGS,
	SI_CLEARING_FLAGS_THEN_SET_IRQ,
	SI_GETTING_MESSAGES,
	SI_ENABLE_INTERRUPTS1,
C
Corey Minyard 已提交
95 96 97
	SI_ENABLE_INTERRUPTS2,
	SI_DISABLE_INTERRUPTS1,
	SI_DISABLE_INTERRUPTS2
L
Linus Torvalds 已提交
98 99 100
	/* FIXME - add watchdog stuff. */
};

101 102 103 104 105
/* Some BT-specific defines we need here. */
#define IPMI_BT_INTMASK_REG		2
#define IPMI_BT_INTMASK_CLEAR_IRQ_BIT	2
#define IPMI_BT_INTMASK_ENABLE_IRQ_BIT	1

L
Linus Torvalds 已提交
106 107 108
enum si_type {
    SI_KCS, SI_SMIC, SI_BT
};
109
static char *si_to_str[] = { "kcs", "smic", "bt" };
L
Linus Torvalds 已提交
110

111 112 113 114
static char *ipmi_addr_src_to_str[] = { NULL, "hotmod", "hardcoded", "SPMI",
					"ACPI", "SMBIOS", "PCI",
					"device-tree", "default" };

115 116
#define DEVICE_NAME "ipmi_si"

117
static struct platform_driver ipmi_driver;
118 119 120 121

/*
 * Indexes into stats[] in smi_info below.
 */
122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142
enum si_stat_indexes {
	/*
	 * Number of times the driver requested a timer while an operation
	 * was in progress.
	 */
	SI_STAT_short_timeouts = 0,

	/*
	 * Number of times the driver requested a timer while nothing was in
	 * progress.
	 */
	SI_STAT_long_timeouts,

	/* Number of times the interface was idle while being polled. */
	SI_STAT_idles,

	/* Number of interrupts the driver handled. */
	SI_STAT_interrupts,

	/* Number of time the driver got an ATTN from the hardware. */
	SI_STAT_attentions,
143

144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165
	/* Number of times the driver requested flags from the hardware. */
	SI_STAT_flag_fetches,

	/* Number of times the hardware didn't follow the state machine. */
	SI_STAT_hosed_count,

	/* Number of completed messages. */
	SI_STAT_complete_transactions,

	/* Number of IPMI events received from the hardware. */
	SI_STAT_events,

	/* Number of watchdog pretimeouts. */
	SI_STAT_watchdog_pretimeouts,

	/* Number of asyncronous messages received. */
	SI_STAT_incoming_messages,


	/* This *must* remain last, add new values above this. */
	SI_NUM_STATS
};
166

167
struct smi_info {
C
Corey Minyard 已提交
168
	int                    intf_num;
L
Linus Torvalds 已提交
169 170 171 172 173 174 175 176 177 178 179
	ipmi_smi_t             intf;
	struct si_sm_data      *si_sm;
	struct si_sm_handlers  *handlers;
	enum si_type           si_type;
	spinlock_t             si_lock;
	spinlock_t             msg_lock;
	struct list_head       xmit_msgs;
	struct list_head       hp_xmit_msgs;
	struct ipmi_smi_msg    *curr_msg;
	enum si_intf_state     si_state;

180 181 182 183
	/*
	 * Used to handle the various types of I/O that can occur with
	 * IPMI
	 */
L
Linus Torvalds 已提交
184 185 186 187 188 189
	struct si_sm_io io;
	int (*io_setup)(struct smi_info *info);
	void (*io_cleanup)(struct smi_info *info);
	int (*irq_setup)(struct smi_info *info);
	void (*irq_cleanup)(struct smi_info *info);
	unsigned int io_size;
190
	enum ipmi_addr_src addr_source; /* ACPI, PCI, SMBIOS, hardcode, etc. */
191 192
	void (*addr_source_cleanup)(struct smi_info *info);
	void *addr_source_data;
L
Linus Torvalds 已提交
193

194 195 196 197 198
	/*
	 * Per-OEM handler, called from handle_flags().  Returns 1
	 * when handle_flags() needs to be re-run or 0 indicating it
	 * set si_state itself.
	 */
199 200
	int (*oem_data_avail_handler)(struct smi_info *smi_info);

201 202 203 204 205
	/*
	 * Flags from the last GET_MSG_FLAGS command, used when an ATTN
	 * is set to hold the flags until we are done handling everything
	 * from the flags.
	 */
L
Linus Torvalds 已提交
206 207 208
#define RECEIVE_MSG_AVAIL	0x01
#define EVENT_MSG_BUFFER_FULL	0x02
#define WDT_PRE_TIMEOUT_INT	0x08
209 210 211 212
#define OEM0_DATA_AVAIL     0x20
#define OEM1_DATA_AVAIL     0x40
#define OEM2_DATA_AVAIL     0x80
#define OEM_DATA_AVAIL      (OEM0_DATA_AVAIL | \
213 214
			     OEM1_DATA_AVAIL | \
			     OEM2_DATA_AVAIL)
L
Linus Torvalds 已提交
215 216
	unsigned char       msg_flags;

217 218 219
	/* Does the BMC have an event buffer? */
	char		    has_event_buffer;

220 221 222 223
	/*
	 * If set to true, this will request events the next time the
	 * state machine is idle.
	 */
L
Linus Torvalds 已提交
224 225
	atomic_t            req_events;

226 227 228 229 230
	/*
	 * If true, run the state machine to completion on every send
	 * call.  Generally used after a panic to make sure stuff goes
	 * out.
	 */
L
Linus Torvalds 已提交
231 232 233 234 235
	int                 run_to_completion;

	/* The I/O port of an SI interface. */
	int                 port;

236 237 238 239 240
	/*
	 * The space between start addresses of the two ports.  For
	 * instance, if the first port is 0xca2 and the spacing is 4, then
	 * the second port is 0xca6.
	 */
L
Linus Torvalds 已提交
241 242 243 244 245 246 247 248 249 250 251 252
	unsigned int        spacing;

	/* zero if no irq; */
	int                 irq;

	/* The timer for this si. */
	struct timer_list   si_timer;

	/* The time (in jiffies) the last timeout occurred at. */
	unsigned long       last_timeout_jiffies;

	/* Used to gracefully stop the timer without race conditions. */
C
Corey Minyard 已提交
253
	atomic_t            stop_operation;
L
Linus Torvalds 已提交
254

255 256 257 258 259 260
	/*
	 * The driver will disable interrupts when it gets into a
	 * situation where it cannot handle messages due to lack of
	 * memory.  Once that situation clears up, it will re-enable
	 * interrupts.
	 */
L
Linus Torvalds 已提交
261 262
	int interrupt_disabled;

263
	/* From the get device id response... */
264
	struct ipmi_device_id device_id;
L
Linus Torvalds 已提交
265

266 267 268 269
	/* Driver model stuff. */
	struct device *dev;
	struct platform_device *pdev;

270 271 272 273
	/*
	 * True if we allocated the device, false if it came from
	 * someplace else (like PCI).
	 */
274 275
	int dev_registered;

L
Linus Torvalds 已提交
276 277 278 279
	/* Slave address, could be reported from DMI. */
	unsigned char slave_addr;

	/* Counters and things for the proc filesystem. */
280
	atomic_t stats[SI_NUM_STATS];
C
Corey Minyard 已提交
281

282
	struct task_struct *thread;
283 284

	struct list_head link;
285
	union ipmi_smi_info_union addr_info;
L
Linus Torvalds 已提交
286 287
};

288 289 290 291 292
#define smi_inc_stat(smi, stat) \
	atomic_inc(&(smi)->stats[SI_STAT_ ## stat])
#define smi_get_stat(smi, stat) \
	((unsigned int) atomic_read(&(smi)->stats[SI_STAT_ ## stat]))

293 294 295 296
#define SI_MAX_PARMS 4

static int force_kipmid[SI_MAX_PARMS];
static int num_force_kipmid;
297 298 299
#ifdef CONFIG_PCI
static int pci_registered;
#endif
300 301 302
#ifdef CONFIG_ACPI
static int pnp_registered;
#endif
303

304 305 306
static unsigned int kipmid_max_busy_us[SI_MAX_PARMS];
static int num_max_busy_us;

307 308
static int unload_when_empty = 1;

309
static int add_smi(struct smi_info *smi);
310
static int try_smi_init(struct smi_info *smi);
311
static void cleanup_one_si(struct smi_info *to_clean);
312
static void cleanup_ipmi_si(void);
313

314
static ATOMIC_NOTIFIER_HEAD(xaction_notifier_list);
315
static int register_xaction_notifier(struct notifier_block *nb)
316
{
317
	return atomic_notifier_chain_register(&xaction_notifier_list, nb);
318 319
}

L
Linus Torvalds 已提交
320 321 322
static void deliver_recv_msg(struct smi_info *smi_info,
			     struct ipmi_smi_msg *msg)
{
323 324
	/* Deliver the message to the upper layer. */
	ipmi_smi_msg_received(smi_info->intf, msg);
L
Linus Torvalds 已提交
325 326
}

C
Corey Minyard 已提交
327
static void return_hosed_msg(struct smi_info *smi_info, int cCode)
L
Linus Torvalds 已提交
328 329 330
{
	struct ipmi_smi_msg *msg = smi_info->curr_msg;

C
Corey Minyard 已提交
331 332 333 334
	if (cCode < 0 || cCode > IPMI_ERR_UNSPECIFIED)
		cCode = IPMI_ERR_UNSPECIFIED;
	/* else use it as is */

L
Lucas De Marchi 已提交
335
	/* Make it a response */
L
Linus Torvalds 已提交
336 337
	msg->rsp[0] = msg->data[0] | 4;
	msg->rsp[1] = msg->data[1];
C
Corey Minyard 已提交
338
	msg->rsp[2] = cCode;
L
Linus Torvalds 已提交
339 340 341 342 343 344 345 346 347 348 349 350 351 352
	msg->rsp_size = 3;

	smi_info->curr_msg = NULL;
	deliver_recv_msg(smi_info, msg);
}

static enum si_sm_result start_next_msg(struct smi_info *smi_info)
{
	int              rv;
	struct list_head *entry = NULL;
#ifdef DEBUG_TIMING
	struct timeval t;
#endif

353 354 355 356
	/*
	 * No need to save flags, we aleady have interrupts off and we
	 * already hold the SMI lock.
	 */
357 358
	if (!smi_info->run_to_completion)
		spin_lock(&(smi_info->msg_lock));
L
Linus Torvalds 已提交
359 360

	/* Pick the high priority queue first. */
361
	if (!list_empty(&(smi_info->hp_xmit_msgs))) {
L
Linus Torvalds 已提交
362
		entry = smi_info->hp_xmit_msgs.next;
363
	} else if (!list_empty(&(smi_info->xmit_msgs))) {
L
Linus Torvalds 已提交
364 365 366
		entry = smi_info->xmit_msgs.next;
	}

367
	if (!entry) {
L
Linus Torvalds 已提交
368 369 370 371 372 373 374 375 376 377 378
		smi_info->curr_msg = NULL;
		rv = SI_SM_IDLE;
	} else {
		int err;

		list_del(entry);
		smi_info->curr_msg = list_entry(entry,
						struct ipmi_smi_msg,
						link);
#ifdef DEBUG_TIMING
		do_gettimeofday(&t);
379
		printk(KERN_DEBUG "**Start2: %d.%9.9d\n", t.tv_sec, t.tv_usec);
L
Linus Torvalds 已提交
380
#endif
381 382
		err = atomic_notifier_call_chain(&xaction_notifier_list,
				0, smi_info);
383 384 385 386
		if (err & NOTIFY_STOP_MASK) {
			rv = SI_SM_CALL_WITHOUT_DELAY;
			goto out;
		}
L
Linus Torvalds 已提交
387 388 389 390
		err = smi_info->handlers->start_transaction(
			smi_info->si_sm,
			smi_info->curr_msg->data,
			smi_info->curr_msg->data_size);
391
		if (err)
C
Corey Minyard 已提交
392
			return_hosed_msg(smi_info, err);
L
Linus Torvalds 已提交
393 394 395

		rv = SI_SM_CALL_WITHOUT_DELAY;
	}
396
 out:
397 398
	if (!smi_info->run_to_completion)
		spin_unlock(&(smi_info->msg_lock));
L
Linus Torvalds 已提交
399 400 401 402 403 404 405 406

	return rv;
}

static void start_enable_irq(struct smi_info *smi_info)
{
	unsigned char msg[2];

407 408 409 410
	/*
	 * If we are enabling interrupts, we have to tell the
	 * BMC to use them.
	 */
L
Linus Torvalds 已提交
411 412 413 414 415 416 417
	msg[0] = (IPMI_NETFN_APP_REQUEST << 2);
	msg[1] = IPMI_GET_BMC_GLOBAL_ENABLES_CMD;

	smi_info->handlers->start_transaction(smi_info->si_sm, msg, 2);
	smi_info->si_state = SI_ENABLE_INTERRUPTS1;
}

C
Corey Minyard 已提交
418 419 420 421 422 423 424 425 426 427 428
static void start_disable_irq(struct smi_info *smi_info)
{
	unsigned char msg[2];

	msg[0] = (IPMI_NETFN_APP_REQUEST << 2);
	msg[1] = IPMI_GET_BMC_GLOBAL_ENABLES_CMD;

	smi_info->handlers->start_transaction(smi_info->si_sm, msg, 2);
	smi_info->si_state = SI_DISABLE_INTERRUPTS1;
}

L
Linus Torvalds 已提交
429 430 431 432 433 434 435 436 437 438 439 440 441
static void start_clear_flags(struct smi_info *smi_info)
{
	unsigned char msg[3];

	/* Make sure the watchdog pre-timeout flag is not set at startup. */
	msg[0] = (IPMI_NETFN_APP_REQUEST << 2);
	msg[1] = IPMI_CLEAR_MSG_FLAGS_CMD;
	msg[2] = WDT_PRE_TIMEOUT_INT;

	smi_info->handlers->start_transaction(smi_info->si_sm, msg, 3);
	smi_info->si_state = SI_CLEARING_FLAGS;
}

442 443 444 445 446 447
/*
 * When we have a situtaion where we run out of memory and cannot
 * allocate messages, we just leave them in the BMC and run the system
 * polled until we can allocate some memory.  Once we have some
 * memory, we will re-enable the interrupt.
 */
L
Linus Torvalds 已提交
448 449
static inline void disable_si_irq(struct smi_info *smi_info)
{
450
	if ((smi_info->irq) && (!smi_info->interrupt_disabled)) {
C
Corey Minyard 已提交
451
		start_disable_irq(smi_info);
L
Linus Torvalds 已提交
452
		smi_info->interrupt_disabled = 1;
453 454 455
		if (!atomic_read(&smi_info->stop_operation))
			mod_timer(&smi_info->si_timer,
				  jiffies + SI_TIMEOUT_JIFFIES);
L
Linus Torvalds 已提交
456 457 458 459 460 461
	}
}

static inline void enable_si_irq(struct smi_info *smi_info)
{
	if ((smi_info->irq) && (smi_info->interrupt_disabled)) {
C
Corey Minyard 已提交
462
		start_enable_irq(smi_info);
L
Linus Torvalds 已提交
463 464 465 466 467 468
		smi_info->interrupt_disabled = 0;
	}
}

static void handle_flags(struct smi_info *smi_info)
{
469
 retry:
L
Linus Torvalds 已提交
470 471
	if (smi_info->msg_flags & WDT_PRE_TIMEOUT_INT) {
		/* Watchdog pre-timeout */
472
		smi_inc_stat(smi_info, watchdog_pretimeouts);
L
Linus Torvalds 已提交
473 474 475 476 477 478 479

		start_clear_flags(smi_info);
		smi_info->msg_flags &= ~WDT_PRE_TIMEOUT_INT;
		ipmi_smi_watchdog_pretimeout(smi_info->intf);
	} else if (smi_info->msg_flags & RECEIVE_MSG_AVAIL) {
		/* Messages available. */
		smi_info->curr_msg = ipmi_alloc_smi_msg();
480
		if (!smi_info->curr_msg) {
L
Linus Torvalds 已提交
481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498
			disable_si_irq(smi_info);
			smi_info->si_state = SI_NORMAL;
			return;
		}
		enable_si_irq(smi_info);

		smi_info->curr_msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
		smi_info->curr_msg->data[1] = IPMI_GET_MSG_CMD;
		smi_info->curr_msg->data_size = 2;

		smi_info->handlers->start_transaction(
			smi_info->si_sm,
			smi_info->curr_msg->data,
			smi_info->curr_msg->data_size);
		smi_info->si_state = SI_GETTING_MESSAGES;
	} else if (smi_info->msg_flags & EVENT_MSG_BUFFER_FULL) {
		/* Events available. */
		smi_info->curr_msg = ipmi_alloc_smi_msg();
499
		if (!smi_info->curr_msg) {
L
Linus Torvalds 已提交
500 501 502 503 504 505 506 507 508 509 510 511 512 513 514
			disable_si_irq(smi_info);
			smi_info->si_state = SI_NORMAL;
			return;
		}
		enable_si_irq(smi_info);

		smi_info->curr_msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
		smi_info->curr_msg->data[1] = IPMI_READ_EVENT_MSG_BUFFER_CMD;
		smi_info->curr_msg->data_size = 2;

		smi_info->handlers->start_transaction(
			smi_info->si_sm,
			smi_info->curr_msg->data,
			smi_info->curr_msg->data_size);
		smi_info->si_state = SI_GETTING_EVENTS;
515
	} else if (smi_info->msg_flags & OEM_DATA_AVAIL &&
516
		   smi_info->oem_data_avail_handler) {
517 518
		if (smi_info->oem_data_avail_handler(smi_info))
			goto retry;
519
	} else
L
Linus Torvalds 已提交
520 521 522 523 524 525 526 527 528 529
		smi_info->si_state = SI_NORMAL;
}

static void handle_transaction_done(struct smi_info *smi_info)
{
	struct ipmi_smi_msg *msg;
#ifdef DEBUG_TIMING
	struct timeval t;

	do_gettimeofday(&t);
530
	printk(KERN_DEBUG "**Done: %d.%9.9d\n", t.tv_sec, t.tv_usec);
L
Linus Torvalds 已提交
531 532 533
#endif
	switch (smi_info->si_state) {
	case SI_NORMAL:
534
		if (!smi_info->curr_msg)
L
Linus Torvalds 已提交
535 536 537 538 539 540 541 542
			break;

		smi_info->curr_msg->rsp_size
			= smi_info->handlers->get_result(
				smi_info->si_sm,
				smi_info->curr_msg->rsp,
				IPMI_MAX_MSG_LENGTH);

543 544 545 546 547
		/*
		 * Do this here becase deliver_recv_msg() releases the
		 * lock, and a new message can be put in during the
		 * time the lock is released.
		 */
L
Linus Torvalds 已提交
548 549 550 551 552 553 554 555 556 557 558 559 560
		msg = smi_info->curr_msg;
		smi_info->curr_msg = NULL;
		deliver_recv_msg(smi_info, msg);
		break;

	case SI_GETTING_FLAGS:
	{
		unsigned char msg[4];
		unsigned int  len;

		/* We got the flags from the SMI, now handle them. */
		len = smi_info->handlers->get_result(smi_info->si_sm, msg, 4);
		if (msg[2] != 0) {
561
			/* Error fetching flags, just give up for now. */
L
Linus Torvalds 已提交
562 563
			smi_info->si_state = SI_NORMAL;
		} else if (len < 4) {
564 565 566 567
			/*
			 * Hmm, no flags.  That's technically illegal, but
			 * don't use uninitialized data.
			 */
L
Linus Torvalds 已提交
568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584
			smi_info->si_state = SI_NORMAL;
		} else {
			smi_info->msg_flags = msg[3];
			handle_flags(smi_info);
		}
		break;
	}

	case SI_CLEARING_FLAGS:
	case SI_CLEARING_FLAGS_THEN_SET_IRQ:
	{
		unsigned char msg[3];

		/* We cleared the flags. */
		smi_info->handlers->get_result(smi_info->si_sm, msg, 3);
		if (msg[2] != 0) {
			/* Error clearing flags */
585 586
			dev_warn(smi_info->dev,
				 "Error clearing flags: %2.2x\n", msg[2]);
L
Linus Torvalds 已提交
587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602
		}
		if (smi_info->si_state == SI_CLEARING_FLAGS_THEN_SET_IRQ)
			start_enable_irq(smi_info);
		else
			smi_info->si_state = SI_NORMAL;
		break;
	}

	case SI_GETTING_EVENTS:
	{
		smi_info->curr_msg->rsp_size
			= smi_info->handlers->get_result(
				smi_info->si_sm,
				smi_info->curr_msg->rsp,
				IPMI_MAX_MSG_LENGTH);

603 604 605 606 607
		/*
		 * Do this here becase deliver_recv_msg() releases the
		 * lock, and a new message can be put in during the
		 * time the lock is released.
		 */
L
Linus Torvalds 已提交
608 609 610 611 612 613 614 615 616 617
		msg = smi_info->curr_msg;
		smi_info->curr_msg = NULL;
		if (msg->rsp[2] != 0) {
			/* Error getting event, probably done. */
			msg->done(msg);

			/* Take off the event flag. */
			smi_info->msg_flags &= ~EVENT_MSG_BUFFER_FULL;
			handle_flags(smi_info);
		} else {
618
			smi_inc_stat(smi_info, events);
L
Linus Torvalds 已提交
619

620 621 622 623 624 625
			/*
			 * Do this before we deliver the message
			 * because delivering the message releases the
			 * lock and something else can mess with the
			 * state.
			 */
L
Linus Torvalds 已提交
626 627 628 629 630 631 632 633 634 635 636 637 638 639 640
			handle_flags(smi_info);

			deliver_recv_msg(smi_info, msg);
		}
		break;
	}

	case SI_GETTING_MESSAGES:
	{
		smi_info->curr_msg->rsp_size
			= smi_info->handlers->get_result(
				smi_info->si_sm,
				smi_info->curr_msg->rsp,
				IPMI_MAX_MSG_LENGTH);

641 642 643 644 645
		/*
		 * Do this here becase deliver_recv_msg() releases the
		 * lock, and a new message can be put in during the
		 * time the lock is released.
		 */
L
Linus Torvalds 已提交
646 647 648 649 650 651 652 653 654 655
		msg = smi_info->curr_msg;
		smi_info->curr_msg = NULL;
		if (msg->rsp[2] != 0) {
			/* Error getting event, probably done. */
			msg->done(msg);

			/* Take off the msg flag. */
			smi_info->msg_flags &= ~RECEIVE_MSG_AVAIL;
			handle_flags(smi_info);
		} else {
656
			smi_inc_stat(smi_info, incoming_messages);
L
Linus Torvalds 已提交
657

658 659 660 661 662 663
			/*
			 * Do this before we deliver the message
			 * because delivering the message releases the
			 * lock and something else can mess with the
			 * state.
			 */
L
Linus Torvalds 已提交
664 665 666 667 668 669 670 671 672 673 674 675 676 677
			handle_flags(smi_info);

			deliver_recv_msg(smi_info, msg);
		}
		break;
	}

	case SI_ENABLE_INTERRUPTS1:
	{
		unsigned char msg[4];

		/* We got the flags from the SMI, now handle them. */
		smi_info->handlers->get_result(smi_info->si_sm, msg, 4);
		if (msg[2] != 0) {
678 679
			dev_warn(smi_info->dev, "Could not enable interrupts"
				 ", failed get, using polled mode.\n");
L
Linus Torvalds 已提交
680 681 682 683
			smi_info->si_state = SI_NORMAL;
		} else {
			msg[0] = (IPMI_NETFN_APP_REQUEST << 2);
			msg[1] = IPMI_SET_BMC_GLOBAL_ENABLES_CMD;
C
Corey Minyard 已提交
684 685 686
			msg[2] = (msg[3] |
				  IPMI_BMC_RCV_MSG_INTR |
				  IPMI_BMC_EVT_MSG_INTR);
L
Linus Torvalds 已提交
687 688 689 690 691 692 693 694 695 696 697 698 699
			smi_info->handlers->start_transaction(
				smi_info->si_sm, msg, 3);
			smi_info->si_state = SI_ENABLE_INTERRUPTS2;
		}
		break;
	}

	case SI_ENABLE_INTERRUPTS2:
	{
		unsigned char msg[4];

		/* We got the flags from the SMI, now handle them. */
		smi_info->handlers->get_result(smi_info->si_sm, msg, 4);
700 701 702 703
		if (msg[2] != 0)
			dev_warn(smi_info->dev, "Could not enable interrupts"
				 ", failed set, using polled mode.\n");
		else
704
			smi_info->interrupt_disabled = 0;
L
Linus Torvalds 已提交
705 706 707
		smi_info->si_state = SI_NORMAL;
		break;
	}
C
Corey Minyard 已提交
708 709 710 711 712 713 714 715

	case SI_DISABLE_INTERRUPTS1:
	{
		unsigned char msg[4];

		/* We got the flags from the SMI, now handle them. */
		smi_info->handlers->get_result(smi_info->si_sm, msg, 4);
		if (msg[2] != 0) {
716 717
			dev_warn(smi_info->dev, "Could not disable interrupts"
				 ", failed get.\n");
C
Corey Minyard 已提交
718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738
			smi_info->si_state = SI_NORMAL;
		} else {
			msg[0] = (IPMI_NETFN_APP_REQUEST << 2);
			msg[1] = IPMI_SET_BMC_GLOBAL_ENABLES_CMD;
			msg[2] = (msg[3] &
				  ~(IPMI_BMC_RCV_MSG_INTR |
				    IPMI_BMC_EVT_MSG_INTR));
			smi_info->handlers->start_transaction(
				smi_info->si_sm, msg, 3);
			smi_info->si_state = SI_DISABLE_INTERRUPTS2;
		}
		break;
	}

	case SI_DISABLE_INTERRUPTS2:
	{
		unsigned char msg[4];

		/* We got the flags from the SMI, now handle them. */
		smi_info->handlers->get_result(smi_info->si_sm, msg, 4);
		if (msg[2] != 0) {
739 740
			dev_warn(smi_info->dev, "Could not disable interrupts"
				 ", failed set.\n");
C
Corey Minyard 已提交
741 742 743 744
		}
		smi_info->si_state = SI_NORMAL;
		break;
	}
L
Linus Torvalds 已提交
745 746 747
	}
}

748 749 750 751 752
/*
 * Called on timeouts and events.  Timeouts should pass the elapsed
 * time, interrupts should pass in zero.  Must be called with
 * si_lock held and interrupts disabled.
 */
L
Linus Torvalds 已提交
753 754 755 756 757 758
static enum si_sm_result smi_event_handler(struct smi_info *smi_info,
					   int time)
{
	enum si_sm_result si_sm_result;

 restart:
759 760 761 762 763 764 765 766
	/*
	 * There used to be a loop here that waited a little while
	 * (around 25us) before giving up.  That turned out to be
	 * pointless, the minimum delays I was seeing were in the 300us
	 * range, which is far too long to wait in an interrupt.  So
	 * we just run until the state machine tells us something
	 * happened or it needs a delay.
	 */
L
Linus Torvalds 已提交
767 768 769 770 771
	si_sm_result = smi_info->handlers->event(smi_info->si_sm, time);
	time = 0;
	while (si_sm_result == SI_SM_CALL_WITHOUT_DELAY)
		si_sm_result = smi_info->handlers->event(smi_info->si_sm, 0);

772
	if (si_sm_result == SI_SM_TRANSACTION_COMPLETE) {
773
		smi_inc_stat(smi_info, complete_transactions);
L
Linus Torvalds 已提交
774 775 776

		handle_transaction_done(smi_info);
		si_sm_result = smi_info->handlers->event(smi_info->si_sm, 0);
777
	} else if (si_sm_result == SI_SM_HOSED) {
778
		smi_inc_stat(smi_info, hosed_count);
L
Linus Torvalds 已提交
779

780 781 782 783
		/*
		 * Do the before return_hosed_msg, because that
		 * releases the lock.
		 */
L
Linus Torvalds 已提交
784 785
		smi_info->si_state = SI_NORMAL;
		if (smi_info->curr_msg != NULL) {
786 787 788 789 790
			/*
			 * If we were handling a user message, format
			 * a response to send to the upper layer to
			 * tell it about the error.
			 */
C
Corey Minyard 已提交
791
			return_hosed_msg(smi_info, IPMI_ERR_UNSPECIFIED);
L
Linus Torvalds 已提交
792 793 794 795
		}
		si_sm_result = smi_info->handlers->event(smi_info->si_sm, 0);
	}

796 797 798 799
	/*
	 * We prefer handling attn over new messages.  But don't do
	 * this if there is not yet an upper layer to handle anything.
	 */
800
	if (likely(smi_info->intf) && si_sm_result == SI_SM_ATTN) {
L
Linus Torvalds 已提交
801 802
		unsigned char msg[2];

803
		smi_inc_stat(smi_info, attentions);
L
Linus Torvalds 已提交
804

805 806 807 808 809 810 811
		/*
		 * Got a attn, send down a get message flags to see
		 * what's causing it.  It would be better to handle
		 * this in the upper layer, but due to the way
		 * interrupts work with the SMI, that's not really
		 * possible.
		 */
L
Linus Torvalds 已提交
812 813 814 815 816 817 818 819 820 821 822
		msg[0] = (IPMI_NETFN_APP_REQUEST << 2);
		msg[1] = IPMI_GET_MSG_FLAGS_CMD;

		smi_info->handlers->start_transaction(
			smi_info->si_sm, msg, 2);
		smi_info->si_state = SI_GETTING_FLAGS;
		goto restart;
	}

	/* If we are currently idle, try to start the next message. */
	if (si_sm_result == SI_SM_IDLE) {
823
		smi_inc_stat(smi_info, idles);
L
Linus Torvalds 已提交
824 825 826 827

		si_sm_result = start_next_msg(smi_info);
		if (si_sm_result != SI_SM_IDLE)
			goto restart;
828
	}
L
Linus Torvalds 已提交
829 830

	if ((si_sm_result == SI_SM_IDLE)
831 832 833 834 835
	    && (atomic_read(&smi_info->req_events))) {
		/*
		 * We are idle and the upper layer requested that I fetch
		 * events, so do so.
		 */
C
Corey Minyard 已提交
836
		atomic_set(&smi_info->req_events, 0);
L
Linus Torvalds 已提交
837

C
Corey Minyard 已提交
838 839 840
		smi_info->curr_msg = ipmi_alloc_smi_msg();
		if (!smi_info->curr_msg)
			goto out;
L
Linus Torvalds 已提交
841

C
Corey Minyard 已提交
842 843 844
		smi_info->curr_msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
		smi_info->curr_msg->data[1] = IPMI_READ_EVENT_MSG_BUFFER_CMD;
		smi_info->curr_msg->data_size = 2;
L
Linus Torvalds 已提交
845 846

		smi_info->handlers->start_transaction(
C
Corey Minyard 已提交
847 848 849 850
			smi_info->si_sm,
			smi_info->curr_msg->data,
			smi_info->curr_msg->data_size);
		smi_info->si_state = SI_GETTING_EVENTS;
L
Linus Torvalds 已提交
851 852
		goto restart;
	}
C
Corey Minyard 已提交
853
 out:
L
Linus Torvalds 已提交
854 855 856 857 858 859 860 861 862 863 864 865 866 867
	return si_sm_result;
}

static void sender(void                *send_info,
		   struct ipmi_smi_msg *msg,
		   int                 priority)
{
	struct smi_info   *smi_info = send_info;
	enum si_sm_result result;
	unsigned long     flags;
#ifdef DEBUG_TIMING
	struct timeval    t;
#endif

868 869 870 871 872 873 874 875 876
	if (atomic_read(&smi_info->stop_operation)) {
		msg->rsp[0] = msg->data[0] | 4;
		msg->rsp[1] = msg->data[1];
		msg->rsp[2] = IPMI_ERR_UNSPECIFIED;
		msg->rsp_size = 3;
		deliver_recv_msg(smi_info, msg);
		return;
	}

L
Linus Torvalds 已提交
877 878 879 880 881
#ifdef DEBUG_TIMING
	do_gettimeofday(&t);
	printk("**Enqueue: %d.%9.9d\n", t.tv_sec, t.tv_usec);
#endif

882 883 884 885 886 887 888 889
	/*
	 * last_timeout_jiffies is updated here to avoid
	 * smi_timeout() handler passing very large time_diff
	 * value to smi_event_handler() that causes
	 * the send command to abort.
	 */
	smi_info->last_timeout_jiffies = jiffies;

890 891
	mod_timer(&smi_info->si_timer, jiffies + SI_TIMEOUT_JIFFIES);

M
Matthew Garrett 已提交
892 893 894
	if (smi_info->thread)
		wake_up_process(smi_info->thread);

L
Linus Torvalds 已提交
895
	if (smi_info->run_to_completion) {
C
Corey Minyard 已提交
896 897 898 899 900 901 902 903 904 905
		/*
		 * If we are running to completion, then throw it in
		 * the list and run transactions until everything is
		 * clear.  Priority doesn't matter here.
		 */

		/*
		 * Run to completion means we are single-threaded, no
		 * need for locks.
		 */
L
Linus Torvalds 已提交
906 907 908 909 910 911 912 913 914 915 916
		list_add_tail(&(msg->link), &(smi_info->xmit_msgs));

		result = smi_event_handler(smi_info, 0);
		while (result != SI_SM_IDLE) {
			udelay(SI_SHORT_TIMEOUT_USEC);
			result = smi_event_handler(smi_info,
						   SI_SHORT_TIMEOUT_USEC);
		}
		return;
	}

C
Corey Minyard 已提交
917 918 919 920 921 922 923 924
	spin_lock_irqsave(&smi_info->msg_lock, flags);
	if (priority > 0)
		list_add_tail(&msg->link, &smi_info->hp_xmit_msgs);
	else
		list_add_tail(&msg->link, &smi_info->xmit_msgs);
	spin_unlock_irqrestore(&smi_info->msg_lock, flags);

	spin_lock_irqsave(&smi_info->si_lock, flags);
925
	if (smi_info->si_state == SI_NORMAL && smi_info->curr_msg == NULL) {
L
Linus Torvalds 已提交
926
		start_next_msg(smi_info);
927 928
		smi_event_handler(smi_info, 0);
	}
C
Corey Minyard 已提交
929
	spin_unlock_irqrestore(&smi_info->si_lock, flags);
L
Linus Torvalds 已提交
930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947
}

static void set_run_to_completion(void *send_info, int i_run_to_completion)
{
	struct smi_info   *smi_info = send_info;
	enum si_sm_result result;

	smi_info->run_to_completion = i_run_to_completion;
	if (i_run_to_completion) {
		result = smi_event_handler(smi_info, 0);
		while (result != SI_SM_IDLE) {
			udelay(SI_SHORT_TIMEOUT_USEC);
			result = smi_event_handler(smi_info,
						   SI_SHORT_TIMEOUT_USEC);
		}
	}
}

948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995
/*
 * Use -1 in the nsec value of the busy waiting timespec to tell that
 * we are spinning in kipmid looking for something and not delaying
 * between checks
 */
static inline void ipmi_si_set_not_busy(struct timespec *ts)
{
	ts->tv_nsec = -1;
}
static inline int ipmi_si_is_busy(struct timespec *ts)
{
	return ts->tv_nsec != -1;
}

static int ipmi_thread_busy_wait(enum si_sm_result smi_result,
				 const struct smi_info *smi_info,
				 struct timespec *busy_until)
{
	unsigned int max_busy_us = 0;

	if (smi_info->intf_num < num_max_busy_us)
		max_busy_us = kipmid_max_busy_us[smi_info->intf_num];
	if (max_busy_us == 0 || smi_result != SI_SM_CALL_WITH_DELAY)
		ipmi_si_set_not_busy(busy_until);
	else if (!ipmi_si_is_busy(busy_until)) {
		getnstimeofday(busy_until);
		timespec_add_ns(busy_until, max_busy_us*NSEC_PER_USEC);
	} else {
		struct timespec now;
		getnstimeofday(&now);
		if (unlikely(timespec_compare(&now, busy_until) > 0)) {
			ipmi_si_set_not_busy(busy_until);
			return 0;
		}
	}
	return 1;
}


/*
 * A busy-waiting loop for speeding up IPMI operation.
 *
 * Lousy hardware makes this hard.  This is only enabled for systems
 * that are not BT and do not have interrupts.  It starts spinning
 * when an operation is complete or until max_busy tells it to stop
 * (if that is enabled).  See the paragraph on kimid_max_busy_us in
 * Documentation/IPMI.txt for details.
 */
C
Corey Minyard 已提交
996 997 998
static int ipmi_thread(void *data)
{
	struct smi_info *smi_info = data;
M
Matt Domsch 已提交
999
	unsigned long flags;
C
Corey Minyard 已提交
1000
	enum si_sm_result smi_result;
1001
	struct timespec busy_until;
C
Corey Minyard 已提交
1002

1003
	ipmi_si_set_not_busy(&busy_until);
C
Corey Minyard 已提交
1004
	set_user_nice(current, 19);
M
Matt Domsch 已提交
1005
	while (!kthread_should_stop()) {
1006 1007
		int busy_wait;

C
Corey Minyard 已提交
1008
		spin_lock_irqsave(&(smi_info->si_lock), flags);
1009
		smi_result = smi_event_handler(smi_info, 0);
C
Corey Minyard 已提交
1010
		spin_unlock_irqrestore(&(smi_info->si_lock), flags);
1011 1012
		busy_wait = ipmi_thread_busy_wait(smi_result, smi_info,
						  &busy_until);
1013 1014
		if (smi_result == SI_SM_CALL_WITHOUT_DELAY)
			; /* do nothing */
1015
		else if (smi_result == SI_SM_CALL_WITH_DELAY && busy_wait)
1016
			schedule();
M
Matthew Garrett 已提交
1017 1018
		else if (smi_result == SI_SM_IDLE)
			schedule_timeout_interruptible(100);
M
Matt Domsch 已提交
1019
		else
1020
			schedule_timeout_interruptible(1);
C
Corey Minyard 已提交
1021 1022 1023 1024 1025
	}
	return 0;
}


L
Linus Torvalds 已提交
1026 1027 1028
static void poll(void *send_info)
{
	struct smi_info *smi_info = send_info;
C
Corey Minyard 已提交
1029
	unsigned long flags;
L
Linus Torvalds 已提交
1030

C
Corey Minyard 已提交
1031 1032 1033 1034 1035
	/*
	 * Make sure there is some delay in the poll loop so we can
	 * drive time forward and timeout things.
	 */
	udelay(10);
C
Corey Minyard 已提交
1036
	spin_lock_irqsave(&smi_info->si_lock, flags);
C
Corey Minyard 已提交
1037
	smi_event_handler(smi_info, 10);
C
Corey Minyard 已提交
1038
	spin_unlock_irqrestore(&smi_info->si_lock, flags);
L
Linus Torvalds 已提交
1039 1040 1041 1042 1043 1044
}

static void request_events(void *send_info)
{
	struct smi_info *smi_info = send_info;

1045 1046
	if (atomic_read(&smi_info->stop_operation) ||
				!smi_info->has_event_buffer)
1047 1048
		return;

L
Linus Torvalds 已提交
1049 1050 1051
	atomic_set(&smi_info->req_events, 1);
}

R
Randy Dunlap 已提交
1052
static int initialized;
L
Linus Torvalds 已提交
1053 1054 1055 1056 1057 1058 1059

static void smi_timeout(unsigned long data)
{
	struct smi_info   *smi_info = (struct smi_info *) data;
	enum si_sm_result smi_result;
	unsigned long     flags;
	unsigned long     jiffies_now;
C
Corey Minyard 已提交
1060
	long              time_diff;
M
Matthew Garrett 已提交
1061
	long		  timeout;
L
Linus Torvalds 已提交
1062 1063 1064 1065 1066 1067 1068
#ifdef DEBUG_TIMING
	struct timeval    t;
#endif

	spin_lock_irqsave(&(smi_info->si_lock), flags);
#ifdef DEBUG_TIMING
	do_gettimeofday(&t);
1069
	printk(KERN_DEBUG "**Timer: %d.%9.9d\n", t.tv_sec, t.tv_usec);
L
Linus Torvalds 已提交
1070 1071
#endif
	jiffies_now = jiffies;
C
Corey Minyard 已提交
1072
	time_diff = (((long)jiffies_now - (long)smi_info->last_timeout_jiffies)
L
Linus Torvalds 已提交
1073 1074 1075 1076 1077 1078 1079
		     * SI_USEC_PER_JIFFY);
	smi_result = smi_event_handler(smi_info, time_diff);

	spin_unlock_irqrestore(&(smi_info->si_lock), flags);

	smi_info->last_timeout_jiffies = jiffies_now;

1080
	if ((smi_info->irq) && (!smi_info->interrupt_disabled)) {
L
Linus Torvalds 已提交
1081
		/* Running with interrupts, only do long timeouts. */
M
Matthew Garrett 已提交
1082
		timeout = jiffies + SI_TIMEOUT_JIFFIES;
1083
		smi_inc_stat(smi_info, long_timeouts);
M
Matthew Garrett 已提交
1084
		goto do_mod_timer;
L
Linus Torvalds 已提交
1085 1086
	}

1087 1088 1089 1090
	/*
	 * If the state machine asks for a short delay, then shorten
	 * the timer timeout.
	 */
L
Linus Torvalds 已提交
1091
	if (smi_result == SI_SM_CALL_WITH_DELAY) {
1092
		smi_inc_stat(smi_info, short_timeouts);
M
Matthew Garrett 已提交
1093
		timeout = jiffies + 1;
L
Linus Torvalds 已提交
1094
	} else {
1095
		smi_inc_stat(smi_info, long_timeouts);
M
Matthew Garrett 已提交
1096
		timeout = jiffies + SI_TIMEOUT_JIFFIES;
L
Linus Torvalds 已提交
1097 1098
	}

M
Matthew Garrett 已提交
1099 1100 1101
 do_mod_timer:
	if (smi_result != SI_SM_IDLE)
		mod_timer(&(smi_info->si_timer), timeout);
L
Linus Torvalds 已提交
1102 1103
}

1104
static irqreturn_t si_irq_handler(int irq, void *data)
L
Linus Torvalds 已提交
1105 1106 1107 1108 1109 1110 1111 1112 1113
{
	struct smi_info *smi_info = data;
	unsigned long   flags;
#ifdef DEBUG_TIMING
	struct timeval  t;
#endif

	spin_lock_irqsave(&(smi_info->si_lock), flags);

1114
	smi_inc_stat(smi_info, interrupts);
L
Linus Torvalds 已提交
1115 1116 1117

#ifdef DEBUG_TIMING
	do_gettimeofday(&t);
1118
	printk(KERN_DEBUG "**Interrupt: %d.%9.9d\n", t.tv_sec, t.tv_usec);
L
Linus Torvalds 已提交
1119 1120 1121 1122 1123 1124
#endif
	smi_event_handler(smi_info, 0);
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);
	return IRQ_HANDLED;
}

1125
static irqreturn_t si_bt_irq_handler(int irq, void *data)
1126 1127 1128 1129 1130 1131
{
	struct smi_info *smi_info = data;
	/* We need to clear the IRQ flag for the BT interface. */
	smi_info->io.outputb(&smi_info->io, IPMI_BT_INTMASK_REG,
			     IPMI_BT_INTMASK_CLEAR_IRQ_BIT
			     | IPMI_BT_INTMASK_ENABLE_IRQ_BIT);
1132
	return si_irq_handler(irq, data);
1133 1134
}

1135 1136 1137 1138
static int smi_start_processing(void       *send_info,
				ipmi_smi_t intf)
{
	struct smi_info *new_smi = send_info;
1139
	int             enable = 0;
1140 1141 1142

	new_smi->intf = intf;

C
Corey Minyard 已提交
1143 1144 1145 1146
	/* Try to claim any interrupts. */
	if (new_smi->irq_setup)
		new_smi->irq_setup(new_smi);

1147 1148 1149 1150 1151
	/* Set up the timer that drives the interface. */
	setup_timer(&new_smi->si_timer, smi_timeout, (long)new_smi);
	new_smi->last_timeout_jiffies = jiffies;
	mod_timer(&new_smi->si_timer, jiffies + SI_TIMEOUT_JIFFIES);

1152 1153 1154 1155 1156
	/*
	 * Check if the user forcefully enabled the daemon.
	 */
	if (new_smi->intf_num < num_force_kipmid)
		enable = force_kipmid[new_smi->intf_num];
1157 1158 1159 1160
	/*
	 * The BT interface is efficient enough to not need a thread,
	 * and there is no need for a thread if we have interrupts.
	 */
1161
	else if ((new_smi->si_type != SI_BT) && (!new_smi->irq))
1162 1163 1164
		enable = 1;

	if (enable) {
1165 1166 1167
		new_smi->thread = kthread_run(ipmi_thread, new_smi,
					      "kipmi%d", new_smi->intf_num);
		if (IS_ERR(new_smi->thread)) {
1168 1169 1170 1171
			dev_notice(new_smi->dev, "Could not start"
				   " kernel thread due to error %ld, only using"
				   " timers to drive the interface\n",
				   PTR_ERR(new_smi->thread));
1172 1173 1174 1175 1176 1177
			new_smi->thread = NULL;
		}
	}

	return 0;
}
1178

1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190
static int get_smi_info(void *send_info, struct ipmi_smi_info *data)
{
	struct smi_info *smi = send_info;

	data->addr_src = smi->addr_source;
	data->dev = smi->dev;
	data->addr_info = smi->addr_info;
	get_device(smi->dev);

	return 0;
}

C
Corey Minyard 已提交
1191 1192 1193 1194 1195 1196 1197 1198
static void set_maintenance_mode(void *send_info, int enable)
{
	struct smi_info   *smi_info = send_info;

	if (!enable)
		atomic_set(&smi_info->req_events, 0);
}

1199
static struct ipmi_smi_handlers handlers = {
L
Linus Torvalds 已提交
1200
	.owner                  = THIS_MODULE,
1201
	.start_processing       = smi_start_processing,
1202
	.get_smi_info		= get_smi_info,
L
Linus Torvalds 已提交
1203 1204
	.sender			= sender,
	.request_events		= request_events,
C
Corey Minyard 已提交
1205
	.set_maintenance_mode   = set_maintenance_mode,
L
Linus Torvalds 已提交
1206 1207 1208 1209
	.set_run_to_completion  = set_run_to_completion,
	.poll			= poll,
};

1210 1211 1212 1213
/*
 * There can be 4 IO ports passed in (with or without IRQs), 4 addresses,
 * a default IO port, and 1 ACPI/SPMI address.  That sets SI_MAX_DRIVERS.
 */
L
Linus Torvalds 已提交
1214

1215
static LIST_HEAD(smi_infos);
1216
static DEFINE_MUTEX(smi_infos_lock);
1217
static int smi_num; /* Used to sequence the SMIs */
L
Linus Torvalds 已提交
1218 1219

#define DEFAULT_REGSPACING	1
1220
#define DEFAULT_REGSIZE		1
L
Linus Torvalds 已提交
1221

1222
static bool          si_trydefaults = 1;
L
Linus Torvalds 已提交
1223 1224 1225 1226
static char          *si_type[SI_MAX_PARMS];
#define MAX_SI_TYPE_STR 30
static char          si_type_str[MAX_SI_TYPE_STR];
static unsigned long addrs[SI_MAX_PARMS];
1227
static unsigned int num_addrs;
L
Linus Torvalds 已提交
1228
static unsigned int  ports[SI_MAX_PARMS];
1229
static unsigned int num_ports;
L
Linus Torvalds 已提交
1230
static int           irqs[SI_MAX_PARMS];
1231
static unsigned int num_irqs;
L
Linus Torvalds 已提交
1232
static int           regspacings[SI_MAX_PARMS];
1233
static unsigned int num_regspacings;
L
Linus Torvalds 已提交
1234
static int           regsizes[SI_MAX_PARMS];
1235
static unsigned int num_regsizes;
L
Linus Torvalds 已提交
1236
static int           regshifts[SI_MAX_PARMS];
1237
static unsigned int num_regshifts;
1238
static int slave_addrs[SI_MAX_PARMS]; /* Leaving 0 chooses the default value */
1239
static unsigned int num_slave_addrs;
L
Linus Torvalds 已提交
1240

1241 1242
#define IPMI_IO_ADDR_SPACE  0
#define IPMI_MEM_ADDR_SPACE 1
C
Corey Minyard 已提交
1243
static char *addr_space_to_str[] = { "i/o", "mem" };
1244 1245 1246 1247 1248 1249 1250

static int hotmod_handler(const char *val, struct kernel_param *kp);

module_param_call(hotmod, hotmod_handler, NULL, NULL, 0200);
MODULE_PARM_DESC(hotmod, "Add and remove interfaces.  See"
		 " Documentation/IPMI.txt in the kernel sources for the"
		 " gory details.");
L
Linus Torvalds 已提交
1251 1252 1253 1254 1255 1256 1257 1258 1259 1260

module_param_named(trydefaults, si_trydefaults, bool, 0);
MODULE_PARM_DESC(trydefaults, "Setting this to 'false' will disable the"
		 " default scan of the KCS and SMIC interface at the standard"
		 " address");
module_param_string(type, si_type_str, MAX_SI_TYPE_STR, 0);
MODULE_PARM_DESC(type, "Defines the type of each interface, each"
		 " interface separated by commas.  The types are 'kcs',"
		 " 'smic', and 'bt'.  For example si_type=kcs,bt will set"
		 " the first interface to kcs and the second to bt");
1261
module_param_array(addrs, ulong, &num_addrs, 0);
L
Linus Torvalds 已提交
1262 1263 1264 1265
MODULE_PARM_DESC(addrs, "Sets the memory address of each interface, the"
		 " addresses separated by commas.  Only use if an interface"
		 " is in memory.  Otherwise, set it to zero or leave"
		 " it blank.");
1266
module_param_array(ports, uint, &num_ports, 0);
L
Linus Torvalds 已提交
1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297
MODULE_PARM_DESC(ports, "Sets the port address of each interface, the"
		 " addresses separated by commas.  Only use if an interface"
		 " is a port.  Otherwise, set it to zero or leave"
		 " it blank.");
module_param_array(irqs, int, &num_irqs, 0);
MODULE_PARM_DESC(irqs, "Sets the interrupt of each interface, the"
		 " addresses separated by commas.  Only use if an interface"
		 " has an interrupt.  Otherwise, set it to zero or leave"
		 " it blank.");
module_param_array(regspacings, int, &num_regspacings, 0);
MODULE_PARM_DESC(regspacings, "The number of bytes between the start address"
		 " and each successive register used by the interface.  For"
		 " instance, if the start address is 0xca2 and the spacing"
		 " is 2, then the second address is at 0xca4.  Defaults"
		 " to 1.");
module_param_array(regsizes, int, &num_regsizes, 0);
MODULE_PARM_DESC(regsizes, "The size of the specific IPMI register in bytes."
		 " This should generally be 1, 2, 4, or 8 for an 8-bit,"
		 " 16-bit, 32-bit, or 64-bit register.  Use this if you"
		 " the 8-bit IPMI register has to be read from a larger"
		 " register.");
module_param_array(regshifts, int, &num_regshifts, 0);
MODULE_PARM_DESC(regshifts, "The amount to shift the data read from the."
		 " IPMI register, in bits.  For instance, if the data"
		 " is read from a 32-bit word and the IPMI data is in"
		 " bit 8-15, then the shift would be 8");
module_param_array(slave_addrs, int, &num_slave_addrs, 0);
MODULE_PARM_DESC(slave_addrs, "Set the default IPMB slave address for"
		 " the controller.  Normally this is 0x20, but can be"
		 " overridden by this parm.  This is an array indexed"
		 " by interface number.");
1298 1299 1300 1301
module_param_array(force_kipmid, int, &num_force_kipmid, 0);
MODULE_PARM_DESC(force_kipmid, "Force the kipmi daemon to be enabled (1) or"
		 " disabled(0).  Normally the IPMI driver auto-detects"
		 " this, but the value may be overridden by this parm.");
1302 1303 1304 1305
module_param(unload_when_empty, int, 0);
MODULE_PARM_DESC(unload_when_empty, "Unload the module if no interfaces are"
		 " specified or found, default is 1.  Setting to 0"
		 " is useful for hot add of devices using hotmod.");
1306 1307 1308 1309 1310
module_param_array(kipmid_max_busy_us, uint, &num_max_busy_us, 0644);
MODULE_PARM_DESC(kipmid_max_busy_us,
		 "Max time (in microseconds) to busy-wait for IPMI data before"
		 " sleeping. 0 (default) means to wait forever. Set to 100-500"
		 " if kipmid is using up a lot of CPU time.");
L
Linus Torvalds 已提交
1311 1312


1313
static void std_irq_cleanup(struct smi_info *info)
L
Linus Torvalds 已提交
1314
{
1315 1316 1317 1318
	if (info->si_type == SI_BT)
		/* Disable the interrupt in the BT interface. */
		info->io.outputb(&info->io, IPMI_BT_INTMASK_REG, 0);
	free_irq(info->irq, info);
L
Linus Torvalds 已提交
1319 1320 1321 1322 1323 1324
}

static int std_irq_setup(struct smi_info *info)
{
	int rv;

1325
	if (!info->irq)
L
Linus Torvalds 已提交
1326 1327
		return 0;

1328 1329 1330
	if (info->si_type == SI_BT) {
		rv = request_irq(info->irq,
				 si_bt_irq_handler,
C
Corey Minyard 已提交
1331
				 IRQF_SHARED | IRQF_DISABLED,
1332 1333
				 DEVICE_NAME,
				 info);
1334
		if (!rv)
1335 1336 1337 1338 1339 1340
			/* Enable the interrupt in the BT interface. */
			info->io.outputb(&info->io, IPMI_BT_INTMASK_REG,
					 IPMI_BT_INTMASK_ENABLE_IRQ_BIT);
	} else
		rv = request_irq(info->irq,
				 si_irq_handler,
C
Corey Minyard 已提交
1341
				 IRQF_SHARED | IRQF_DISABLED,
1342 1343
				 DEVICE_NAME,
				 info);
L
Linus Torvalds 已提交
1344
	if (rv) {
1345 1346 1347
		dev_warn(info->dev, "%s unable to claim interrupt %d,"
			 " running polled\n",
			 DEVICE_NAME, info->irq);
L
Linus Torvalds 已提交
1348 1349
		info->irq = 0;
	} else {
1350
		info->irq_cleanup = std_irq_cleanup;
1351
		dev_info(info->dev, "Using irq %d\n", info->irq);
L
Linus Torvalds 已提交
1352 1353 1354 1355 1356 1357 1358
	}

	return rv;
}

static unsigned char port_inb(struct si_sm_io *io, unsigned int offset)
{
1359
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1360

1361
	return inb(addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1362 1363 1364 1365 1366
}

static void port_outb(struct si_sm_io *io, unsigned int offset,
		      unsigned char b)
{
1367
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1368

1369
	outb(b, addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1370 1371 1372 1373
}

static unsigned char port_inw(struct si_sm_io *io, unsigned int offset)
{
1374
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1375

1376
	return (inw(addr + (offset * io->regspacing)) >> io->regshift) & 0xff;
L
Linus Torvalds 已提交
1377 1378 1379 1380 1381
}

static void port_outw(struct si_sm_io *io, unsigned int offset,
		      unsigned char b)
{
1382
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1383

1384
	outw(b << io->regshift, addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1385 1386 1387 1388
}

static unsigned char port_inl(struct si_sm_io *io, unsigned int offset)
{
1389
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1390

1391
	return (inl(addr + (offset * io->regspacing)) >> io->regshift) & 0xff;
L
Linus Torvalds 已提交
1392 1393 1394 1395 1396
}

static void port_outl(struct si_sm_io *io, unsigned int offset,
		      unsigned char b)
{
1397
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1398

1399
	outl(b << io->regshift, addr+(offset * io->regspacing));
L
Linus Torvalds 已提交
1400 1401 1402 1403
}

static void port_cleanup(struct smi_info *info)
{
1404
	unsigned int addr = info->io.addr_data;
1405
	int          idx;
L
Linus Torvalds 已提交
1406

1407
	if (addr) {
1408
		for (idx = 0; idx < info->io_size; idx++)
1409 1410
			release_region(addr + idx * info->io.regspacing,
				       info->io.regsize);
L
Linus Torvalds 已提交
1411 1412 1413 1414 1415
	}
}

static int port_setup(struct smi_info *info)
{
1416
	unsigned int addr = info->io.addr_data;
1417
	int          idx;
L
Linus Torvalds 已提交
1418

1419
	if (!addr)
L
Linus Torvalds 已提交
1420 1421 1422 1423
		return -ENODEV;

	info->io_cleanup = port_cleanup;

1424 1425 1426 1427
	/*
	 * Figure out the actual inb/inw/inl/etc routine to use based
	 * upon the register size.
	 */
L
Linus Torvalds 已提交
1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441
	switch (info->io.regsize) {
	case 1:
		info->io.inputb = port_inb;
		info->io.outputb = port_outb;
		break;
	case 2:
		info->io.inputb = port_inw;
		info->io.outputb = port_outw;
		break;
	case 4:
		info->io.inputb = port_inl;
		info->io.outputb = port_outl;
		break;
	default:
1442 1443
		dev_warn(info->dev, "Invalid register size: %d\n",
			 info->io.regsize);
L
Linus Torvalds 已提交
1444 1445 1446
		return -EINVAL;
	}

1447 1448
	/*
	 * Some BIOSes reserve disjoint I/O regions in their ACPI
1449 1450 1451 1452
	 * tables.  This causes problems when trying to register the
	 * entire I/O region.  Therefore we must register each I/O
	 * port separately.
	 */
1453
	for (idx = 0; idx < info->io_size; idx++) {
1454 1455 1456 1457 1458 1459 1460 1461 1462 1463
		if (request_region(addr + idx * info->io.regspacing,
				   info->io.regsize, DEVICE_NAME) == NULL) {
			/* Undo allocations */
			while (idx--) {
				release_region(addr + idx * info->io.regspacing,
					       info->io.regsize);
			}
			return -EIO;
		}
	}
L
Linus Torvalds 已提交
1464 1465 1466
	return 0;
}

1467
static unsigned char intf_mem_inb(struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1468 1469 1470 1471
{
	return readb((io->addr)+(offset * io->regspacing));
}

1472
static void intf_mem_outb(struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1473 1474 1475 1476 1477
		     unsigned char b)
{
	writeb(b, (io->addr)+(offset * io->regspacing));
}

1478
static unsigned char intf_mem_inw(struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1479 1480
{
	return (readw((io->addr)+(offset * io->regspacing)) >> io->regshift)
1481
		& 0xff;
L
Linus Torvalds 已提交
1482 1483
}

1484
static void intf_mem_outw(struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1485 1486 1487 1488 1489
		     unsigned char b)
{
	writeb(b << io->regshift, (io->addr)+(offset * io->regspacing));
}

1490
static unsigned char intf_mem_inl(struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1491 1492
{
	return (readl((io->addr)+(offset * io->regspacing)) >> io->regshift)
1493
		& 0xff;
L
Linus Torvalds 已提交
1494 1495
}

1496
static void intf_mem_outl(struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1497 1498 1499 1500 1501 1502 1503 1504 1505
		     unsigned char b)
{
	writel(b << io->regshift, (io->addr)+(offset * io->regspacing));
}

#ifdef readq
static unsigned char mem_inq(struct si_sm_io *io, unsigned int offset)
{
	return (readq((io->addr)+(offset * io->regspacing)) >> io->regshift)
1506
		& 0xff;
L
Linus Torvalds 已提交
1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517
}

static void mem_outq(struct si_sm_io *io, unsigned int offset,
		     unsigned char b)
{
	writeq(b << io->regshift, (io->addr)+(offset * io->regspacing));
}
#endif

static void mem_cleanup(struct smi_info *info)
{
1518
	unsigned long addr = info->io.addr_data;
L
Linus Torvalds 已提交
1519 1520 1521 1522 1523 1524 1525 1526
	int           mapsize;

	if (info->io.addr) {
		iounmap(info->io.addr);

		mapsize = ((info->io_size * info->io.regspacing)
			   - (info->io.regspacing - info->io.regsize));

1527
		release_mem_region(addr, mapsize);
L
Linus Torvalds 已提交
1528 1529 1530 1531 1532
	}
}

static int mem_setup(struct smi_info *info)
{
1533
	unsigned long addr = info->io.addr_data;
L
Linus Torvalds 已提交
1534 1535
	int           mapsize;

1536
	if (!addr)
L
Linus Torvalds 已提交
1537 1538 1539 1540
		return -ENODEV;

	info->io_cleanup = mem_cleanup;

1541 1542 1543 1544
	/*
	 * Figure out the actual readb/readw/readl/etc routine to use based
	 * upon the register size.
	 */
L
Linus Torvalds 已提交
1545 1546
	switch (info->io.regsize) {
	case 1:
1547 1548
		info->io.inputb = intf_mem_inb;
		info->io.outputb = intf_mem_outb;
L
Linus Torvalds 已提交
1549 1550
		break;
	case 2:
1551 1552
		info->io.inputb = intf_mem_inw;
		info->io.outputb = intf_mem_outw;
L
Linus Torvalds 已提交
1553 1554
		break;
	case 4:
1555 1556
		info->io.inputb = intf_mem_inl;
		info->io.outputb = intf_mem_outl;
L
Linus Torvalds 已提交
1557 1558 1559 1560 1561 1562 1563 1564
		break;
#ifdef readq
	case 8:
		info->io.inputb = mem_inq;
		info->io.outputb = mem_outq;
		break;
#endif
	default:
1565 1566
		dev_warn(info->dev, "Invalid register size: %d\n",
			 info->io.regsize);
L
Linus Torvalds 已提交
1567 1568 1569
		return -EINVAL;
	}

1570 1571
	/*
	 * Calculate the total amount of memory to claim.  This is an
L
Linus Torvalds 已提交
1572 1573 1574
	 * unusual looking calculation, but it avoids claiming any
	 * more memory than it has to.  It will claim everything
	 * between the first address to the end of the last full
1575 1576
	 * register.
	 */
L
Linus Torvalds 已提交
1577 1578 1579
	mapsize = ((info->io_size * info->io.regspacing)
		   - (info->io.regspacing - info->io.regsize));

1580
	if (request_mem_region(addr, mapsize, DEVICE_NAME) == NULL)
L
Linus Torvalds 已提交
1581 1582
		return -EIO;

1583
	info->io.addr = ioremap(addr, mapsize);
L
Linus Torvalds 已提交
1584
	if (info->io.addr == NULL) {
1585
		release_mem_region(addr, mapsize);
L
Linus Torvalds 已提交
1586 1587 1588 1589 1590
		return -EIO;
	}
	return 0;
}

1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621
/*
 * Parms come in as <op1>[:op2[:op3...]].  ops are:
 *   add|remove,kcs|bt|smic,mem|i/o,<address>[,<opt1>[,<opt2>[,...]]]
 * Options are:
 *   rsp=<regspacing>
 *   rsi=<regsize>
 *   rsh=<regshift>
 *   irq=<irq>
 *   ipmb=<ipmb addr>
 */
enum hotmod_op { HM_ADD, HM_REMOVE };
struct hotmod_vals {
	char *name;
	int  val;
};
static struct hotmod_vals hotmod_ops[] = {
	{ "add",	HM_ADD },
	{ "remove",	HM_REMOVE },
	{ NULL }
};
static struct hotmod_vals hotmod_si[] = {
	{ "kcs",	SI_KCS },
	{ "smic",	SI_SMIC },
	{ "bt",		SI_BT },
	{ NULL }
};
static struct hotmod_vals hotmod_as[] = {
	{ "mem",	IPMI_MEM_ADDR_SPACE },
	{ "i/o",	IPMI_IO_ADDR_SPACE },
	{ NULL }
};
C
Corey Minyard 已提交
1622

1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635
static int parse_str(struct hotmod_vals *v, int *val, char *name, char **curr)
{
	char *s;
	int  i;

	s = strchr(*curr, ',');
	if (!s) {
		printk(KERN_WARNING PFX "No hotmod %s given.\n", name);
		return -EINVAL;
	}
	*s = '\0';
	s++;
	for (i = 0; hotmod_ops[i].name; i++) {
C
Corey Minyard 已提交
1636
		if (strcmp(*curr, v[i].name) == 0) {
1637 1638 1639 1640 1641 1642 1643 1644 1645 1646
			*val = v[i].val;
			*curr = s;
			return 0;
		}
	}

	printk(KERN_WARNING PFX "Invalid hotmod %s '%s'\n", name, *curr);
	return -EINVAL;
}

C
Corey Minyard 已提交
1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670
static int check_hotmod_int_op(const char *curr, const char *option,
			       const char *name, int *val)
{
	char *n;

	if (strcmp(curr, name) == 0) {
		if (!option) {
			printk(KERN_WARNING PFX
			       "No option given for '%s'\n",
			       curr);
			return -EINVAL;
		}
		*val = simple_strtoul(option, &n, 0);
		if ((*n != '\0') || (*option == '\0')) {
			printk(KERN_WARNING PFX
			       "Bad option given for '%s'\n",
			       curr);
			return -EINVAL;
		}
		return 1;
	}
	return 0;
}

1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681
static struct smi_info *smi_info_alloc(void)
{
	struct smi_info *info = kzalloc(sizeof(*info), GFP_KERNEL);

	if (info) {
		spin_lock_init(&info->si_lock);
		spin_lock_init(&info->msg_lock);
	}
	return info;
}

1682 1683 1684
static int hotmod_handler(const char *val, struct kernel_param *kp)
{
	char *str = kstrdup(val, GFP_KERNEL);
C
Corey Minyard 已提交
1685
	int  rv;
1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696
	char *next, *curr, *s, *n, *o;
	enum hotmod_op op;
	enum si_type si_type;
	int  addr_space;
	unsigned long addr;
	int regspacing;
	int regsize;
	int regshift;
	int irq;
	int ipmb;
	int ival;
C
Corey Minyard 已提交
1697
	int len;
1698 1699 1700 1701 1702 1703
	struct smi_info *info;

	if (!str)
		return -ENOMEM;

	/* Kill any trailing spaces, as we can get a "\n" from echo. */
C
Corey Minyard 已提交
1704 1705
	len = strlen(str);
	ival = len - 1;
1706 1707 1708 1709 1710 1711 1712 1713 1714 1715
	while ((ival >= 0) && isspace(str[ival])) {
		str[ival] = '\0';
		ival--;
	}

	for (curr = str; curr; curr = next) {
		regspacing = 1;
		regsize = 1;
		regshift = 0;
		irq = 0;
1716
		ipmb = 0; /* Choose the default if not specified */
1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761

		next = strchr(curr, ':');
		if (next) {
			*next = '\0';
			next++;
		}

		rv = parse_str(hotmod_ops, &ival, "operation", &curr);
		if (rv)
			break;
		op = ival;

		rv = parse_str(hotmod_si, &ival, "interface type", &curr);
		if (rv)
			break;
		si_type = ival;

		rv = parse_str(hotmod_as, &addr_space, "address space", &curr);
		if (rv)
			break;

		s = strchr(curr, ',');
		if (s) {
			*s = '\0';
			s++;
		}
		addr = simple_strtoul(curr, &n, 0);
		if ((*n != '\0') || (*curr == '\0')) {
			printk(KERN_WARNING PFX "Invalid hotmod address"
			       " '%s'\n", curr);
			break;
		}

		while (s) {
			curr = s;
			s = strchr(curr, ',');
			if (s) {
				*s = '\0';
				s++;
			}
			o = strchr(curr, '=');
			if (o) {
				*o = '\0';
				o++;
			}
C
Corey Minyard 已提交
1762 1763
			rv = check_hotmod_int_op(curr, o, "rsp", &regspacing);
			if (rv < 0)
1764
				goto out;
C
Corey Minyard 已提交
1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792
			else if (rv)
				continue;
			rv = check_hotmod_int_op(curr, o, "rsi", &regsize);
			if (rv < 0)
				goto out;
			else if (rv)
				continue;
			rv = check_hotmod_int_op(curr, o, "rsh", &regshift);
			if (rv < 0)
				goto out;
			else if (rv)
				continue;
			rv = check_hotmod_int_op(curr, o, "irq", &irq);
			if (rv < 0)
				goto out;
			else if (rv)
				continue;
			rv = check_hotmod_int_op(curr, o, "ipmb", &ipmb);
			if (rv < 0)
				goto out;
			else if (rv)
				continue;

			rv = -EINVAL;
			printk(KERN_WARNING PFX
			       "Invalid hotmod option '%s'\n",
			       curr);
			goto out;
1793 1794 1795
		}

		if (op == HM_ADD) {
1796
			info = smi_info_alloc();
1797 1798 1799 1800 1801
			if (!info) {
				rv = -ENOMEM;
				goto out;
			}

1802
			info->addr_source = SI_HOTMOD;
1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823
			info->si_type = si_type;
			info->io.addr_data = addr;
			info->io.addr_type = addr_space;
			if (addr_space == IPMI_MEM_ADDR_SPACE)
				info->io_setup = mem_setup;
			else
				info->io_setup = port_setup;

			info->io.addr = NULL;
			info->io.regspacing = regspacing;
			if (!info->io.regspacing)
				info->io.regspacing = DEFAULT_REGSPACING;
			info->io.regsize = regsize;
			if (!info->io.regsize)
				info->io.regsize = DEFAULT_REGSPACING;
			info->io.regshift = regshift;
			info->irq = irq;
			if (info->irq)
				info->irq_setup = std_irq_setup;
			info->slave_addr = ipmb;

1824
			if (!add_smi(info)) {
1825 1826
				if (try_smi_init(info))
					cleanup_one_si(info);
1827 1828 1829
			} else {
				kfree(info);
			}
1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845
		} else {
			/* remove */
			struct smi_info *e, *tmp_e;

			mutex_lock(&smi_infos_lock);
			list_for_each_entry_safe(e, tmp_e, &smi_infos, link) {
				if (e->io.addr_type != addr_space)
					continue;
				if (e->si_type != si_type)
					continue;
				if (e->io.addr_data == addr)
					cleanup_one_si(e);
			}
			mutex_unlock(&smi_infos_lock);
		}
	}
C
Corey Minyard 已提交
1846
	rv = len;
1847 1848 1849 1850
 out:
	kfree(str);
	return rv;
}
1851

1852
static int __devinit hardcode_find_bmc(void)
L
Linus Torvalds 已提交
1853
{
1854
	int ret = -ENODEV;
1855
	int             i;
L
Linus Torvalds 已提交
1856 1857
	struct smi_info *info;

1858 1859 1860
	for (i = 0; i < SI_MAX_PARMS; i++) {
		if (!ports[i] && !addrs[i])
			continue;
L
Linus Torvalds 已提交
1861

1862
		info = smi_info_alloc();
1863
		if (!info)
1864
			return -ENOMEM;
L
Linus Torvalds 已提交
1865

1866
		info->addr_source = SI_HARDCODED;
1867
		printk(KERN_INFO PFX "probing via hardcoded address\n");
L
Linus Torvalds 已提交
1868

C
Corey Minyard 已提交
1869
		if (!si_type[i] || strcmp(si_type[i], "kcs") == 0) {
1870
			info->si_type = SI_KCS;
C
Corey Minyard 已提交
1871
		} else if (strcmp(si_type[i], "smic") == 0) {
1872
			info->si_type = SI_SMIC;
C
Corey Minyard 已提交
1873
		} else if (strcmp(si_type[i], "bt") == 0) {
1874 1875
			info->si_type = SI_BT;
		} else {
1876
			printk(KERN_WARNING PFX "Interface type specified "
1877 1878 1879 1880 1881
			       "for interface %d, was invalid: %s\n",
			       i, si_type[i]);
			kfree(info);
			continue;
		}
L
Linus Torvalds 已提交
1882

1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893
		if (ports[i]) {
			/* An I/O port */
			info->io_setup = port_setup;
			info->io.addr_data = ports[i];
			info->io.addr_type = IPMI_IO_ADDR_SPACE;
		} else if (addrs[i]) {
			/* A memory port */
			info->io_setup = mem_setup;
			info->io.addr_data = addrs[i];
			info->io.addr_type = IPMI_MEM_ADDR_SPACE;
		} else {
1894 1895 1896
			printk(KERN_WARNING PFX "Interface type specified "
			       "for interface %d, but port and address were "
			       "not set or set to zero.\n", i);
1897 1898 1899
			kfree(info);
			continue;
		}
L
Linus Torvalds 已提交
1900

1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911
		info->io.addr = NULL;
		info->io.regspacing = regspacings[i];
		if (!info->io.regspacing)
			info->io.regspacing = DEFAULT_REGSPACING;
		info->io.regsize = regsizes[i];
		if (!info->io.regsize)
			info->io.regsize = DEFAULT_REGSPACING;
		info->io.regshift = regshifts[i];
		info->irq = irqs[i];
		if (info->irq)
			info->irq_setup = std_irq_setup;
1912
		info->slave_addr = slave_addrs[i];
L
Linus Torvalds 已提交
1913

1914
		if (!add_smi(info)) {
1915 1916
			if (try_smi_init(info))
				cleanup_one_si(info);
1917
			ret = 0;
1918 1919 1920
		} else {
			kfree(info);
		}
1921
	}
1922
	return ret;
1923
}
L
Linus Torvalds 已提交
1924

1925
#ifdef CONFIG_ACPI
L
Linus Torvalds 已提交
1926 1927 1928

#include <linux/acpi.h>

1929 1930 1931 1932 1933
/*
 * Once we get an ACPI failure, we don't try any more, because we go
 * through the tables sequentially.  Once we don't find a table, there
 * are no more.
 */
R
Randy Dunlap 已提交
1934
static int acpi_failure;
L
Linus Torvalds 已提交
1935 1936

/* For GPE-type interrupts. */
1937 1938
static u32 ipmi_acpi_gpe(acpi_handle gpe_device,
	u32 gpe_number, void *context)
L
Linus Torvalds 已提交
1939 1940 1941 1942 1943 1944 1945 1946 1947
{
	struct smi_info *smi_info = context;
	unsigned long   flags;
#ifdef DEBUG_TIMING
	struct timeval t;
#endif

	spin_lock_irqsave(&(smi_info->si_lock), flags);

1948
	smi_inc_stat(smi_info, interrupts);
L
Linus Torvalds 已提交
1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959

#ifdef DEBUG_TIMING
	do_gettimeofday(&t);
	printk("**ACPI_GPE: %d.%9.9d\n", t.tv_sec, t.tv_usec);
#endif
	smi_event_handler(smi_info, 0);
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);

	return ACPI_INTERRUPT_HANDLED;
}

1960 1961 1962 1963 1964 1965 1966 1967
static void acpi_gpe_irq_cleanup(struct smi_info *info)
{
	if (!info->irq)
		return;

	acpi_remove_gpe_handler(NULL, info->irq, &ipmi_acpi_gpe);
}

L
Linus Torvalds 已提交
1968 1969 1970 1971
static int acpi_gpe_irq_setup(struct smi_info *info)
{
	acpi_status status;

1972
	if (!info->irq)
L
Linus Torvalds 已提交
1973 1974 1975 1976 1977 1978 1979 1980 1981
		return 0;

	/* FIXME - is level triggered right? */
	status = acpi_install_gpe_handler(NULL,
					  info->irq,
					  ACPI_GPE_LEVEL_TRIGGERED,
					  &ipmi_acpi_gpe,
					  info);
	if (status != AE_OK) {
1982 1983
		dev_warn(info->dev, "%s unable to claim ACPI GPE %d,"
			 " running polled\n", DEVICE_NAME, info->irq);
L
Linus Torvalds 已提交
1984 1985 1986
		info->irq = 0;
		return -EINVAL;
	} else {
1987
		info->irq_cleanup = acpi_gpe_irq_cleanup;
1988
		dev_info(info->dev, "Using ACPI GPE %d\n", info->irq);
L
Linus Torvalds 已提交
1989 1990 1991 1992 1993 1994
		return 0;
	}
}

/*
 * Defined at
1995
 * http://h21007.www2.hp.com/portal/download/files/unprot/hpspmi.pdf
L
Linus Torvalds 已提交
1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016
 */
struct SPMITable {
	s8	Signature[4];
	u32	Length;
	u8	Revision;
	u8	Checksum;
	s8	OEMID[6];
	s8	OEMTableID[8];
	s8	OEMRevision[4];
	s8	CreatorID[4];
	s8	CreatorRevision[4];
	u8	InterfaceType;
	u8	IPMIlegacy;
	s16	SpecificationRevision;

	/*
	 * Bit 0 - SCI interrupt supported
	 * Bit 1 - I/O APIC/SAPIC
	 */
	u8	InterruptType;

2017 2018 2019 2020
	/*
	 * If bit 0 of InterruptType is set, then this is the SCI
	 * interrupt in the GPEx_STS register.
	 */
L
Linus Torvalds 已提交
2021 2022 2023 2024
	u8	GPE;

	s16	Reserved;

2025 2026 2027 2028
	/*
	 * If bit 1 of InterruptType is set, then this is the I/O
	 * APIC/SAPIC interrupt.
	 */
L
Linus Torvalds 已提交
2029 2030 2031 2032 2033 2034 2035 2036 2037 2038
	u32	GlobalSystemInterrupt;

	/* The actual register address. */
	struct acpi_generic_address addr;

	u8	UID[4];

	s8      spmi_id[1]; /* A '\0' terminated array starts here. */
};

2039
static int __devinit try_init_spmi(struct SPMITable *spmi)
L
Linus Torvalds 已提交
2040 2041 2042 2043
{
	struct smi_info  *info;

	if (spmi->IPMIlegacy != 1) {
2044 2045
		printk(KERN_INFO PFX "Bad SPMI legacy %d\n", spmi->IPMIlegacy);
		return -ENODEV;
L
Linus Torvalds 已提交
2046 2047
	}

2048
	info = smi_info_alloc();
2049
	if (!info) {
2050
		printk(KERN_ERR PFX "Could not allocate SI data (3)\n");
2051 2052 2053
		return -ENOMEM;
	}

2054
	info->addr_source = SI_SPMI;
2055
	printk(KERN_INFO PFX "probing via SPMI\n");
L
Linus Torvalds 已提交
2056 2057

	/* Figure out the interface type. */
2058
	switch (spmi->InterfaceType) {
L
Linus Torvalds 已提交
2059
	case 1:	/* KCS */
2060
		info->si_type = SI_KCS;
L
Linus Torvalds 已提交
2061 2062
		break;
	case 2:	/* SMIC */
2063
		info->si_type = SI_SMIC;
L
Linus Torvalds 已提交
2064 2065
		break;
	case 3:	/* BT */
2066
		info->si_type = SI_BT;
L
Linus Torvalds 已提交
2067 2068
		break;
	default:
2069 2070
		printk(KERN_INFO PFX "Unknown ACPI/SPMI SI type %d\n",
		       spmi->InterfaceType);
2071
		kfree(info);
L
Linus Torvalds 已提交
2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088
		return -EIO;
	}

	if (spmi->InterruptType & 1) {
		/* We've got a GPE interrupt. */
		info->irq = spmi->GPE;
		info->irq_setup = acpi_gpe_irq_setup;
	} else if (spmi->InterruptType & 2) {
		/* We've got an APIC/SAPIC interrupt. */
		info->irq = spmi->GlobalSystemInterrupt;
		info->irq_setup = std_irq_setup;
	} else {
		/* Use the default interrupt setting. */
		info->irq = 0;
		info->irq_setup = NULL;
	}

2089
	if (spmi->addr.bit_width) {
2090
		/* A (hopefully) properly formed register bit width. */
2091
		info->io.regspacing = spmi->addr.bit_width / 8;
2092 2093 2094
	} else {
		info->io.regspacing = DEFAULT_REGSPACING;
	}
2095
	info->io.regsize = info->io.regspacing;
2096
	info->io.regshift = spmi->addr.bit_offset;
L
Linus Torvalds 已提交
2097

2098
	if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_MEMORY) {
L
Linus Torvalds 已提交
2099
		info->io_setup = mem_setup;
2100
		info->io.addr_type = IPMI_MEM_ADDR_SPACE;
2101
	} else if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_IO) {
L
Linus Torvalds 已提交
2102
		info->io_setup = port_setup;
2103
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
L
Linus Torvalds 已提交
2104 2105
	} else {
		kfree(info);
2106
		printk(KERN_WARNING PFX "Unknown ACPI I/O Address type\n");
L
Linus Torvalds 已提交
2107 2108
		return -EIO;
	}
2109
	info->io.addr_data = spmi->addr.address;
L
Linus Torvalds 已提交
2110

2111 2112 2113 2114 2115
	pr_info("ipmi_si: SPMI: %s %#lx regsize %d spacing %d irq %d\n",
		 (info->io.addr_type == IPMI_IO_ADDR_SPACE) ? "io" : "mem",
		 info->io.addr_data, info->io.regsize, info->io.regspacing,
		 info->irq);

2116 2117
	if (add_smi(info))
		kfree(info);
L
Linus Torvalds 已提交
2118 2119 2120

	return 0;
}
2121

2122
static void __devinit spmi_find_bmc(void)
2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134
{
	acpi_status      status;
	struct SPMITable *spmi;
	int              i;

	if (acpi_disabled)
		return;

	if (acpi_failure)
		return;

	for (i = 0; ; i++) {
2135 2136
		status = acpi_get_table(ACPI_SIG_SPMI, i+1,
					(struct acpi_table_header **)&spmi);
2137 2138 2139
		if (status != AE_OK)
			return;

2140
		try_init_spmi(spmi);
2141 2142
	}
}
2143 2144 2145 2146 2147 2148

static int __devinit ipmi_pnp_probe(struct pnp_dev *dev,
				    const struct pnp_device_id *dev_id)
{
	struct acpi_device *acpi_dev;
	struct smi_info *info;
Y
Yinghai Lu 已提交
2149
	struct resource *res, *res_second;
2150 2151 2152 2153 2154 2155 2156 2157
	acpi_handle handle;
	acpi_status status;
	unsigned long long tmp;

	acpi_dev = pnp_acpi_device(dev);
	if (!acpi_dev)
		return -ENODEV;

2158
	info = smi_info_alloc();
2159 2160 2161
	if (!info)
		return -ENOMEM;

2162
	info->addr_source = SI_ACPI;
2163
	printk(KERN_INFO PFX "probing via ACPI\n");
2164 2165

	handle = acpi_dev->handle;
2166
	info->addr_info.acpi_info.acpi_handle = handle;
2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180 2181 2182 2183

	/* _IFT tells us the interface type: KCS, BT, etc */
	status = acpi_evaluate_integer(handle, "_IFT", NULL, &tmp);
	if (ACPI_FAILURE(status))
		goto err_free;

	switch (tmp) {
	case 1:
		info->si_type = SI_KCS;
		break;
	case 2:
		info->si_type = SI_SMIC;
		break;
	case 3:
		info->si_type = SI_BT;
		break;
	default:
2184
		dev_info(&dev->dev, "unknown IPMI type %lld\n", tmp);
2185 2186 2187
		goto err_free;
	}

2188 2189
	res = pnp_get_resource(dev, IORESOURCE_IO, 0);
	if (res) {
2190 2191 2192
		info->io_setup = port_setup;
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
	} else {
2193 2194 2195 2196 2197 2198 2199
		res = pnp_get_resource(dev, IORESOURCE_MEM, 0);
		if (res) {
			info->io_setup = mem_setup;
			info->io.addr_type = IPMI_MEM_ADDR_SPACE;
		}
	}
	if (!res) {
2200 2201 2202
		dev_err(&dev->dev, "no I/O or memory address\n");
		goto err_free;
	}
2203
	info->io.addr_data = res->start;
2204 2205

	info->io.regspacing = DEFAULT_REGSPACING;
Y
Yinghai Lu 已提交
2206
	res_second = pnp_get_resource(dev,
2207 2208 2209
			       (info->io.addr_type == IPMI_IO_ADDR_SPACE) ?
					IORESOURCE_IO : IORESOURCE_MEM,
			       1);
Y
Yinghai Lu 已提交
2210 2211 2212
	if (res_second) {
		if (res_second->start > info->io.addr_data)
			info->io.regspacing = res_second->start - info->io.addr_data;
2213
	}
2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226
	info->io.regsize = DEFAULT_REGSPACING;
	info->io.regshift = 0;

	/* If _GPE exists, use it; otherwise use standard interrupts */
	status = acpi_evaluate_integer(handle, "_GPE", NULL, &tmp);
	if (ACPI_SUCCESS(status)) {
		info->irq = tmp;
		info->irq_setup = acpi_gpe_irq_setup;
	} else if (pnp_irq_valid(dev, 0)) {
		info->irq = pnp_irq(dev, 0);
		info->irq_setup = std_irq_setup;
	}

2227
	info->dev = &dev->dev;
2228 2229
	pnp_set_drvdata(dev, info);

2230 2231 2232 2233
	dev_info(info->dev, "%pR regsize %d spacing %d irq %d\n",
		 res, info->io.regsize, info->io.regspacing,
		 info->irq);

2234 2235 2236 2237
	if (add_smi(info))
		goto err_free;

	return 0;
2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261

err_free:
	kfree(info);
	return -EINVAL;
}

static void __devexit ipmi_pnp_remove(struct pnp_dev *dev)
{
	struct smi_info *info = pnp_get_drvdata(dev);

	cleanup_one_si(info);
}

static const struct pnp_device_id pnp_dev_table[] = {
	{"IPI0001", 0},
	{"", 0},
};

static struct pnp_driver ipmi_pnp_driver = {
	.name		= DEVICE_NAME,
	.probe		= ipmi_pnp_probe,
	.remove		= __devexit_p(ipmi_pnp_remove),
	.id_table	= pnp_dev_table,
};
L
Linus Torvalds 已提交
2262 2263
#endif

2264
#ifdef CONFIG_DMI
2265
struct dmi_ipmi_data {
L
Linus Torvalds 已提交
2266 2267 2268 2269 2270 2271
	u8   		type;
	u8   		addr_space;
	unsigned long	base_addr;
	u8   		irq;
	u8              offset;
	u8              slave_addr;
2272
};
L
Linus Torvalds 已提交
2273

2274
static int __devinit decode_dmi(const struct dmi_header *dm,
2275
				struct dmi_ipmi_data *dmi)
L
Linus Torvalds 已提交
2276
{
2277
	const u8	*data = (const u8 *)dm;
L
Linus Torvalds 已提交
2278 2279
	unsigned long  	base_addr;
	u8		reg_spacing;
2280
	u8              len = dm->length;
L
Linus Torvalds 已提交
2281

2282
	dmi->type = data[4];
L
Linus Torvalds 已提交
2283 2284 2285 2286 2287 2288

	memcpy(&base_addr, data+8, sizeof(unsigned long));
	if (len >= 0x11) {
		if (base_addr & 1) {
			/* I/O */
			base_addr &= 0xFFFE;
2289
			dmi->addr_space = IPMI_IO_ADDR_SPACE;
2290
		} else
L
Linus Torvalds 已提交
2291
			/* Memory */
2292
			dmi->addr_space = IPMI_MEM_ADDR_SPACE;
2293

L
Linus Torvalds 已提交
2294 2295
		/* If bit 4 of byte 0x10 is set, then the lsb for the address
		   is odd. */
2296
		dmi->base_addr = base_addr | ((data[0x10] & 0x10) >> 4);
L
Linus Torvalds 已提交
2297

2298
		dmi->irq = data[0x11];
L
Linus Torvalds 已提交
2299 2300

		/* The top two bits of byte 0x10 hold the register spacing. */
2301
		reg_spacing = (data[0x10] & 0xC0) >> 6;
2302
		switch (reg_spacing) {
L
Linus Torvalds 已提交
2303
		case 0x00: /* Byte boundaries */
2304
		    dmi->offset = 1;
L
Linus Torvalds 已提交
2305 2306
		    break;
		case 0x01: /* 32-bit boundaries */
2307
		    dmi->offset = 4;
L
Linus Torvalds 已提交
2308 2309
		    break;
		case 0x02: /* 16-byte boundaries */
2310
		    dmi->offset = 16;
L
Linus Torvalds 已提交
2311 2312 2313 2314 2315 2316 2317
		    break;
		default:
		    /* Some other interface, just ignore it. */
		    return -EIO;
		}
	} else {
		/* Old DMI spec. */
2318 2319
		/*
		 * Note that technically, the lower bit of the base
2320 2321 2322 2323
		 * address should be 1 if the address is I/O and 0 if
		 * the address is in memory.  So many systems get that
		 * wrong (and all that I have seen are I/O) so we just
		 * ignore that bit and assume I/O.  Systems that use
2324 2325
		 * memory should use the newer spec, anyway.
		 */
2326 2327 2328
		dmi->base_addr = base_addr & 0xfffe;
		dmi->addr_space = IPMI_IO_ADDR_SPACE;
		dmi->offset = 1;
L
Linus Torvalds 已提交
2329 2330
	}

2331
	dmi->slave_addr = data[6];
L
Linus Torvalds 已提交
2332

2333
	return 0;
L
Linus Torvalds 已提交
2334 2335
}

2336
static void __devinit try_init_dmi(struct dmi_ipmi_data *ipmi_data)
L
Linus Torvalds 已提交
2337
{
2338
	struct smi_info *info;
L
Linus Torvalds 已提交
2339

2340
	info = smi_info_alloc();
2341
	if (!info) {
2342
		printk(KERN_ERR PFX "Could not allocate SI data\n");
2343
		return;
L
Linus Torvalds 已提交
2344 2345
	}

2346
	info->addr_source = SI_SMBIOS;
2347
	printk(KERN_INFO PFX "probing via SMBIOS\n");
L
Linus Torvalds 已提交
2348

C
Corey Minyard 已提交
2349
	switch (ipmi_data->type) {
2350 2351 2352 2353 2354 2355 2356 2357 2358 2359
	case 0x01: /* KCS */
		info->si_type = SI_KCS;
		break;
	case 0x02: /* SMIC */
		info->si_type = SI_SMIC;
		break;
	case 0x03: /* BT */
		info->si_type = SI_BT;
		break;
	default:
2360
		kfree(info);
2361
		return;
L
Linus Torvalds 已提交
2362 2363
	}

2364 2365
	switch (ipmi_data->addr_space) {
	case IPMI_MEM_ADDR_SPACE:
L
Linus Torvalds 已提交
2366
		info->io_setup = mem_setup;
2367 2368 2369 2370
		info->io.addr_type = IPMI_MEM_ADDR_SPACE;
		break;

	case IPMI_IO_ADDR_SPACE:
L
Linus Torvalds 已提交
2371
		info->io_setup = port_setup;
2372 2373 2374 2375
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
		break;

	default:
L
Linus Torvalds 已提交
2376
		kfree(info);
2377
		printk(KERN_WARNING PFX "Unknown SMBIOS I/O Address type: %d\n",
2378 2379
		       ipmi_data->addr_space);
		return;
L
Linus Torvalds 已提交
2380
	}
2381
	info->io.addr_data = ipmi_data->base_addr;
L
Linus Torvalds 已提交
2382

2383 2384
	info->io.regspacing = ipmi_data->offset;
	if (!info->io.regspacing)
L
Linus Torvalds 已提交
2385 2386
		info->io.regspacing = DEFAULT_REGSPACING;
	info->io.regsize = DEFAULT_REGSPACING;
2387
	info->io.regshift = 0;
L
Linus Torvalds 已提交
2388 2389 2390

	info->slave_addr = ipmi_data->slave_addr;

2391 2392 2393
	info->irq = ipmi_data->irq;
	if (info->irq)
		info->irq_setup = std_irq_setup;
L
Linus Torvalds 已提交
2394

2395 2396 2397 2398 2399
	pr_info("ipmi_si: SMBIOS: %s %#lx regsize %d spacing %d irq %d\n",
		 (info->io.addr_type == IPMI_IO_ADDR_SPACE) ? "io" : "mem",
		 info->io.addr_data, info->io.regsize, info->io.regspacing,
		 info->irq);

2400 2401
	if (add_smi(info))
		kfree(info);
2402
}
L
Linus Torvalds 已提交
2403

2404 2405
static void __devinit dmi_find_bmc(void)
{
2406
	const struct dmi_device *dev = NULL;
2407 2408 2409 2410
	struct dmi_ipmi_data data;
	int                  rv;

	while ((dev = dmi_find_device(DMI_DEV_TYPE_IPMI, NULL, dev))) {
2411
		memset(&data, 0, sizeof(data));
2412 2413
		rv = decode_dmi((const struct dmi_header *) dev->device_data,
				&data);
2414 2415 2416
		if (!rv)
			try_init_dmi(&data);
	}
L
Linus Torvalds 已提交
2417
}
2418
#endif /* CONFIG_DMI */
L
Linus Torvalds 已提交
2419 2420 2421

#ifdef CONFIG_PCI

2422 2423 2424 2425 2426 2427 2428
#define PCI_ERMC_CLASSCODE		0x0C0700
#define PCI_ERMC_CLASSCODE_MASK		0xffffff00
#define PCI_ERMC_CLASSCODE_TYPE_MASK	0xff
#define PCI_ERMC_CLASSCODE_TYPE_SMIC	0x00
#define PCI_ERMC_CLASSCODE_TYPE_KCS	0x01
#define PCI_ERMC_CLASSCODE_TYPE_BT	0x02

L
Linus Torvalds 已提交
2429 2430 2431 2432
#define PCI_HP_VENDOR_ID    0x103C
#define PCI_MMC_DEVICE_ID   0x121A
#define PCI_MMC_ADDR_CW     0x10

2433 2434 2435 2436 2437 2438
static void ipmi_pci_cleanup(struct smi_info *info)
{
	struct pci_dev *pdev = info->addr_source_data;

	pci_disable_device(pdev);
}
L
Linus Torvalds 已提交
2439

2440 2441
static int __devinit ipmi_pci_probe(struct pci_dev *pdev,
				    const struct pci_device_id *ent)
L
Linus Torvalds 已提交
2442
{
2443 2444 2445
	int rv;
	int class_type = pdev->class & PCI_ERMC_CLASSCODE_TYPE_MASK;
	struct smi_info *info;
L
Linus Torvalds 已提交
2446

2447
	info = smi_info_alloc();
2448
	if (!info)
2449
		return -ENOMEM;
L
Linus Torvalds 已提交
2450

2451
	info->addr_source = SI_PCI;
2452
	dev_info(&pdev->dev, "probing via PCI");
L
Linus Torvalds 已提交
2453

2454 2455 2456 2457
	switch (class_type) {
	case PCI_ERMC_CLASSCODE_TYPE_SMIC:
		info->si_type = SI_SMIC;
		break;
L
Linus Torvalds 已提交
2458

2459 2460 2461 2462 2463 2464 2465 2466 2467 2468
	case PCI_ERMC_CLASSCODE_TYPE_KCS:
		info->si_type = SI_KCS;
		break;

	case PCI_ERMC_CLASSCODE_TYPE_BT:
		info->si_type = SI_BT;
		break;

	default:
		kfree(info);
2469
		dev_info(&pdev->dev, "Unknown IPMI type: %d\n", class_type);
2470
		return -ENOMEM;
L
Linus Torvalds 已提交
2471 2472
	}

2473 2474
	rv = pci_enable_device(pdev);
	if (rv) {
2475
		dev_err(&pdev->dev, "couldn't enable PCI device\n");
2476 2477
		kfree(info);
		return rv;
L
Linus Torvalds 已提交
2478 2479
	}

2480 2481
	info->addr_source_cleanup = ipmi_pci_cleanup;
	info->addr_source_data = pdev;
L
Linus Torvalds 已提交
2482

2483 2484 2485 2486 2487 2488
	if (pci_resource_flags(pdev, 0) & IORESOURCE_IO) {
		info->io_setup = port_setup;
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
	} else {
		info->io_setup = mem_setup;
		info->io.addr_type = IPMI_MEM_ADDR_SPACE;
L
Linus Torvalds 已提交
2489
	}
2490
	info->io.addr_data = pci_resource_start(pdev, 0);
L
Linus Torvalds 已提交
2491

2492
	info->io.regspacing = DEFAULT_REGSPACING;
L
Linus Torvalds 已提交
2493
	info->io.regsize = DEFAULT_REGSPACING;
2494
	info->io.regshift = 0;
L
Linus Torvalds 已提交
2495

2496 2497 2498
	info->irq = pdev->irq;
	if (info->irq)
		info->irq_setup = std_irq_setup;
L
Linus Torvalds 已提交
2499

2500
	info->dev = &pdev->dev;
C
Corey Minyard 已提交
2501
	pci_set_drvdata(pdev, info);
2502

2503 2504 2505 2506
	dev_info(&pdev->dev, "%pR regsize %d spacing %d irq %d\n",
		&pdev->resource[0], info->io.regsize, info->io.regspacing,
		info->irq);

2507 2508 2509 2510
	if (add_smi(info))
		kfree(info);

	return 0;
2511
}
L
Linus Torvalds 已提交
2512

2513 2514
static void __devexit ipmi_pci_remove(struct pci_dev *pdev)
{
C
Corey Minyard 已提交
2515 2516
	struct smi_info *info = pci_get_drvdata(pdev);
	cleanup_one_si(info);
2517
}
L
Linus Torvalds 已提交
2518

2519 2520 2521
#ifdef CONFIG_PM
static int ipmi_pci_suspend(struct pci_dev *pdev, pm_message_t state)
{
L
Linus Torvalds 已提交
2522 2523 2524
	return 0;
}

2525
static int ipmi_pci_resume(struct pci_dev *pdev)
L
Linus Torvalds 已提交
2526
{
2527 2528
	return 0;
}
L
Linus Torvalds 已提交
2529 2530
#endif

2531 2532
static struct pci_device_id ipmi_pci_devices[] = {
	{ PCI_DEVICE(PCI_HP_VENDOR_ID, PCI_MMC_DEVICE_ID) },
2533 2534
	{ PCI_DEVICE_CLASS(PCI_ERMC_CLASSCODE, PCI_ERMC_CLASSCODE_MASK) },
	{ 0, }
2535 2536 2537 2538
};
MODULE_DEVICE_TABLE(pci, ipmi_pci_devices);

static struct pci_driver ipmi_pci_driver = {
2539 2540 2541 2542
	.name =         DEVICE_NAME,
	.id_table =     ipmi_pci_devices,
	.probe =        ipmi_pci_probe,
	.remove =       __devexit_p(ipmi_pci_remove),
2543
#ifdef CONFIG_PM
2544 2545
	.suspend =      ipmi_pci_suspend,
	.resume =       ipmi_pci_resume,
2546 2547 2548
#endif
};
#endif /* CONFIG_PCI */
L
Linus Torvalds 已提交
2549

2550
static struct of_device_id ipmi_match[];
2551
static int __devinit ipmi_probe(struct platform_device *dev)
2552
{
2553
#ifdef CONFIG_OF
2554
	const struct of_device_id *match;
2555 2556
	struct smi_info *info;
	struct resource resource;
2557
	const __be32 *regsize, *regspacing, *regshift;
2558
	struct device_node *np = dev->dev.of_node;
2559 2560 2561
	int ret;
	int proplen;

2562
	dev_info(&dev->dev, "probing via device tree\n");
2563

2564 2565
	match = of_match_device(ipmi_match, &dev->dev);
	if (!match)
2566 2567
		return -EINVAL;

2568 2569 2570 2571 2572 2573
	ret = of_address_to_resource(np, 0, &resource);
	if (ret) {
		dev_warn(&dev->dev, PFX "invalid address from OF\n");
		return ret;
	}

2574
	regsize = of_get_property(np, "reg-size", &proplen);
2575 2576 2577 2578 2579
	if (regsize && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regsize from OF\n");
		return -EINVAL;
	}

2580
	regspacing = of_get_property(np, "reg-spacing", &proplen);
2581 2582 2583 2584 2585
	if (regspacing && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regspacing from OF\n");
		return -EINVAL;
	}

2586
	regshift = of_get_property(np, "reg-shift", &proplen);
2587 2588 2589 2590 2591
	if (regshift && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regshift from OF\n");
		return -EINVAL;
	}

2592
	info = smi_info_alloc();
2593 2594 2595

	if (!info) {
		dev_err(&dev->dev,
2596
			"could not allocate memory for OF probe\n");
2597 2598 2599
		return -ENOMEM;
	}

2600
	info->si_type		= (enum si_type) match->data;
2601
	info->addr_source	= SI_DEVICETREE;
2602 2603
	info->irq_setup		= std_irq_setup;

2604 2605 2606 2607 2608 2609 2610 2611
	if (resource.flags & IORESOURCE_IO) {
		info->io_setup		= port_setup;
		info->io.addr_type	= IPMI_IO_ADDR_SPACE;
	} else {
		info->io_setup		= mem_setup;
		info->io.addr_type	= IPMI_MEM_ADDR_SPACE;
	}

2612 2613
	info->io.addr_data	= resource.start;

2614 2615 2616
	info->io.regsize	= regsize ? be32_to_cpup(regsize) : DEFAULT_REGSIZE;
	info->io.regspacing	= regspacing ? be32_to_cpup(regspacing) : DEFAULT_REGSPACING;
	info->io.regshift	= regshift ? be32_to_cpup(regshift) : 0;
2617

2618
	info->irq		= irq_of_parse_and_map(dev->dev.of_node, 0);
2619 2620
	info->dev		= &dev->dev;

2621
	dev_dbg(&dev->dev, "addr 0x%lx regsize %d spacing %d irq %d\n",
2622 2623 2624
		info->io.addr_data, info->io.regsize, info->io.regspacing,
		info->irq);

2625
	dev_set_drvdata(&dev->dev, info);
2626

2627 2628 2629 2630
	if (add_smi(info)) {
		kfree(info);
		return -EBUSY;
	}
2631
#endif
2632
	return 0;
2633 2634
}

2635
static int __devexit ipmi_remove(struct platform_device *dev)
2636
{
2637
#ifdef CONFIG_OF
2638
	cleanup_one_si(dev_get_drvdata(&dev->dev));
2639
#endif
2640 2641 2642 2643 2644
	return 0;
}

static struct of_device_id ipmi_match[] =
{
2645 2646 2647 2648 2649 2650
	{ .type = "ipmi", .compatible = "ipmi-kcs",
	  .data = (void *)(unsigned long) SI_KCS },
	{ .type = "ipmi", .compatible = "ipmi-smic",
	  .data = (void *)(unsigned long) SI_SMIC },
	{ .type = "ipmi", .compatible = "ipmi-bt",
	  .data = (void *)(unsigned long) SI_BT },
2651 2652 2653
	{},
};

2654
static struct platform_driver ipmi_driver = {
2655
	.driver = {
2656
		.name = DEVICE_NAME,
2657 2658 2659
		.owner = THIS_MODULE,
		.of_match_table = ipmi_match,
	},
2660 2661
	.probe		= ipmi_probe,
	.remove		= __devexit_p(ipmi_remove),
2662 2663
};

2664
static int wait_for_msg_done(struct smi_info *smi_info)
L
Linus Torvalds 已提交
2665
{
2666
	enum si_sm_result     smi_result;
L
Linus Torvalds 已提交
2667 2668

	smi_result = smi_info->handlers->event(smi_info->si_sm, 0);
2669
	for (;;) {
C
Corey Minyard 已提交
2670 2671
		if (smi_result == SI_SM_CALL_WITH_DELAY ||
		    smi_result == SI_SM_CALL_WITH_TICK_DELAY) {
2672
			schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
2673 2674
			smi_result = smi_info->handlers->event(
				smi_info->si_sm, 100);
2675
		} else if (smi_result == SI_SM_CALL_WITHOUT_DELAY) {
L
Linus Torvalds 已提交
2676 2677
			smi_result = smi_info->handlers->event(
				smi_info->si_sm, 0);
2678
		} else
L
Linus Torvalds 已提交
2679 2680
			break;
	}
2681
	if (smi_result == SI_SM_HOSED)
2682 2683 2684 2685
		/*
		 * We couldn't get the state machine to run, so whatever's at
		 * the port is probably not an IPMI SMI interface.
		 */
2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711
		return -ENODEV;

	return 0;
}

static int try_get_dev_id(struct smi_info *smi_info)
{
	unsigned char         msg[2];
	unsigned char         *resp;
	unsigned long         resp_len;
	int                   rv = 0;

	resp = kmalloc(IPMI_MAX_MSG_LENGTH, GFP_KERNEL);
	if (!resp)
		return -ENOMEM;

	/*
	 * Do a Get Device ID command, since it comes back with some
	 * useful info.
	 */
	msg[0] = IPMI_NETFN_APP_REQUEST << 2;
	msg[1] = IPMI_GET_DEVICE_ID_CMD;
	smi_info->handlers->start_transaction(smi_info->si_sm, msg, 2);

	rv = wait_for_msg_done(smi_info);
	if (rv)
L
Linus Torvalds 已提交
2712 2713 2714 2715 2716
		goto out;

	resp_len = smi_info->handlers->get_result(smi_info->si_sm,
						  resp, IPMI_MAX_MSG_LENGTH);

C
Corey Minyard 已提交
2717 2718
	/* Check and record info from the get device id, in case we need it. */
	rv = ipmi_demangle_device_id(resp, resp_len, &smi_info->device_id);
L
Linus Torvalds 已提交
2719 2720 2721 2722 2723 2724

 out:
	kfree(resp);
	return rv;
}

2725 2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741
static int try_enable_event_buffer(struct smi_info *smi_info)
{
	unsigned char         msg[3];
	unsigned char         *resp;
	unsigned long         resp_len;
	int                   rv = 0;

	resp = kmalloc(IPMI_MAX_MSG_LENGTH, GFP_KERNEL);
	if (!resp)
		return -ENOMEM;

	msg[0] = IPMI_NETFN_APP_REQUEST << 2;
	msg[1] = IPMI_GET_BMC_GLOBAL_ENABLES_CMD;
	smi_info->handlers->start_transaction(smi_info->si_sm, msg, 2);

	rv = wait_for_msg_done(smi_info);
	if (rv) {
2742 2743
		printk(KERN_WARNING PFX "Error getting response from get"
		       " global enables command, the event buffer is not"
2744 2745 2746 2747 2748 2749 2750 2751 2752 2753 2754
		       " enabled.\n");
		goto out;
	}

	resp_len = smi_info->handlers->get_result(smi_info->si_sm,
						  resp, IPMI_MAX_MSG_LENGTH);

	if (resp_len < 4 ||
			resp[0] != (IPMI_NETFN_APP_REQUEST | 1) << 2 ||
			resp[1] != IPMI_GET_BMC_GLOBAL_ENABLES_CMD   ||
			resp[2] != 0) {
2755 2756
		printk(KERN_WARNING PFX "Invalid return from get global"
		       " enables command, cannot enable the event buffer.\n");
2757 2758 2759 2760 2761 2762 2763 2764 2765 2766 2767 2768 2769 2770 2771
		rv = -EINVAL;
		goto out;
	}

	if (resp[3] & IPMI_BMC_EVT_MSG_BUFF)
		/* buffer is already enabled, nothing to do. */
		goto out;

	msg[0] = IPMI_NETFN_APP_REQUEST << 2;
	msg[1] = IPMI_SET_BMC_GLOBAL_ENABLES_CMD;
	msg[2] = resp[3] | IPMI_BMC_EVT_MSG_BUFF;
	smi_info->handlers->start_transaction(smi_info->si_sm, msg, 3);

	rv = wait_for_msg_done(smi_info);
	if (rv) {
2772 2773
		printk(KERN_WARNING PFX "Error getting response from set"
		       " global, enables command, the event buffer is not"
2774 2775 2776 2777 2778 2779 2780 2781 2782 2783
		       " enabled.\n");
		goto out;
	}

	resp_len = smi_info->handlers->get_result(smi_info->si_sm,
						  resp, IPMI_MAX_MSG_LENGTH);

	if (resp_len < 3 ||
			resp[0] != (IPMI_NETFN_APP_REQUEST | 1) << 2 ||
			resp[1] != IPMI_SET_BMC_GLOBAL_ENABLES_CMD) {
2784 2785
		printk(KERN_WARNING PFX "Invalid return from get global,"
		       "enables command, not enable the event buffer.\n");
2786 2787 2788 2789 2790 2791 2792 2793 2794 2795 2796 2797 2798 2799 2800
		rv = -EINVAL;
		goto out;
	}

	if (resp[2] != 0)
		/*
		 * An error when setting the event buffer bit means
		 * that the event buffer is not supported.
		 */
		rv = -ENOENT;
 out:
	kfree(resp);
	return rv;
}

2801
static int smi_type_proc_show(struct seq_file *m, void *v)
L
Linus Torvalds 已提交
2802
{
2803
	struct smi_info *smi = m->private;
L
Linus Torvalds 已提交
2804

2805
	return seq_printf(m, "%s\n", si_to_str[smi->si_type]);
L
Linus Torvalds 已提交
2806 2807
}

2808
static int smi_type_proc_open(struct inode *inode, struct file *file)
L
Linus Torvalds 已提交
2809
{
2810 2811 2812 2813 2814 2815 2816 2817 2818 2819 2820 2821 2822
	return single_open(file, smi_type_proc_show, PDE(inode)->data);
}

static const struct file_operations smi_type_proc_ops = {
	.open		= smi_type_proc_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

static int smi_si_stats_proc_show(struct seq_file *m, void *v)
{
	struct smi_info *smi = m->private;
L
Linus Torvalds 已提交
2823

2824
	seq_printf(m, "interrupts_enabled:    %d\n",
2825
		       smi->irq && !smi->interrupt_disabled);
2826
	seq_printf(m, "short_timeouts:        %u\n",
2827
		       smi_get_stat(smi, short_timeouts));
2828
	seq_printf(m, "long_timeouts:         %u\n",
2829
		       smi_get_stat(smi, long_timeouts));
2830
	seq_printf(m, "idles:                 %u\n",
2831
		       smi_get_stat(smi, idles));
2832
	seq_printf(m, "interrupts:            %u\n",
2833
		       smi_get_stat(smi, interrupts));
2834
	seq_printf(m, "attentions:            %u\n",
2835
		       smi_get_stat(smi, attentions));
2836
	seq_printf(m, "flag_fetches:          %u\n",
2837
		       smi_get_stat(smi, flag_fetches));
2838
	seq_printf(m, "hosed_count:           %u\n",
2839
		       smi_get_stat(smi, hosed_count));
2840
	seq_printf(m, "complete_transactions: %u\n",
2841
		       smi_get_stat(smi, complete_transactions));
2842
	seq_printf(m, "events:                %u\n",
2843
		       smi_get_stat(smi, events));
2844
	seq_printf(m, "watchdog_pretimeouts:  %u\n",
2845
		       smi_get_stat(smi, watchdog_pretimeouts));
2846
	seq_printf(m, "incoming_messages:     %u\n",
2847
		       smi_get_stat(smi, incoming_messages));
2848 2849
	return 0;
}
L
Linus Torvalds 已提交
2850

2851 2852 2853
static int smi_si_stats_proc_open(struct inode *inode, struct file *file)
{
	return single_open(file, smi_si_stats_proc_show, PDE(inode)->data);
2854 2855
}

2856 2857 2858 2859 2860 2861 2862 2863
static const struct file_operations smi_si_stats_proc_ops = {
	.open		= smi_si_stats_proc_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

static int smi_params_proc_show(struct seq_file *m, void *v)
2864
{
2865
	struct smi_info *smi = m->private;
2866

2867
	return seq_printf(m,
2868 2869 2870 2871 2872 2873 2874 2875 2876
		       "%s,%s,0x%lx,rsp=%d,rsi=%d,rsh=%d,irq=%d,ipmb=%d\n",
		       si_to_str[smi->si_type],
		       addr_space_to_str[smi->io.addr_type],
		       smi->io.addr_data,
		       smi->io.regspacing,
		       smi->io.regsize,
		       smi->io.regshift,
		       smi->irq,
		       smi->slave_addr);
L
Linus Torvalds 已提交
2877 2878
}

2879 2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890
static int smi_params_proc_open(struct inode *inode, struct file *file)
{
	return single_open(file, smi_params_proc_show, PDE(inode)->data);
}

static const struct file_operations smi_params_proc_ops = {
	.open		= smi_params_proc_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

2891 2892 2893 2894 2895 2896 2897 2898 2899
/*
 * oem_data_avail_to_receive_msg_avail
 * @info - smi_info structure with msg_flags set
 *
 * Converts flags from OEM_DATA_AVAIL to RECEIVE_MSG_AVAIL
 * Returns 1 indicating need to re-run handle_flags().
 */
static int oem_data_avail_to_receive_msg_avail(struct smi_info *smi_info)
{
C
Corey Minyard 已提交
2900
	smi_info->msg_flags = ((smi_info->msg_flags & ~OEM_DATA_AVAIL) |
2901
			       RECEIVE_MSG_AVAIL);
2902 2903 2904 2905 2906 2907 2908 2909 2910 2911 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925
	return 1;
}

/*
 * setup_dell_poweredge_oem_data_handler
 * @info - smi_info.device_id must be populated
 *
 * Systems that match, but have firmware version < 1.40 may assert
 * OEM0_DATA_AVAIL on their own, without being told via Set Flags that
 * it's safe to do so.  Such systems will de-assert OEM1_DATA_AVAIL
 * upon receipt of IPMI_GET_MSG_CMD, so we should treat these flags
 * as RECEIVE_MSG_AVAIL instead.
 *
 * As Dell has no plans to release IPMI 1.5 firmware that *ever*
 * assert the OEM[012] bits, and if it did, the driver would have to
 * change to handle that properly, we don't actually check for the
 * firmware version.
 * Device ID = 0x20                BMC on PowerEdge 8G servers
 * Device Revision = 0x80
 * Firmware Revision1 = 0x01       BMC version 1.40
 * Firmware Revision2 = 0x40       BCD encoded
 * IPMI Version = 0x51             IPMI 1.5
 * Manufacturer ID = A2 02 00      Dell IANA
 *
C
Corey Minyard 已提交
2926 2927 2928
 * Additionally, PowerEdge systems with IPMI < 1.5 may also assert
 * OEM0_DATA_AVAIL and needs to be treated as RECEIVE_MSG_AVAIL.
 *
2929 2930 2931 2932
 */
#define DELL_POWEREDGE_8G_BMC_DEVICE_ID  0x20
#define DELL_POWEREDGE_8G_BMC_DEVICE_REV 0x80
#define DELL_POWEREDGE_8G_BMC_IPMI_VERSION 0x51
2933
#define DELL_IANA_MFR_ID 0x0002a2
2934 2935 2936
static void setup_dell_poweredge_oem_data_handler(struct smi_info *smi_info)
{
	struct ipmi_device_id *id = &smi_info->device_id;
2937
	if (id->manufacturer_id == DELL_IANA_MFR_ID) {
C
Corey Minyard 已提交
2938 2939
		if (id->device_id       == DELL_POWEREDGE_8G_BMC_DEVICE_ID  &&
		    id->device_revision == DELL_POWEREDGE_8G_BMC_DEVICE_REV &&
2940
		    id->ipmi_version   == DELL_POWEREDGE_8G_BMC_IPMI_VERSION) {
C
Corey Minyard 已提交
2941 2942
			smi_info->oem_data_avail_handler =
				oem_data_avail_to_receive_msg_avail;
2943 2944 2945
		} else if (ipmi_version_major(id) < 1 ||
			   (ipmi_version_major(id) == 1 &&
			    ipmi_version_minor(id) < 5)) {
C
Corey Minyard 已提交
2946 2947 2948
			smi_info->oem_data_avail_handler =
				oem_data_avail_to_receive_msg_avail;
		}
2949 2950 2951
	}
}

2952 2953 2954 2955 2956
#define CANNOT_RETURN_REQUESTED_LENGTH 0xCA
static void return_hosed_msg_badsize(struct smi_info *smi_info)
{
	struct ipmi_smi_msg *msg = smi_info->curr_msg;

L
Lucas De Marchi 已提交
2957
	/* Make it a response */
2958 2959 2960 2961 2962 2963 2964 2965 2966 2967 2968 2969 2970 2971 2972 2973 2974 2975 2976 2977 2978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010
	msg->rsp[0] = msg->data[0] | 4;
	msg->rsp[1] = msg->data[1];
	msg->rsp[2] = CANNOT_RETURN_REQUESTED_LENGTH;
	msg->rsp_size = 3;
	smi_info->curr_msg = NULL;
	deliver_recv_msg(smi_info, msg);
}

/*
 * dell_poweredge_bt_xaction_handler
 * @info - smi_info.device_id must be populated
 *
 * Dell PowerEdge servers with the BT interface (x6xx and 1750) will
 * not respond to a Get SDR command if the length of the data
 * requested is exactly 0x3A, which leads to command timeouts and no
 * data returned.  This intercepts such commands, and causes userspace
 * callers to try again with a different-sized buffer, which succeeds.
 */

#define STORAGE_NETFN 0x0A
#define STORAGE_CMD_GET_SDR 0x23
static int dell_poweredge_bt_xaction_handler(struct notifier_block *self,
					     unsigned long unused,
					     void *in)
{
	struct smi_info *smi_info = in;
	unsigned char *data = smi_info->curr_msg->data;
	unsigned int size   = smi_info->curr_msg->data_size;
	if (size >= 8 &&
	    (data[0]>>2) == STORAGE_NETFN &&
	    data[1] == STORAGE_CMD_GET_SDR &&
	    data[7] == 0x3A) {
		return_hosed_msg_badsize(smi_info);
		return NOTIFY_STOP;
	}
	return NOTIFY_DONE;
}

static struct notifier_block dell_poweredge_bt_xaction_notifier = {
	.notifier_call	= dell_poweredge_bt_xaction_handler,
};

/*
 * setup_dell_poweredge_bt_xaction_handler
 * @info - smi_info.device_id must be filled in already
 *
 * Fills in smi_info.device_id.start_transaction_pre_hook
 * when we know what function to use there.
 */
static void
setup_dell_poweredge_bt_xaction_handler(struct smi_info *smi_info)
{
	struct ipmi_device_id *id = &smi_info->device_id;
3011
	if (id->manufacturer_id == DELL_IANA_MFR_ID &&
3012 3013 3014 3015
	    smi_info->si_type == SI_BT)
		register_xaction_notifier(&dell_poweredge_bt_xaction_notifier);
}

3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028
/*
 * setup_oem_data_handler
 * @info - smi_info.device_id must be filled in already
 *
 * Fills in smi_info.device_id.oem_data_available_handler
 * when we know what function to use there.
 */

static void setup_oem_data_handler(struct smi_info *smi_info)
{
	setup_dell_poweredge_oem_data_handler(smi_info);
}

3029 3030 3031 3032 3033
static void setup_xaction_handlers(struct smi_info *smi_info)
{
	setup_dell_poweredge_bt_xaction_handler(smi_info);
}

C
Corey Minyard 已提交
3034 3035
static inline void wait_for_timer_and_thread(struct smi_info *smi_info)
{
3036
	if (smi_info->intf) {
3037 3038 3039 3040
		/*
		 * The timer and thread are only running if the
		 * interface has been started up and registered.
		 */
3041 3042 3043 3044
		if (smi_info->thread != NULL)
			kthread_stop(smi_info->thread);
		del_timer_sync(&smi_info->si_timer);
	}
C
Corey Minyard 已提交
3045 3046
}

3047
static __devinitdata struct ipmi_default_vals
3048 3049 3050
{
	int type;
	int port;
3051
} ipmi_defaults[] =
3052 3053 3054 3055 3056 3057 3058
{
	{ .type = SI_KCS, .port = 0xca2 },
	{ .type = SI_SMIC, .port = 0xca9 },
	{ .type = SI_BT, .port = 0xe4 },
	{ .port = 0 }
};

3059
static void __devinit default_find_bmc(void)
3060 3061 3062 3063 3064 3065 3066
{
	struct smi_info *info;
	int             i;

	for (i = 0; ; i++) {
		if (!ipmi_defaults[i].port)
			break;
3067
#ifdef CONFIG_PPC
3068 3069 3070
		if (check_legacy_ioport(ipmi_defaults[i].port))
			continue;
#endif
3071
		info = smi_info_alloc();
3072 3073
		if (!info)
			return;
3074

3075
		info->addr_source = SI_DEFAULT;
3076 3077 3078 3079 3080 3081 3082 3083 3084 3085 3086

		info->si_type = ipmi_defaults[i].type;
		info->io_setup = port_setup;
		info->io.addr_data = ipmi_defaults[i].port;
		info->io.addr_type = IPMI_IO_ADDR_SPACE;

		info->io.addr = NULL;
		info->io.regspacing = DEFAULT_REGSPACING;
		info->io.regsize = DEFAULT_REGSPACING;
		info->io.regshift = 0;

3087 3088 3089
		if (add_smi(info) == 0) {
			if ((try_smi_init(info)) == 0) {
				/* Found one... */
3090
				printk(KERN_INFO PFX "Found default %s"
3091 3092 3093 3094 3095 3096
				" state machine at %s address 0x%lx\n",
				si_to_str[info->si_type],
				addr_space_to_str[info->io.addr_type],
				info->io.addr_data);
			} else
				cleanup_one_si(info);
3097 3098
		} else {
			kfree(info);
3099 3100 3101 3102 3103
		}
	}
}

static int is_new_interface(struct smi_info *info)
L
Linus Torvalds 已提交
3104
{
3105
	struct smi_info *e;
L
Linus Torvalds 已提交
3106

3107 3108 3109 3110 3111 3112
	list_for_each_entry(e, &smi_infos, link) {
		if (e->io.addr_type != info->io.addr_type)
			continue;
		if (e->io.addr_data == info->io.addr_data)
			return 0;
	}
L
Linus Torvalds 已提交
3113

3114 3115
	return 1;
}
L
Linus Torvalds 已提交
3116

3117
static int add_smi(struct smi_info *new_smi)
3118
{
3119
	int rv = 0;
3120

3121
	printk(KERN_INFO PFX "Adding %s-specified %s state machine",
3122 3123
			ipmi_addr_src_to_str[new_smi->addr_source],
			si_to_str[new_smi->si_type]);
3124
	mutex_lock(&smi_infos_lock);
3125
	if (!is_new_interface(new_smi)) {
3126
		printk(KERN_CONT " duplicate interface\n");
3127 3128 3129
		rv = -EBUSY;
		goto out_err;
	}
L
Linus Torvalds 已提交
3130

3131 3132
	printk(KERN_CONT "\n");

L
Linus Torvalds 已提交
3133 3134 3135 3136 3137
	/* So we know not to free it unless we have allocated one. */
	new_smi->intf = NULL;
	new_smi->si_sm = NULL;
	new_smi->handlers = NULL;

3138 3139 3140 3141 3142 3143 3144 3145 3146 3147 3148 3149
	list_add_tail(&new_smi->link, &smi_infos);

out_err:
	mutex_unlock(&smi_infos_lock);
	return rv;
}

static int try_smi_init(struct smi_info *new_smi)
{
	int rv = 0;
	int i;

3150
	printk(KERN_INFO PFX "Trying %s-specified %s state"
3151 3152 3153 3154 3155 3156 3157 3158
	       " machine at %s address 0x%lx, slave address 0x%x,"
	       " irq %d\n",
	       ipmi_addr_src_to_str[new_smi->addr_source],
	       si_to_str[new_smi->si_type],
	       addr_space_to_str[new_smi->io.addr_type],
	       new_smi->io.addr_data,
	       new_smi->slave_addr, new_smi->irq);

3159 3160
	switch (new_smi->si_type) {
	case SI_KCS:
L
Linus Torvalds 已提交
3161
		new_smi->handlers = &kcs_smi_handlers;
3162 3163 3164
		break;

	case SI_SMIC:
L
Linus Torvalds 已提交
3165
		new_smi->handlers = &smic_smi_handlers;
3166 3167 3168
		break;

	case SI_BT:
L
Linus Torvalds 已提交
3169
		new_smi->handlers = &bt_smi_handlers;
3170 3171 3172
		break;

	default:
L
Linus Torvalds 已提交
3173 3174 3175 3176 3177 3178 3179
		/* No support for anything else yet. */
		rv = -EIO;
		goto out_err;
	}

	/* Allocate the state machine's data and initialize it. */
	new_smi->si_sm = kmalloc(new_smi->handlers->size(), GFP_KERNEL);
3180
	if (!new_smi->si_sm) {
3181 3182
		printk(KERN_ERR PFX
		       "Could not allocate state machine memory\n");
L
Linus Torvalds 已提交
3183 3184 3185 3186 3187 3188 3189 3190 3191
		rv = -ENOMEM;
		goto out_err;
	}
	new_smi->io_size = new_smi->handlers->init_data(new_smi->si_sm,
							&new_smi->io);

	/* Now that we know the I/O size, we can set up the I/O. */
	rv = new_smi->io_setup(new_smi);
	if (rv) {
3192
		printk(KERN_ERR PFX "Could not set up I/O space\n");
L
Linus Torvalds 已提交
3193 3194 3195 3196 3197
		goto out_err;
	}

	/* Do low-level detection first. */
	if (new_smi->handlers->detect(new_smi->si_sm)) {
3198
		if (new_smi->addr_source)
3199
			printk(KERN_INFO PFX "Interface detection failed\n");
L
Linus Torvalds 已提交
3200 3201 3202 3203
		rv = -ENODEV;
		goto out_err;
	}

3204 3205 3206 3207
	/*
	 * Attempt a get device id command.  If it fails, we probably
	 * don't have a BMC here.
	 */
L
Linus Torvalds 已提交
3208
	rv = try_get_dev_id(new_smi);
3209 3210
	if (rv) {
		if (new_smi->addr_source)
3211
			printk(KERN_INFO PFX "There appears to be no BMC"
3212
			       " at this location\n");
L
Linus Torvalds 已提交
3213
		goto out_err;
3214
	}
L
Linus Torvalds 已提交
3215

3216
	setup_oem_data_handler(new_smi);
3217
	setup_xaction_handlers(new_smi);
3218

L
Linus Torvalds 已提交
3219 3220 3221 3222 3223
	INIT_LIST_HEAD(&(new_smi->xmit_msgs));
	INIT_LIST_HEAD(&(new_smi->hp_xmit_msgs));
	new_smi->curr_msg = NULL;
	atomic_set(&new_smi->req_events, 0);
	new_smi->run_to_completion = 0;
3224 3225
	for (i = 0; i < SI_NUM_STATS; i++)
		atomic_set(&new_smi->stats[i], 0);
L
Linus Torvalds 已提交
3226

3227
	new_smi->interrupt_disabled = 1;
C
Corey Minyard 已提交
3228
	atomic_set(&new_smi->stop_operation, 0);
3229 3230
	new_smi->intf_num = smi_num;
	smi_num++;
L
Linus Torvalds 已提交
3231

3232 3233 3234 3235
	rv = try_enable_event_buffer(new_smi);
	if (rv == 0)
		new_smi->has_event_buffer = 1;

3236 3237 3238 3239
	/*
	 * Start clearing the flags before we enable interrupts or the
	 * timer to avoid racing with the timer.
	 */
L
Linus Torvalds 已提交
3240 3241 3242 3243 3244
	start_clear_flags(new_smi);
	/* IRQ is defined to be set when non-zero. */
	if (new_smi->irq)
		new_smi->si_state = SI_CLEARING_FLAGS_THEN_SET_IRQ;

3245
	if (!new_smi->dev) {
3246 3247 3248 3249
		/*
		 * If we don't already have a device from something
		 * else (like PCI), then register a new one.
		 */
3250 3251
		new_smi->pdev = platform_device_alloc("ipmi_si",
						      new_smi->intf_num);
C
Corey Minyard 已提交
3252
		if (!new_smi->pdev) {
3253 3254
			printk(KERN_ERR PFX
			       "Unable to allocate platform device\n");
3255
			goto out_err;
3256 3257
		}
		new_smi->dev = &new_smi->pdev->dev;
3258
		new_smi->dev->driver = &ipmi_driver.driver;
3259

3260
		rv = platform_device_add(new_smi->pdev);
3261
		if (rv) {
3262 3263
			printk(KERN_ERR PFX
			       "Unable to register system interface device:"
3264 3265
			       " %d\n",
			       rv);
3266
			goto out_err;
3267 3268 3269 3270
		}
		new_smi->dev_registered = 1;
	}

L
Linus Torvalds 已提交
3271 3272
	rv = ipmi_register_smi(&handlers,
			       new_smi,
3273 3274
			       &new_smi->device_id,
			       new_smi->dev,
3275
			       "bmc",
3276
			       new_smi->slave_addr);
L
Linus Torvalds 已提交
3277
	if (rv) {
3278 3279
		dev_err(new_smi->dev, "Unable to register device: error %d\n",
			rv);
L
Linus Torvalds 已提交
3280 3281 3282 3283
		goto out_err_stop_timer;
	}

	rv = ipmi_smi_add_proc_entry(new_smi->intf, "type",
3284
				     &smi_type_proc_ops,
3285
				     new_smi);
L
Linus Torvalds 已提交
3286
	if (rv) {
3287
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
L
Linus Torvalds 已提交
3288 3289 3290 3291
		goto out_err_stop_timer;
	}

	rv = ipmi_smi_add_proc_entry(new_smi->intf, "si_stats",
3292
				     &smi_si_stats_proc_ops,
3293
				     new_smi);
L
Linus Torvalds 已提交
3294
	if (rv) {
3295
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
L
Linus Torvalds 已提交
3296 3297 3298
		goto out_err_stop_timer;
	}

3299
	rv = ipmi_smi_add_proc_entry(new_smi->intf, "params",
3300
				     &smi_params_proc_ops,
3301
				     new_smi);
3302
	if (rv) {
3303
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
3304 3305 3306
		goto out_err_stop_timer;
	}

3307 3308
	dev_info(new_smi->dev, "IPMI %s interface initialized\n",
		 si_to_str[new_smi->si_type]);
L
Linus Torvalds 已提交
3309 3310 3311 3312

	return 0;

 out_err_stop_timer:
C
Corey Minyard 已提交
3313 3314
	atomic_inc(&new_smi->stop_operation);
	wait_for_timer_and_thread(new_smi);
L
Linus Torvalds 已提交
3315 3316

 out_err:
3317 3318 3319
	new_smi->interrupt_disabled = 1;

	if (new_smi->intf) {
L
Linus Torvalds 已提交
3320
		ipmi_unregister_smi(new_smi->intf);
3321 3322
		new_smi->intf = NULL;
	}
L
Linus Torvalds 已提交
3323

3324
	if (new_smi->irq_cleanup) {
3325
		new_smi->irq_cleanup(new_smi);
3326 3327
		new_smi->irq_cleanup = NULL;
	}
L
Linus Torvalds 已提交
3328

3329 3330 3331 3332 3333
	/*
	 * Wait until we know that we are out of any interrupt
	 * handlers might have been running before we freed the
	 * interrupt.
	 */
3334
	synchronize_sched();
L
Linus Torvalds 已提交
3335 3336 3337 3338 3339

	if (new_smi->si_sm) {
		if (new_smi->handlers)
			new_smi->handlers->cleanup(new_smi->si_sm);
		kfree(new_smi->si_sm);
3340
		new_smi->si_sm = NULL;
L
Linus Torvalds 已提交
3341
	}
3342
	if (new_smi->addr_source_cleanup) {
3343
		new_smi->addr_source_cleanup(new_smi);
3344 3345 3346
		new_smi->addr_source_cleanup = NULL;
	}
	if (new_smi->io_cleanup) {
P
Paolo Galtieri 已提交
3347
		new_smi->io_cleanup(new_smi);
3348 3349
		new_smi->io_cleanup = NULL;
	}
L
Linus Torvalds 已提交
3350

3351
	if (new_smi->dev_registered) {
3352
		platform_device_unregister(new_smi->pdev);
3353 3354
		new_smi->dev_registered = 0;
	}
3355

L
Linus Torvalds 已提交
3356 3357 3358
	return rv;
}

3359
static int __devinit init_ipmi_si(void)
L
Linus Torvalds 已提交
3360 3361 3362
{
	int  i;
	char *str;
3363
	int  rv;
3364
	struct smi_info *e;
3365
	enum ipmi_addr_src type = SI_INVALID;
L
Linus Torvalds 已提交
3366 3367 3368 3369 3370

	if (initialized)
		return 0;
	initialized = 1;

3371
	rv = platform_driver_register(&ipmi_driver);
3372
	if (rv) {
3373
		printk(KERN_ERR PFX "Unable to register driver: %d\n", rv);
3374 3375 3376 3377
		return rv;
	}


L
Linus Torvalds 已提交
3378 3379 3380
	/* Parse out the si_type string into its components. */
	str = si_type_str;
	if (*str != '\0') {
C
Corey Minyard 已提交
3381
		for (i = 0; (i < SI_MAX_PARMS) && (*str != '\0'); i++) {
L
Linus Torvalds 已提交
3382 3383 3384 3385 3386 3387 3388 3389 3390 3391 3392
			si_type[i] = str;
			str = strchr(str, ',');
			if (str) {
				*str = '\0';
				str++;
			} else {
				break;
			}
		}
	}

3393
	printk(KERN_INFO "IPMI System Interface driver.\n");
L
Linus Torvalds 已提交
3394

3395
	/* If the user gave us a device, they presumably want us to use it */
3396
	if (!hardcode_find_bmc())
3397 3398
		return 0;

3399
#ifdef CONFIG_PCI
C
Corey Minyard 已提交
3400
	rv = pci_register_driver(&ipmi_pci_driver);
3401
	if (rv)
3402
		printk(KERN_ERR PFX "Unable to register PCI driver: %d\n", rv);
3403 3404
	else
		pci_registered = 1;
3405 3406
#endif

3407 3408
#ifdef CONFIG_ACPI
	pnp_register_driver(&ipmi_pnp_driver);
3409
	pnp_registered = 1;
3410 3411 3412 3413 3414 3415 3416 3417 3418 3419
#endif

#ifdef CONFIG_DMI
	dmi_find_bmc();
#endif

#ifdef CONFIG_ACPI
	spmi_find_bmc();
#endif

3420 3421 3422 3423
	/* We prefer devices with interrupts, but in the case of a machine
	   with multiple BMCs we assume that there will be several instances
	   of a given type so if we succeed in registering a type then also
	   try to register everything else of the same type */
3424

3425 3426
	mutex_lock(&smi_infos_lock);
	list_for_each_entry(e, &smi_infos, link) {
3427 3428 3429 3430
		/* Try to register a device if it has an IRQ and we either
		   haven't successfully registered a device yet or this
		   device has the same type as one we successfully registered */
		if (e->irq && (!type || e->addr_source == type)) {
3431
			if (!try_smi_init(e)) {
3432
				type = e->addr_source;
3433 3434 3435 3436
			}
		}
	}

3437 3438 3439 3440 3441 3442
	/* type will only have been set if we successfully registered an si */
	if (type) {
		mutex_unlock(&smi_infos_lock);
		return 0;
	}

3443 3444 3445
	/* Fall back to the preferred device */

	list_for_each_entry(e, &smi_infos, link) {
3446
		if (!e->irq && (!type || e->addr_source == type)) {
3447
			if (!try_smi_init(e)) {
3448
				type = e->addr_source;
3449 3450
			}
		}
3451 3452 3453
	}
	mutex_unlock(&smi_infos_lock);

3454 3455 3456
	if (type)
		return 0;

3457
	if (si_trydefaults) {
3458
		mutex_lock(&smi_infos_lock);
3459 3460
		if (list_empty(&smi_infos)) {
			/* No BMC was found, try defaults. */
3461
			mutex_unlock(&smi_infos_lock);
3462
			default_find_bmc();
3463
		} else
3464
			mutex_unlock(&smi_infos_lock);
L
Linus Torvalds 已提交
3465 3466
	}

3467
	mutex_lock(&smi_infos_lock);
3468
	if (unload_when_empty && list_empty(&smi_infos)) {
3469
		mutex_unlock(&smi_infos_lock);
3470
		cleanup_ipmi_si();
3471 3472
		printk(KERN_WARNING PFX
		       "Unable to find any System Interface(s)\n");
L
Linus Torvalds 已提交
3473
		return -ENODEV;
3474
	} else {
3475
		mutex_unlock(&smi_infos_lock);
3476
		return 0;
L
Linus Torvalds 已提交
3477 3478 3479 3480
	}
}
module_init(init_ipmi_si);

3481
static void cleanup_one_si(struct smi_info *to_clean)
L
Linus Torvalds 已提交
3482
{
3483
	int           rv = 0;
L
Linus Torvalds 已提交
3484 3485
	unsigned long flags;

3486
	if (!to_clean)
L
Linus Torvalds 已提交
3487 3488
		return;

3489 3490
	list_del(&to_clean->link);

C
Corey Minyard 已提交
3491
	/* Tell the driver that we are shutting down. */
C
Corey Minyard 已提交
3492
	atomic_inc(&to_clean->stop_operation);
3493

3494 3495 3496 3497
	/*
	 * Make sure the timer and thread are stopped and will not run
	 * again.
	 */
C
Corey Minyard 已提交
3498
	wait_for_timer_and_thread(to_clean);
L
Linus Torvalds 已提交
3499

3500 3501 3502 3503 3504
	/*
	 * Timeouts are stopped, now make sure the interrupts are off
	 * for the device.  A little tricky with locks to make sure
	 * there are no races.
	 */
C
Corey Minyard 已提交
3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521
	spin_lock_irqsave(&to_clean->si_lock, flags);
	while (to_clean->curr_msg || (to_clean->si_state != SI_NORMAL)) {
		spin_unlock_irqrestore(&to_clean->si_lock, flags);
		poll(to_clean);
		schedule_timeout_uninterruptible(1);
		spin_lock_irqsave(&to_clean->si_lock, flags);
	}
	disable_si_irq(to_clean);
	spin_unlock_irqrestore(&to_clean->si_lock, flags);
	while (to_clean->curr_msg || (to_clean->si_state != SI_NORMAL)) {
		poll(to_clean);
		schedule_timeout_uninterruptible(1);
	}

	/* Clean up interrupts and make sure that everything is done. */
	if (to_clean->irq_cleanup)
		to_clean->irq_cleanup(to_clean);
C
Corey Minyard 已提交
3522
	while (to_clean->curr_msg || (to_clean->si_state != SI_NORMAL)) {
L
Linus Torvalds 已提交
3523
		poll(to_clean);
3524
		schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
3525 3526
	}

3527 3528 3529
	if (to_clean->intf)
		rv = ipmi_unregister_smi(to_clean->intf);

L
Linus Torvalds 已提交
3530
	if (rv) {
3531
		printk(KERN_ERR PFX "Unable to unregister device: errno=%d\n",
L
Linus Torvalds 已提交
3532 3533 3534
		       rv);
	}

3535 3536
	if (to_clean->handlers)
		to_clean->handlers->cleanup(to_clean->si_sm);
L
Linus Torvalds 已提交
3537 3538 3539

	kfree(to_clean->si_sm);

3540 3541
	if (to_clean->addr_source_cleanup)
		to_clean->addr_source_cleanup(to_clean);
P
Paolo Galtieri 已提交
3542 3543
	if (to_clean->io_cleanup)
		to_clean->io_cleanup(to_clean);
3544 3545 3546 3547 3548

	if (to_clean->dev_registered)
		platform_device_unregister(to_clean->pdev);

	kfree(to_clean);
L
Linus Torvalds 已提交
3549 3550
}

3551
static void cleanup_ipmi_si(void)
L
Linus Torvalds 已提交
3552
{
3553
	struct smi_info *e, *tmp_e;
L
Linus Torvalds 已提交
3554

3555
	if (!initialized)
L
Linus Torvalds 已提交
3556 3557
		return;

3558
#ifdef CONFIG_PCI
3559 3560
	if (pci_registered)
		pci_unregister_driver(&ipmi_pci_driver);
3561
#endif
I
Ingo Molnar 已提交
3562
#ifdef CONFIG_ACPI
3563 3564
	if (pnp_registered)
		pnp_unregister_driver(&ipmi_pnp_driver);
3565
#endif
3566

3567
	platform_driver_unregister(&ipmi_driver);
3568

3569
	mutex_lock(&smi_infos_lock);
3570 3571
	list_for_each_entry_safe(e, tmp_e, &smi_infos, link)
		cleanup_one_si(e);
3572
	mutex_unlock(&smi_infos_lock);
L
Linus Torvalds 已提交
3573 3574 3575 3576
}
module_exit(cleanup_ipmi_si);

MODULE_LICENSE("GPL");
3577
MODULE_AUTHOR("Corey Minyard <minyard@mvista.com>");
3578 3579
MODULE_DESCRIPTION("Interface to the IPMI driver for the KCS, SMIC, and BT"
		   " system interfaces.");