ipmi_si_intf.c 78.2 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 46 47 48 49 50 51 52 53
 *
 *  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>
#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>
54
#include <linux/notifier.h>
55
#include <linux/mutex.h>
M
Matt Domsch 已提交
56
#include <linux/kthread.h>
L
Linus Torvalds 已提交
57 58 59 60 61 62 63
#include <asm/irq.h>
#include <linux/interrupt.h>
#include <linux/rcupdate.h>
#include <linux/ipmi_smi.h>
#include <asm/io.h>
#include "ipmi_si_sm.h"
#include <linux/init.h>
64
#include <linux/dmi.h>
65 66 67
#include <linux/string.h>
#include <linux/ctype.h>

68 69 70 71 72
#ifdef CONFIG_PPC_OF
#include <asm/of_device.h>
#include <asm/of_platform.h>
#endif

73
#define PFX "ipmi_si: "
L
Linus Torvalds 已提交
74 75 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
                                       short timeout */

C
Corey Minyard 已提交
85 86 87 88 89 90
/* Bit for BMC global enables. */
#define IPMI_BMC_RCV_MSG_INTR     0x01
#define IPMI_BMC_EVT_MSG_INTR     0x02
#define IPMI_BMC_EVT_MSG_BUFF     0x04
#define IPMI_BMC_SYS_LOG          0x08

L
Linus Torvalds 已提交
91 92 93 94 95 96 97 98
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 已提交
99 100 101
	SI_ENABLE_INTERRUPTS2,
	SI_DISABLE_INTERRUPTS1,
	SI_DISABLE_INTERRUPTS2
L
Linus Torvalds 已提交
102 103 104
	/* FIXME - add watchdog stuff. */
};

105 106 107 108 109
/* 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 已提交
110 111 112
enum si_type {
    SI_KCS, SI_SMIC, SI_BT
};
113
static char *si_to_str[] = { "kcs", "smic", "bt" };
L
Linus Torvalds 已提交
114

115 116 117 118 119 120 121
#define DEVICE_NAME "ipmi_si"

static struct device_driver ipmi_driver =
{
	.name = DEVICE_NAME,
	.bus = &platform_bus_type
};
122

L
Linus Torvalds 已提交
123 124
struct smi_info
{
C
Corey Minyard 已提交
125
	int                    intf_num;
L
Linus Torvalds 已提交
126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144
	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;

	/* Used to handle the various types of I/O that can occur with
           IPMI */
	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;
145 146 147
	char *addr_source; /* ACPI, PCI, SMBIOS, hardcode, default. */
	void (*addr_source_cleanup)(struct smi_info *info);
	void *addr_source_data;
L
Linus Torvalds 已提交
148

149 150 151 152 153 154
	/* 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.
	*/
	int (*oem_data_avail_handler)(struct smi_info *smi_info);

L
Linus Torvalds 已提交
155 156 157 158 159 160
	/* 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. */
#define RECEIVE_MSG_AVAIL	0x01
#define EVENT_MSG_BUFFER_FULL	0x02
#define WDT_PRE_TIMEOUT_INT	0x08
161 162 163 164 165 166
#define OEM0_DATA_AVAIL     0x20
#define OEM1_DATA_AVAIL     0x40
#define OEM2_DATA_AVAIL     0x80
#define OEM_DATA_AVAIL      (OEM0_DATA_AVAIL | \
                             OEM1_DATA_AVAIL | \
                             OEM2_DATA_AVAIL)
L
Linus Torvalds 已提交
167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195
	unsigned char       msg_flags;

	/* If set to true, this will request events the next time the
	   state machine is idle. */
	atomic_t            req_events;

	/* If true, run the state machine to completion on every send
	   call.  Generally used after a panic to make sure stuff goes
	   out. */
	int                 run_to_completion;

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

	/* 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. */
	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 已提交
196
	atomic_t            stop_operation;
L
Linus Torvalds 已提交
197 198 199 200 201 202 203

	/* 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. */
	int interrupt_disabled;

204
	/* From the get device id response... */
205
	struct ipmi_device_id device_id;
L
Linus Torvalds 已提交
206

207 208 209 210 211 212 213 214
	/* Driver model stuff. */
	struct device *dev;
	struct platform_device *pdev;

	 /* True if we allocated the device, false if it came from
	  * someplace else (like PCI). */
	int dev_registered;

L
Linus Torvalds 已提交
215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231
	/* Slave address, could be reported from DMI. */
	unsigned char slave_addr;

	/* Counters and things for the proc filesystem. */
	spinlock_t count_lock;
	unsigned long short_timeouts;
	unsigned long long_timeouts;
	unsigned long timeout_restarts;
	unsigned long idles;
	unsigned long interrupts;
	unsigned long attentions;
	unsigned long flag_fetches;
	unsigned long hosed_count;
	unsigned long complete_transactions;
	unsigned long events;
	unsigned long watchdog_pretimeouts;
	unsigned long incoming_messages;
C
Corey Minyard 已提交
232

M
Matt Domsch 已提交
233
        struct task_struct *thread;
234 235

	struct list_head link;
L
Linus Torvalds 已提交
236 237
};

238 239 240 241 242
#define SI_MAX_PARMS 4

static int force_kipmid[SI_MAX_PARMS];
static int num_force_kipmid;

243 244
static int unload_when_empty = 1;

245
static int try_smi_init(struct smi_info *smi);
246
static void cleanup_one_si(struct smi_info *to_clean);
247

248
static ATOMIC_NOTIFIER_HEAD(xaction_notifier_list);
249 250
static int register_xaction_notifier(struct notifier_block * nb)
{
251
	return atomic_notifier_chain_register(&xaction_notifier_list, nb);
252 253
}

L
Linus Torvalds 已提交
254 255 256 257 258 259 260 261 262 263
static void deliver_recv_msg(struct smi_info *smi_info,
			     struct ipmi_smi_msg *msg)
{
	/* Deliver the message to the upper layer with the lock
           released. */
	spin_unlock(&(smi_info->si_lock));
	ipmi_smi_msg_received(smi_info->intf, msg);
	spin_lock(&(smi_info->si_lock));
}

C
Corey Minyard 已提交
264
static void return_hosed_msg(struct smi_info *smi_info, int cCode)
L
Linus Torvalds 已提交
265 266 267
{
	struct ipmi_smi_msg *msg = smi_info->curr_msg;

C
Corey Minyard 已提交
268 269 270 271
	if (cCode < 0 || cCode > IPMI_ERR_UNSPECIFIED)
		cCode = IPMI_ERR_UNSPECIFIED;
	/* else use it as is */

L
Linus Torvalds 已提交
272 273 274
	/* Make it a reponse */
	msg->rsp[0] = msg->data[0] | 4;
	msg->rsp[1] = msg->data[1];
C
Corey Minyard 已提交
275
	msg->rsp[2] = cCode;
L
Linus Torvalds 已提交
276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294
	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

	/* No need to save flags, we aleady have interrupts off and we
	   already hold the SMI lock. */
	spin_lock(&(smi_info->msg_lock));

	/* Pick the high priority queue first. */
295
	if (!list_empty(&(smi_info->hp_xmit_msgs))) {
L
Linus Torvalds 已提交
296
		entry = smi_info->hp_xmit_msgs.next;
297
	} else if (!list_empty(&(smi_info->xmit_msgs))) {
L
Linus Torvalds 已提交
298 299 300
		entry = smi_info->xmit_msgs.next;
	}

301
	if (!entry) {
L
Linus Torvalds 已提交
302 303 304 305 306 307 308 309 310 311 312 313 314
		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);
		printk("**Start2: %d.%9.9d\n", t.tv_sec, t.tv_usec);
#endif
315 316
		err = atomic_notifier_call_chain(&xaction_notifier_list,
				0, smi_info);
317 318 319 320
		if (err & NOTIFY_STOP_MASK) {
			rv = SI_SM_CALL_WITHOUT_DELAY;
			goto out;
		}
L
Linus Torvalds 已提交
321 322 323 324 325
		err = smi_info->handlers->start_transaction(
			smi_info->si_sm,
			smi_info->curr_msg->data,
			smi_info->curr_msg->data_size);
		if (err) {
C
Corey Minyard 已提交
326
			return_hosed_msg(smi_info, err);
L
Linus Torvalds 已提交
327 328 329 330
		}

		rv = SI_SM_CALL_WITHOUT_DELAY;
	}
331
	out:
L
Linus Torvalds 已提交
332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349
	spin_unlock(&(smi_info->msg_lock));

	return rv;
}

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

	/* If we are enabling interrupts, we have to tell the
	   BMC to use them. */
	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 已提交
350 351 352 353 354 355 356 357 358 359 360
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 已提交
361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379
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;
}

/* 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. */
static inline void disable_si_irq(struct smi_info *smi_info)
{
380
	if ((smi_info->irq) && (!smi_info->interrupt_disabled)) {
C
Corey Minyard 已提交
381
		start_disable_irq(smi_info);
L
Linus Torvalds 已提交
382 383 384 385 386 387 388
		smi_info->interrupt_disabled = 1;
	}
}

static inline void enable_si_irq(struct smi_info *smi_info)
{
	if ((smi_info->irq) && (smi_info->interrupt_disabled)) {
C
Corey Minyard 已提交
389
		start_enable_irq(smi_info);
L
Linus Torvalds 已提交
390 391 392 393 394 395
		smi_info->interrupt_disabled = 0;
	}
}

static void handle_flags(struct smi_info *smi_info)
{
396
 retry:
L
Linus Torvalds 已提交
397 398 399 400 401 402 403 404 405 406 407 408 409 410
	if (smi_info->msg_flags & WDT_PRE_TIMEOUT_INT) {
		/* Watchdog pre-timeout */
		spin_lock(&smi_info->count_lock);
		smi_info->watchdog_pretimeouts++;
		spin_unlock(&smi_info->count_lock);

		start_clear_flags(smi_info);
		smi_info->msg_flags &= ~WDT_PRE_TIMEOUT_INT;
		spin_unlock(&(smi_info->si_lock));
		ipmi_smi_watchdog_pretimeout(smi_info->intf);
		spin_lock(&(smi_info->si_lock));
	} else if (smi_info->msg_flags & RECEIVE_MSG_AVAIL) {
		/* Messages available. */
		smi_info->curr_msg = ipmi_alloc_smi_msg();
411
		if (!smi_info->curr_msg) {
L
Linus Torvalds 已提交
412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429
			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();
430
		if (!smi_info->curr_msg) {
L
Linus Torvalds 已提交
431 432 433 434 435 436 437 438 439 440 441 442 443 444 445
			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;
446 447 448 449
	} else if (smi_info->msg_flags & OEM_DATA_AVAIL &&
	           smi_info->oem_data_avail_handler) {
		if (smi_info->oem_data_avail_handler(smi_info))
			goto retry;
L
Linus Torvalds 已提交
450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465
	} else {
		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);
	printk("**Done: %d.%9.9d\n", t.tv_sec, t.tv_usec);
#endif
	switch (smi_info->si_state) {
	case SI_NORMAL:
466
		if (!smi_info->curr_msg)
L
Linus Torvalds 已提交
467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610
			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);

		/* 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. */
		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) {
			/* Error fetching flags, just give up for
			   now. */
			smi_info->si_state = SI_NORMAL;
		} else if (len < 4) {
			/* Hmm, no flags.  That's technically illegal, but
			   don't use uninitialized data. */
			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 */
			printk(KERN_WARNING
			       "ipmi_si: Error clearing flags: %2.2x\n",
			       msg[2]);
		}
		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);

		/* 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. */
		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 {
			spin_lock(&smi_info->count_lock);
			smi_info->events++;
			spin_unlock(&smi_info->count_lock);

			/* Do this before we deliver the message
			   because delivering the message releases the
			   lock and something else can mess with the
			   state. */
			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);

		/* 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. */
		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 {
			spin_lock(&smi_info->count_lock);
			smi_info->incoming_messages++;
			spin_unlock(&smi_info->count_lock);

			/* Do this before we deliver the message
			   because delivering the message releases the
			   lock and something else can mess with the
			   state. */
			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) {
			printk(KERN_WARNING
			       "ipmi_si: Could not enable interrupts"
			       ", failed get, using polled mode.\n");
			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 已提交
611 612 613
			msg[2] = (msg[3] |
				  IPMI_BMC_RCV_MSG_INTR |
				  IPMI_BMC_EVT_MSG_INTR);
L
Linus Torvalds 已提交
614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634
			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);
		if (msg[2] != 0) {
			printk(KERN_WARNING
			       "ipmi_si: Could not enable interrupts"
			       ", failed set, using polled mode.\n");
		}
		smi_info->si_state = SI_NORMAL;
		break;
	}
C
Corey Minyard 已提交
635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673

	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) {
			printk(KERN_WARNING
			       "ipmi_si: Could not disable interrupts"
			       ", failed get.\n");
			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) {
			printk(KERN_WARNING
			       "ipmi_si: Could not disable interrupts"
			       ", failed set.\n");
		}
		smi_info->si_state = SI_NORMAL;
		break;
	}
L
Linus Torvalds 已提交
674 675 676 677
	}
}

/* Called on timeouts and events.  Timeouts should pass the elapsed
C
Corey Minyard 已提交
678 679
   time, interrupts should pass in zero.  Must be called with
   si_lock held and interrupts disabled. */
L
Linus Torvalds 已提交
680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720
static enum si_sm_result smi_event_handler(struct smi_info *smi_info,
					   int time)
{
	enum si_sm_result si_sm_result;

 restart:
	/* 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. */
	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);
	}

	if (si_sm_result == SI_SM_TRANSACTION_COMPLETE)
	{
		spin_lock(&smi_info->count_lock);
		smi_info->complete_transactions++;
		spin_unlock(&smi_info->count_lock);

		handle_transaction_done(smi_info);
		si_sm_result = smi_info->handlers->event(smi_info->si_sm, 0);
	}
	else if (si_sm_result == SI_SM_HOSED)
	{
		spin_lock(&smi_info->count_lock);
		smi_info->hosed_count++;
		spin_unlock(&smi_info->count_lock);

		/* Do the before return_hosed_msg, because that
		   releases the lock. */
		smi_info->si_state = SI_NORMAL;
		if (smi_info->curr_msg != NULL) {
			/* 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 已提交
721
			return_hosed_msg(smi_info, IPMI_ERR_UNSPECIFIED);
L
Linus Torvalds 已提交
722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764
		}
		si_sm_result = smi_info->handlers->event(smi_info->si_sm, 0);
	}

	/* We prefer handling attn over new messages. */
	if (si_sm_result == SI_SM_ATTN)
	{
		unsigned char msg[2];

		spin_lock(&smi_info->count_lock);
		smi_info->attentions++;
		spin_unlock(&smi_info->count_lock);

		/* 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. */
		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) {
		spin_lock(&smi_info->count_lock);
		smi_info->idles++;
		spin_unlock(&smi_info->count_lock);

		si_sm_result = start_next_msg(smi_info);
		if (si_sm_result != SI_SM_IDLE)
			goto restart;
        }

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

C
Corey Minyard 已提交
767 768 769
		smi_info->curr_msg = ipmi_alloc_smi_msg();
		if (!smi_info->curr_msg)
			goto out;
L
Linus Torvalds 已提交
770

C
Corey Minyard 已提交
771 772 773
		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 已提交
774 775

		smi_info->handlers->start_transaction(
C
Corey Minyard 已提交
776 777 778 779
			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 已提交
780 781
		goto restart;
	}
C
Corey Minyard 已提交
782
 out:
L
Linus Torvalds 已提交
783 784 785 786 787 788 789 790 791 792 793 794 795 796
	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

797 798 799 800 801 802 803 804 805
	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 已提交
806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869
	spin_lock_irqsave(&(smi_info->msg_lock), flags);
#ifdef DEBUG_TIMING
	do_gettimeofday(&t);
	printk("**Enqueue: %d.%9.9d\n", t.tv_sec, t.tv_usec);
#endif

	if (smi_info->run_to_completion) {
		/* If we are running to completion, then throw it in
		   the list and run transactions until everything is
		   clear.  Priority doesn't matter here. */
		list_add_tail(&(msg->link), &(smi_info->xmit_msgs));

		/* We have to release the msg lock and claim the smi
		   lock in this case, because of race conditions. */
		spin_unlock_irqrestore(&(smi_info->msg_lock), flags);

		spin_lock_irqsave(&(smi_info->si_lock), flags);
		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);
		}
		spin_unlock_irqrestore(&(smi_info->si_lock), flags);
		return;
	} else {
		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);
	if ((smi_info->si_state == SI_NORMAL)
	    && (smi_info->curr_msg == NULL))
	{
		start_next_msg(smi_info);
	}
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);
}

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;
	unsigned long     flags;

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

	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);
		}
	}

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

C
Corey Minyard 已提交
870 871 872
static int ipmi_thread(void *data)
{
	struct smi_info *smi_info = data;
M
Matt Domsch 已提交
873
	unsigned long flags;
C
Corey Minyard 已提交
874 875 876
	enum si_sm_result smi_result;

	set_user_nice(current, 19);
M
Matt Domsch 已提交
877
	while (!kthread_should_stop()) {
C
Corey Minyard 已提交
878
		spin_lock_irqsave(&(smi_info->si_lock), flags);
879
		smi_result = smi_event_handler(smi_info, 0);
C
Corey Minyard 已提交
880
		spin_unlock_irqrestore(&(smi_info->si_lock), flags);
M
Matt Domsch 已提交
881 882
		if (smi_result == SI_SM_CALL_WITHOUT_DELAY) {
			/* do nothing */
C
Corey Minyard 已提交
883
		}
M
Matt Domsch 已提交
884
		else if (smi_result == SI_SM_CALL_WITH_DELAY)
885
			schedule();
M
Matt Domsch 已提交
886 887
		else
			schedule_timeout_interruptible(1);
C
Corey Minyard 已提交
888 889 890 891 892
	}
	return 0;
}


L
Linus Torvalds 已提交
893 894 895
static void poll(void *send_info)
{
	struct smi_info *smi_info = send_info;
C
Corey Minyard 已提交
896
	unsigned long flags;
L
Linus Torvalds 已提交
897

C
Corey Minyard 已提交
898 899 900 901 902
	/*
	 * Make sure there is some delay in the poll loop so we can
	 * drive time forward and timeout things.
	 */
	udelay(10);
C
Corey Minyard 已提交
903
	spin_lock_irqsave(&smi_info->si_lock, flags);
C
Corey Minyard 已提交
904
	smi_event_handler(smi_info, 10);
C
Corey Minyard 已提交
905
	spin_unlock_irqrestore(&smi_info->si_lock, flags);
L
Linus Torvalds 已提交
906 907 908 909 910 911
}

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

912 913 914
	if (atomic_read(&smi_info->stop_operation))
		return;

L
Linus Torvalds 已提交
915 916 917
	atomic_set(&smi_info->req_events, 1);
}

R
Randy Dunlap 已提交
918
static int initialized;
L
Linus Torvalds 已提交
919 920 921 922 923 924 925

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 已提交
926
	long              time_diff;
L
Linus Torvalds 已提交
927 928 929 930 931 932 933 934 935 936
#ifdef DEBUG_TIMING
	struct timeval    t;
#endif

	spin_lock_irqsave(&(smi_info->si_lock), flags);
#ifdef DEBUG_TIMING
	do_gettimeofday(&t);
	printk("**Timer: %d.%9.9d\n", t.tv_sec, t.tv_usec);
#endif
	jiffies_now = jiffies;
C
Corey Minyard 已提交
937
	time_diff = (((long)jiffies_now - (long)smi_info->last_timeout_jiffies)
L
Linus Torvalds 已提交
938 939 940 941 942 943 944
		     * 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;

945
	if ((smi_info->irq) && (!smi_info->interrupt_disabled)) {
L
Linus Torvalds 已提交
946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971
		/* Running with interrupts, only do long timeouts. */
		smi_info->si_timer.expires = jiffies + SI_TIMEOUT_JIFFIES;
		spin_lock_irqsave(&smi_info->count_lock, flags);
		smi_info->long_timeouts++;
		spin_unlock_irqrestore(&smi_info->count_lock, flags);
		goto do_add_timer;
	}

	/* If the state machine asks for a short delay, then shorten
           the timer timeout. */
	if (smi_result == SI_SM_CALL_WITH_DELAY) {
		spin_lock_irqsave(&smi_info->count_lock, flags);
		smi_info->short_timeouts++;
		spin_unlock_irqrestore(&smi_info->count_lock, flags);
		smi_info->si_timer.expires = jiffies + 1;
	} else {
		spin_lock_irqsave(&smi_info->count_lock, flags);
		smi_info->long_timeouts++;
		spin_unlock_irqrestore(&smi_info->count_lock, flags);
		smi_info->si_timer.expires = jiffies + SI_TIMEOUT_JIFFIES;
	}

 do_add_timer:
	add_timer(&(smi_info->si_timer));
}

972
static irqreturn_t si_irq_handler(int irq, void *data)
L
Linus Torvalds 已提交
973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994
{
	struct smi_info *smi_info = data;
	unsigned long   flags;
#ifdef DEBUG_TIMING
	struct timeval  t;
#endif

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

	spin_lock(&smi_info->count_lock);
	smi_info->interrupts++;
	spin_unlock(&smi_info->count_lock);

#ifdef DEBUG_TIMING
	do_gettimeofday(&t);
	printk("**Interrupt: %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 IRQ_HANDLED;
}

995
static irqreturn_t si_bt_irq_handler(int irq, void *data)
996 997 998 999 1000 1001
{
	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);
1002
	return si_irq_handler(irq, data);
1003 1004
}

1005 1006 1007 1008
static int smi_start_processing(void       *send_info,
				ipmi_smi_t intf)
{
	struct smi_info *new_smi = send_info;
1009
	int             enable = 0;
1010 1011 1012

	new_smi->intf = intf;

C
Corey Minyard 已提交
1013 1014 1015 1016
	/* Try to claim any interrupts. */
	if (new_smi->irq_setup)
		new_smi->irq_setup(new_smi);

1017 1018 1019 1020 1021
	/* 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);

1022 1023 1024 1025 1026
	/*
	 * Check if the user forcefully enabled the daemon.
	 */
	if (new_smi->intf_num < num_force_kipmid)
		enable = force_kipmid[new_smi->intf_num];
1027 1028 1029 1030
	/*
	 * The BT interface is efficient enough to not need a thread,
	 * and there is no need for a thread if we have interrupts.
	 */
1031 1032 1033 1034
 	else if ((new_smi->si_type != SI_BT) && (!new_smi->irq))
		enable = 1;

	if (enable) {
1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047
		new_smi->thread = kthread_run(ipmi_thread, new_smi,
					      "kipmi%d", new_smi->intf_num);
		if (IS_ERR(new_smi->thread)) {
			printk(KERN_NOTICE "ipmi_si_intf: Could not start"
			       " kernel thread due to error %ld, only using"
			       " timers to drive the interface\n",
			       PTR_ERR(new_smi->thread));
			new_smi->thread = NULL;
		}
	}

	return 0;
}
1048

C
Corey Minyard 已提交
1049 1050 1051 1052 1053 1054 1055 1056
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);
}

L
Linus Torvalds 已提交
1057 1058 1059
static struct ipmi_smi_handlers handlers =
{
	.owner                  = THIS_MODULE,
1060
	.start_processing       = smi_start_processing,
L
Linus Torvalds 已提交
1061 1062
	.sender			= sender,
	.request_events		= request_events,
C
Corey Minyard 已提交
1063
	.set_maintenance_mode   = set_maintenance_mode,
L
Linus Torvalds 已提交
1064 1065 1066 1067 1068 1069 1070
	.set_run_to_completion  = set_run_to_completion,
	.poll			= poll,
};

/* 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 */

1071
static LIST_HEAD(smi_infos);
1072
static DEFINE_MUTEX(smi_infos_lock);
1073
static int smi_num; /* Used to sequence the SMIs */
L
Linus Torvalds 已提交
1074 1075

#define DEFAULT_REGSPACING	1
1076
#define DEFAULT_REGSIZE		1
L
Linus Torvalds 已提交
1077 1078 1079 1080 1081 1082

static int           si_trydefaults = 1;
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];
1083
static unsigned int num_addrs;
L
Linus Torvalds 已提交
1084
static unsigned int  ports[SI_MAX_PARMS];
1085
static unsigned int num_ports;
L
Linus Torvalds 已提交
1086
static int           irqs[SI_MAX_PARMS];
1087
static unsigned int num_irqs;
L
Linus Torvalds 已提交
1088
static int           regspacings[SI_MAX_PARMS];
1089
static unsigned int num_regspacings;
L
Linus Torvalds 已提交
1090
static int           regsizes[SI_MAX_PARMS];
1091
static unsigned int num_regsizes;
L
Linus Torvalds 已提交
1092
static int           regshifts[SI_MAX_PARMS];
1093
static unsigned int num_regshifts;
L
Linus Torvalds 已提交
1094
static int slave_addrs[SI_MAX_PARMS];
1095
static unsigned int num_slave_addrs;
L
Linus Torvalds 已提交
1096

1097 1098
#define IPMI_IO_ADDR_SPACE  0
#define IPMI_MEM_ADDR_SPACE 1
C
Corey Minyard 已提交
1099
static char *addr_space_to_str[] = { "i/o", "mem" };
1100 1101 1102 1103 1104 1105 1106

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 已提交
1107 1108 1109 1110 1111 1112 1113 1114 1115 1116

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");
1117
module_param_array(addrs, ulong, &num_addrs, 0);
L
Linus Torvalds 已提交
1118 1119 1120 1121
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.");
1122
module_param_array(ports, uint, &num_ports, 0);
L
Linus Torvalds 已提交
1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153
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.");
1154 1155 1156 1157
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.");
1158 1159 1160 1161
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.");
L
Linus Torvalds 已提交
1162 1163


1164
static void std_irq_cleanup(struct smi_info *info)
L
Linus Torvalds 已提交
1165
{
1166 1167 1168 1169
	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 已提交
1170 1171 1172 1173 1174 1175
}

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

1176
	if (!info->irq)
L
Linus Torvalds 已提交
1177 1178
		return 0;

1179 1180 1181
	if (info->si_type == SI_BT) {
		rv = request_irq(info->irq,
				 si_bt_irq_handler,
C
Corey Minyard 已提交
1182
				 IRQF_SHARED | IRQF_DISABLED,
1183 1184
				 DEVICE_NAME,
				 info);
1185
		if (!rv)
1186 1187 1188 1189 1190 1191
			/* 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 已提交
1192
				 IRQF_SHARED | IRQF_DISABLED,
1193 1194
				 DEVICE_NAME,
				 info);
L
Linus Torvalds 已提交
1195 1196 1197 1198 1199 1200 1201
	if (rv) {
		printk(KERN_WARNING
		       "ipmi_si: %s unable to claim interrupt %d,"
		       " running polled\n",
		       DEVICE_NAME, info->irq);
		info->irq = 0;
	} else {
1202
		info->irq_cleanup = std_irq_cleanup;
L
Linus Torvalds 已提交
1203 1204 1205 1206 1207 1208 1209 1210
		printk("  Using irq %d\n", info->irq);
	}

	return rv;
}

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

1213
	return inb(addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1214 1215 1216 1217 1218
}

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

1221
	outb(b, addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1222 1223 1224 1225
}

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

1228
	return (inw(addr + (offset * io->regspacing)) >> io->regshift) & 0xff;
L
Linus Torvalds 已提交
1229 1230 1231 1232 1233
}

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

1236
	outw(b << io->regshift, addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1237 1238 1239 1240
}

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

1243
	return (inl(addr + (offset * io->regspacing)) >> io->regshift) & 0xff;
L
Linus Torvalds 已提交
1244 1245 1246 1247 1248
}

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

1251
	outl(b << io->regshift, addr+(offset * io->regspacing));
L
Linus Torvalds 已提交
1252 1253 1254 1255
}

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

1259
	if (addr) {
1260 1261 1262 1263
	  	for (idx = 0; idx < info->io_size; idx++) {
			release_region(addr + idx * info->io.regspacing,
				       info->io.regsize);
		}
L
Linus Torvalds 已提交
1264 1265 1266 1267 1268
	}
}

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

1272
	if (!addr)
L
Linus Torvalds 已提交
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
		return -ENODEV;

	info->io_cleanup = port_cleanup;

	/* Figure out the actual inb/inw/inl/etc routine to use based
	   upon the register size. */
	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:
		printk("ipmi_si: Invalid register size: %d\n",
		       info->io.regsize);
		return -EINVAL;
	}

1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313
	/* Some BIOSes reserve disjoint I/O regions in their ACPI
	 * tables.  This causes problems when trying to register the
	 * entire I/O region.  Therefore we must register each I/O
	 * port separately.
	 */
  	for (idx = 0; idx < info->io_size; idx++) {
		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 已提交
1314 1315 1316
	return 0;
}

1317
static unsigned char intf_mem_inb(struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1318 1319 1320 1321
{
	return readb((io->addr)+(offset * io->regspacing));
}

1322
static void intf_mem_outb(struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1323 1324 1325 1326 1327
		     unsigned char b)
{
	writeb(b, (io->addr)+(offset * io->regspacing));
}

1328
static unsigned char intf_mem_inw(struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1329 1330
{
	return (readw((io->addr)+(offset * io->regspacing)) >> io->regshift)
1331
		& 0xff;
L
Linus Torvalds 已提交
1332 1333
}

1334
static void intf_mem_outw(struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1335 1336 1337 1338 1339
		     unsigned char b)
{
	writeb(b << io->regshift, (io->addr)+(offset * io->regspacing));
}

1340
static unsigned char intf_mem_inl(struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1341 1342
{
	return (readl((io->addr)+(offset * io->regspacing)) >> io->regshift)
1343
		& 0xff;
L
Linus Torvalds 已提交
1344 1345
}

1346
static void intf_mem_outl(struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1347 1348 1349 1350 1351 1352 1353 1354 1355
		     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)
1356
		& 0xff;
L
Linus Torvalds 已提交
1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367
}

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)
{
1368
	unsigned long addr = info->io.addr_data;
L
Linus Torvalds 已提交
1369 1370 1371 1372 1373 1374 1375 1376
	int           mapsize;

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

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

1377
		release_mem_region(addr, mapsize);
L
Linus Torvalds 已提交
1378 1379 1380 1381 1382
	}
}

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

1386
	if (!addr)
L
Linus Torvalds 已提交
1387 1388 1389 1390 1391 1392 1393 1394
		return -ENODEV;

	info->io_cleanup = mem_cleanup;

	/* Figure out the actual readb/readw/readl/etc routine to use based
	   upon the register size. */
	switch (info->io.regsize) {
	case 1:
1395 1396
		info->io.inputb = intf_mem_inb;
		info->io.outputb = intf_mem_outb;
L
Linus Torvalds 已提交
1397 1398
		break;
	case 2:
1399 1400
		info->io.inputb = intf_mem_inw;
		info->io.outputb = intf_mem_outw;
L
Linus Torvalds 已提交
1401 1402
		break;
	case 4:
1403 1404
		info->io.inputb = intf_mem_inl;
		info->io.outputb = intf_mem_outl;
L
Linus Torvalds 已提交
1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425
		break;
#ifdef readq
	case 8:
		info->io.inputb = mem_inq;
		info->io.outputb = mem_outq;
		break;
#endif
	default:
		printk("ipmi_si: Invalid register size: %d\n",
		       info->io.regsize);
		return -EINVAL;
	}

	/* Calculate the total amount of memory to claim.  This is an
	 * 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
	 * register. */
	mapsize = ((info->io_size * info->io.regspacing)
		   - (info->io.regspacing - info->io.regsize));

1426
	if (request_mem_region(addr, mapsize, DEVICE_NAME) == NULL)
L
Linus Torvalds 已提交
1427 1428
		return -EIO;

1429
	info->io.addr = ioremap(addr, mapsize);
L
Linus Torvalds 已提交
1430
	if (info->io.addr == NULL) {
1431
		release_mem_region(addr, mapsize);
L
Linus Torvalds 已提交
1432 1433 1434 1435 1436
		return -EIO;
	}
	return 0;
}

1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467
/*
 * 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 已提交
1468

1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481
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 已提交
1482
		if (strcmp(*curr, v[i].name) == 0) {
1483 1484 1485 1486 1487 1488 1489 1490 1491 1492
			*val = v[i].val;
			*curr = s;
			return 0;
		}
	}

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

C
Corey Minyard 已提交
1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516
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;
}

1517 1518 1519
static int hotmod_handler(const char *val, struct kernel_param *kp)
{
	char *str = kstrdup(val, GFP_KERNEL);
C
Corey Minyard 已提交
1520
	int  rv;
1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531
	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 已提交
1532
	int len;
1533 1534 1535 1536 1537 1538
	struct smi_info *info;

	if (!str)
		return -ENOMEM;

	/* Kill any trailing spaces, as we can get a "\n" from echo. */
C
Corey Minyard 已提交
1539 1540
	len = strlen(str);
	ival = len - 1;
1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596
	while ((ival >= 0) && isspace(str[ival])) {
		str[ival] = '\0';
		ival--;
	}

	for (curr = str; curr; curr = next) {
		regspacing = 1;
		regsize = 1;
		regshift = 0;
		irq = 0;
		ipmb = 0x20;

		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 已提交
1597 1598
			rv = check_hotmod_int_op(curr, o, "rsp", &regspacing);
			if (rv < 0)
1599
				goto out;
C
Corey Minyard 已提交
1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627
			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;
1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675
		}

		if (op == HM_ADD) {
			info = kzalloc(sizeof(*info), GFP_KERNEL);
			if (!info) {
				rv = -ENOMEM;
				goto out;
			}

			info->addr_source = "hotmod";
			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;

			try_smi_init(info);
		} 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 已提交
1676
	rv = len;
1677 1678 1679 1680
 out:
	kfree(str);
	return rv;
}
1681 1682

static __devinit void hardcode_find_bmc(void)
L
Linus Torvalds 已提交
1683
{
1684
	int             i;
L
Linus Torvalds 已提交
1685 1686
	struct smi_info *info;

1687 1688 1689
	for (i = 0; i < SI_MAX_PARMS; i++) {
		if (!ports[i] && !addrs[i])
			continue;
L
Linus Torvalds 已提交
1690

1691 1692 1693
		info = kzalloc(sizeof(*info), GFP_KERNEL);
		if (!info)
			return;
L
Linus Torvalds 已提交
1694

1695
		info->addr_source = "hardcoded";
L
Linus Torvalds 已提交
1696

C
Corey Minyard 已提交
1697
		if (!si_type[i] || strcmp(si_type[i], "kcs") == 0) {
1698
			info->si_type = SI_KCS;
C
Corey Minyard 已提交
1699
		} else if (strcmp(si_type[i], "smic") == 0) {
1700
			info->si_type = SI_SMIC;
C
Corey Minyard 已提交
1701
		} else if (strcmp(si_type[i], "bt") == 0) {
1702 1703 1704 1705 1706 1707 1708 1709 1710
			info->si_type = SI_BT;
		} else {
			printk(KERN_WARNING
			       "ipmi_si: Interface type specified "
			       "for interface %d, was invalid: %s\n",
			       i, si_type[i]);
			kfree(info);
			continue;
		}
L
Linus Torvalds 已提交
1711

1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730
		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 {
			printk(KERN_WARNING
			       "ipmi_si: Interface type specified "
			       "for interface %d, "
			       "but port and address were not set or "
			       "set to zero.\n", i);
			kfree(info);
			continue;
		}
L
Linus Torvalds 已提交
1731

1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742
		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;
L
Linus Torvalds 已提交
1743

1744 1745 1746
		try_smi_init(info);
	}
}
L
Linus Torvalds 已提交
1747

1748
#ifdef CONFIG_ACPI
L
Linus Torvalds 已提交
1749 1750 1751 1752 1753 1754

#include <linux/acpi.h>

/* 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 已提交
1755
static int acpi_failure;
L
Linus Torvalds 已提交
1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781

/* For GPE-type interrupts. */
static u32 ipmi_acpi_gpe(void *context)
{
	struct smi_info *smi_info = context;
	unsigned long   flags;
#ifdef DEBUG_TIMING
	struct timeval t;
#endif

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

	spin_lock(&smi_info->count_lock);
	smi_info->interrupts++;
	spin_unlock(&smi_info->count_lock);

#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;
}

1782 1783 1784 1785 1786 1787 1788 1789
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 已提交
1790 1791 1792 1793
static int acpi_gpe_irq_setup(struct smi_info *info)
{
	acpi_status status;

1794
	if (!info->irq)
L
Linus Torvalds 已提交
1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810
		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) {
		printk(KERN_WARNING
		       "ipmi_si: %s unable to claim ACPI GPE %d,"
		       " running polled\n",
		       DEVICE_NAME, info->irq);
		info->irq = 0;
		return -EINVAL;
	} else {
1811
		info->irq_cleanup = acpi_gpe_irq_cleanup;
L
Linus Torvalds 已提交
1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858
		printk("  Using ACPI GPE %d\n", info->irq);
		return 0;
	}
}

/*
 * Defined at
 * http://h21007.www2.hp.com/dspp/files/unprotected/devresource/Docs/TechPapers/IA64/hpspmi.pdf
 */
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;

	/* If bit 0 of InterruptType is set, then this is the SCI
           interrupt in the GPEx_STS register. */
	u8	GPE;

	s16	Reserved;

	/* If bit 1 of InterruptType is set, then this is the I/O
           APIC/SAPIC interrupt. */
	u32	GlobalSystemInterrupt;

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

	u8	UID[4];

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

1859
static __devinit int try_init_acpi(struct SPMITable *spmi)
L
Linus Torvalds 已提交
1860 1861 1862 1863 1864 1865 1866 1867 1868
{
	struct smi_info  *info;
	u8 		 addr_space;

	if (spmi->IPMIlegacy != 1) {
	    printk(KERN_INFO "IPMI: Bad SPMI legacy %d\n", spmi->IPMIlegacy);
  	    return -ENODEV;
	}

1869
	if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_MEMORY)
L
Linus Torvalds 已提交
1870 1871 1872
		addr_space = IPMI_MEM_ADDR_SPACE;
	else
		addr_space = IPMI_IO_ADDR_SPACE;
1873 1874 1875 1876 1877 1878 1879 1880

	info = kzalloc(sizeof(*info), GFP_KERNEL);
	if (!info) {
		printk(KERN_ERR "ipmi_si: Could not allocate SI data (3)\n");
		return -ENOMEM;
	}

	info->addr_source = "ACPI";
L
Linus Torvalds 已提交
1881 1882 1883 1884 1885

	/* Figure out the interface type. */
	switch (spmi->InterfaceType)
	{
	case 1:	/* KCS */
1886
		info->si_type = SI_KCS;
L
Linus Torvalds 已提交
1887 1888
		break;
	case 2:	/* SMIC */
1889
		info->si_type = SI_SMIC;
L
Linus Torvalds 已提交
1890 1891
		break;
	case 3:	/* BT */
1892
		info->si_type = SI_BT;
L
Linus Torvalds 已提交
1893 1894 1895 1896
		break;
	default:
		printk(KERN_INFO "ipmi_si: Unknown ACPI/SPMI SI type %d\n",
			spmi->InterfaceType);
1897
		kfree(info);
L
Linus Torvalds 已提交
1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914
		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;
	}

1915
	if (spmi->addr.bit_width) {
1916
		/* A (hopefully) properly formed register bit width. */
1917
		info->io.regspacing = spmi->addr.bit_width / 8;
1918 1919 1920
	} else {
		info->io.regspacing = DEFAULT_REGSPACING;
	}
1921
	info->io.regsize = info->io.regspacing;
1922
	info->io.regshift = spmi->addr.bit_offset;
L
Linus Torvalds 已提交
1923

1924
	if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_MEMORY) {
L
Linus Torvalds 已提交
1925
		info->io_setup = mem_setup;
1926
		info->io.addr_type = IPMI_MEM_ADDR_SPACE;
1927
	} else if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_IO) {
L
Linus Torvalds 已提交
1928
		info->io_setup = port_setup;
1929
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
L
Linus Torvalds 已提交
1930 1931 1932 1933 1934
	} else {
		kfree(info);
		printk("ipmi_si: Unknown ACPI I/O Address type\n");
		return -EIO;
	}
1935
	info->io.addr_data = spmi->addr.address;
L
Linus Torvalds 已提交
1936

1937
	try_smi_init(info);
L
Linus Torvalds 已提交
1938 1939 1940

	return 0;
}
1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954

static __devinit void acpi_find_bmc(void)
{
	acpi_status      status;
	struct SPMITable *spmi;
	int              i;

	if (acpi_disabled)
		return;

	if (acpi_failure)
		return;

	for (i = 0; ; i++) {
1955 1956
		status = acpi_get_table(ACPI_SIG_SPMI, i+1,
					(struct acpi_table_header **)&spmi);
1957 1958 1959 1960 1961 1962
		if (status != AE_OK)
			return;

		try_init_acpi(spmi);
	}
}
L
Linus Torvalds 已提交
1963 1964
#endif

1965
#ifdef CONFIG_DMI
1966
struct dmi_ipmi_data
L
Linus Torvalds 已提交
1967 1968 1969 1970 1971 1972 1973
{
	u8   		type;
	u8   		addr_space;
	unsigned long	base_addr;
	u8   		irq;
	u8              offset;
	u8              slave_addr;
1974
};
L
Linus Torvalds 已提交
1975

1976
static int __devinit decode_dmi(const struct dmi_header *dm,
1977
				struct dmi_ipmi_data *dmi)
L
Linus Torvalds 已提交
1978
{
1979
	const u8	*data = (const u8 *)dm;
L
Linus Torvalds 已提交
1980 1981
	unsigned long  	base_addr;
	u8		reg_spacing;
1982
	u8              len = dm->length;
L
Linus Torvalds 已提交
1983

1984
	dmi->type = data[4];
L
Linus Torvalds 已提交
1985 1986 1987 1988 1989 1990

	memcpy(&base_addr, data+8, sizeof(unsigned long));
	if (len >= 0x11) {
		if (base_addr & 1) {
			/* I/O */
			base_addr &= 0xFFFE;
1991
			dmi->addr_space = IPMI_IO_ADDR_SPACE;
L
Linus Torvalds 已提交
1992 1993 1994
		}
		else {
			/* Memory */
1995
			dmi->addr_space = IPMI_MEM_ADDR_SPACE;
L
Linus Torvalds 已提交
1996 1997 1998
		}
		/* If bit 4 of byte 0x10 is set, then the lsb for the address
		   is odd. */
1999
		dmi->base_addr = base_addr | ((data[0x10] & 0x10) >> 4);
L
Linus Torvalds 已提交
2000

2001
		dmi->irq = data[0x11];
L
Linus Torvalds 已提交
2002 2003

		/* The top two bits of byte 0x10 hold the register spacing. */
2004
		reg_spacing = (data[0x10] & 0xC0) >> 6;
L
Linus Torvalds 已提交
2005 2006
		switch(reg_spacing){
		case 0x00: /* Byte boundaries */
2007
		    dmi->offset = 1;
L
Linus Torvalds 已提交
2008 2009
		    break;
		case 0x01: /* 32-bit boundaries */
2010
		    dmi->offset = 4;
L
Linus Torvalds 已提交
2011 2012
		    break;
		case 0x02: /* 16-byte boundaries */
2013
		    dmi->offset = 16;
L
Linus Torvalds 已提交
2014 2015 2016 2017 2018 2019 2020
		    break;
		default:
		    /* Some other interface, just ignore it. */
		    return -EIO;
		}
	} else {
		/* Old DMI spec. */
2021 2022 2023 2024 2025 2026
		/* Note that technically, the lower bit of the base
		 * 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
		 * memory should use the newer spec, anyway. */
2027 2028 2029
		dmi->base_addr = base_addr & 0xfffe;
		dmi->addr_space = IPMI_IO_ADDR_SPACE;
		dmi->offset = 1;
L
Linus Torvalds 已提交
2030 2031
	}

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

2034
	return 0;
L
Linus Torvalds 已提交
2035 2036
}

2037
static __devinit void try_init_dmi(struct dmi_ipmi_data *ipmi_data)
L
Linus Torvalds 已提交
2038
{
2039
	struct smi_info *info;
L
Linus Torvalds 已提交
2040

2041 2042 2043 2044 2045
	info = kzalloc(sizeof(*info), GFP_KERNEL);
	if (!info) {
		printk(KERN_ERR
		       "ipmi_si: Could not allocate SI data\n");
		return;
L
Linus Torvalds 已提交
2046 2047
	}

2048
	info->addr_source = "SMBIOS";
L
Linus Torvalds 已提交
2049

C
Corey Minyard 已提交
2050
	switch (ipmi_data->type) {
2051 2052 2053 2054 2055 2056 2057 2058 2059 2060
	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:
2061
		kfree(info);
2062
		return;
L
Linus Torvalds 已提交
2063 2064
	}

2065 2066
	switch (ipmi_data->addr_space) {
	case IPMI_MEM_ADDR_SPACE:
L
Linus Torvalds 已提交
2067
		info->io_setup = mem_setup;
2068 2069 2070 2071
		info->io.addr_type = IPMI_MEM_ADDR_SPACE;
		break;

	case IPMI_IO_ADDR_SPACE:
L
Linus Torvalds 已提交
2072
		info->io_setup = port_setup;
2073 2074 2075 2076
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
		break;

	default:
L
Linus Torvalds 已提交
2077
		kfree(info);
2078 2079 2080 2081
		printk(KERN_WARNING
		       "ipmi_si: Unknown SMBIOS I/O Address type: %d.\n",
		       ipmi_data->addr_space);
		return;
L
Linus Torvalds 已提交
2082
	}
2083
	info->io.addr_data = ipmi_data->base_addr;
L
Linus Torvalds 已提交
2084

2085 2086
	info->io.regspacing = ipmi_data->offset;
	if (!info->io.regspacing)
L
Linus Torvalds 已提交
2087 2088
		info->io.regspacing = DEFAULT_REGSPACING;
	info->io.regsize = DEFAULT_REGSPACING;
2089
	info->io.regshift = 0;
L
Linus Torvalds 已提交
2090 2091 2092

	info->slave_addr = ipmi_data->slave_addr;

2093 2094 2095
	info->irq = ipmi_data->irq;
	if (info->irq)
		info->irq_setup = std_irq_setup;
L
Linus Torvalds 已提交
2096

2097 2098
	try_smi_init(info);
}
L
Linus Torvalds 已提交
2099

2100 2101
static void __devinit dmi_find_bmc(void)
{
2102
	const struct dmi_device *dev = NULL;
2103 2104 2105 2106
	struct dmi_ipmi_data data;
	int                  rv;

	while ((dev = dmi_find_device(DMI_DEV_TYPE_IPMI, NULL, dev))) {
2107
		memset(&data, 0, sizeof(data));
2108 2109
		rv = decode_dmi((const struct dmi_header *) dev->device_data,
				&data);
2110 2111 2112
		if (!rv)
			try_init_dmi(&data);
	}
L
Linus Torvalds 已提交
2113
}
2114
#endif /* CONFIG_DMI */
L
Linus Torvalds 已提交
2115 2116 2117

#ifdef CONFIG_PCI

2118 2119 2120 2121 2122 2123 2124
#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 已提交
2125 2126 2127 2128
#define PCI_HP_VENDOR_ID    0x103C
#define PCI_MMC_DEVICE_ID   0x121A
#define PCI_MMC_ADDR_CW     0x10

2129 2130 2131 2132 2133 2134
static void ipmi_pci_cleanup(struct smi_info *info)
{
	struct pci_dev *pdev = info->addr_source_data;

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

2136 2137
static int __devinit ipmi_pci_probe(struct pci_dev *pdev,
				    const struct pci_device_id *ent)
L
Linus Torvalds 已提交
2138
{
2139 2140 2141 2142
	int rv;
	int class_type = pdev->class & PCI_ERMC_CLASSCODE_TYPE_MASK;
	struct smi_info *info;
	int first_reg_offset = 0;
L
Linus Torvalds 已提交
2143

2144 2145
	info = kzalloc(sizeof(*info), GFP_KERNEL);
	if (!info)
2146
		return -ENOMEM;
L
Linus Torvalds 已提交
2147

2148
	info->addr_source = "PCI";
L
Linus Torvalds 已提交
2149

2150 2151 2152 2153
	switch (class_type) {
	case PCI_ERMC_CLASSCODE_TYPE_SMIC:
		info->si_type = SI_SMIC;
		break;
L
Linus Torvalds 已提交
2154

2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166
	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);
		printk(KERN_INFO "ipmi_si: %s: Unknown IPMI type: %d\n",
		       pci_name(pdev), class_type);
2167
		return -ENOMEM;
L
Linus Torvalds 已提交
2168 2169
	}

2170 2171 2172 2173 2174 2175
	rv = pci_enable_device(pdev);
	if (rv) {
		printk(KERN_ERR "ipmi_si: %s: couldn't enable PCI device\n",
		       pci_name(pdev));
		kfree(info);
		return rv;
L
Linus Torvalds 已提交
2176 2177
	}

2178 2179
	info->addr_source_cleanup = ipmi_pci_cleanup;
	info->addr_source_data = pdev;
L
Linus Torvalds 已提交
2180

2181 2182
	if (pdev->subsystem_vendor == PCI_HP_VENDOR_ID)
		first_reg_offset = 1;
L
Linus Torvalds 已提交
2183

2184 2185 2186 2187 2188 2189
	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 已提交
2190
	}
2191
	info->io.addr_data = pci_resource_start(pdev, 0);
L
Linus Torvalds 已提交
2192

2193
	info->io.regspacing = DEFAULT_REGSPACING;
L
Linus Torvalds 已提交
2194
	info->io.regsize = DEFAULT_REGSPACING;
2195
	info->io.regshift = 0;
L
Linus Torvalds 已提交
2196

2197 2198 2199
	info->irq = pdev->irq;
	if (info->irq)
		info->irq_setup = std_irq_setup;
L
Linus Torvalds 已提交
2200

2201
	info->dev = &pdev->dev;
C
Corey Minyard 已提交
2202
	pci_set_drvdata(pdev, info);
2203

2204 2205
	return try_smi_init(info);
}
L
Linus Torvalds 已提交
2206

2207 2208
static void __devexit ipmi_pci_remove(struct pci_dev *pdev)
{
C
Corey Minyard 已提交
2209 2210
	struct smi_info *info = pci_get_drvdata(pdev);
	cleanup_one_si(info);
2211
}
L
Linus Torvalds 已提交
2212

2213 2214 2215
#ifdef CONFIG_PM
static int ipmi_pci_suspend(struct pci_dev *pdev, pm_message_t state)
{
L
Linus Torvalds 已提交
2216 2217 2218
	return 0;
}

2219
static int ipmi_pci_resume(struct pci_dev *pdev)
L
Linus Torvalds 已提交
2220
{
2221 2222
	return 0;
}
L
Linus Torvalds 已提交
2223 2224
#endif

2225 2226
static struct pci_device_id ipmi_pci_devices[] = {
	{ PCI_DEVICE(PCI_HP_VENDOR_ID, PCI_MMC_DEVICE_ID) },
2227 2228
	{ PCI_DEVICE_CLASS(PCI_ERMC_CLASSCODE, PCI_ERMC_CLASSCODE_MASK) },
	{ 0, }
2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242
};
MODULE_DEVICE_TABLE(pci, ipmi_pci_devices);

static struct pci_driver ipmi_pci_driver = {
        .name =         DEVICE_NAME,
        .id_table =     ipmi_pci_devices,
        .probe =        ipmi_pci_probe,
        .remove =       __devexit_p(ipmi_pci_remove),
#ifdef CONFIG_PM
        .suspend =      ipmi_pci_suspend,
        .resume =       ipmi_pci_resume,
#endif
};
#endif /* CONFIG_PCI */
L
Linus Torvalds 已提交
2243 2244


2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263
#ifdef CONFIG_PPC_OF
static int __devinit ipmi_of_probe(struct of_device *dev,
			 const struct of_device_id *match)
{
	struct smi_info *info;
	struct resource resource;
	const int *regsize, *regspacing, *regshift;
	struct device_node *np = dev->node;
	int ret;
	int proplen;

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

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

2264
	regsize = of_get_property(np, "reg-size", &proplen);
2265 2266 2267 2268 2269
	if (regsize && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regsize from OF\n");
		return -EINVAL;
	}

2270
	regspacing = of_get_property(np, "reg-spacing", &proplen);
2271 2272 2273 2274 2275
	if (regspacing && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regspacing from OF\n");
		return -EINVAL;
	}

2276
	regshift = of_get_property(np, "reg-shift", &proplen);
2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302 2303 2304
	if (regshift && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regshift from OF\n");
		return -EINVAL;
	}

	info = kzalloc(sizeof(*info), GFP_KERNEL);

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

	info->si_type		= (enum si_type) match->data;
	info->addr_source	= "device-tree";
	info->io_setup		= mem_setup;
	info->irq_setup		= std_irq_setup;

	info->io.addr_type	= IPMI_MEM_ADDR_SPACE;
	info->io.addr_data	= resource.start;

	info->io.regsize	= regsize ? *regsize : DEFAULT_REGSIZE;
	info->io.regspacing	= regspacing ? *regspacing : DEFAULT_REGSPACING;
	info->io.regshift	= regshift ? *regshift : 0;

	info->irq		= irq_of_parse_and_map(dev->node, 0);
	info->dev		= &dev->dev;

2305
	dev_dbg(&dev->dev, "addr 0x%lx regsize %d spacing %d irq %x\n",
2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326 2327 2328 2329 2330 2331 2332 2333 2334 2335 2336 2337
		info->io.addr_data, info->io.regsize, info->io.regspacing,
		info->irq);

	dev->dev.driver_data = (void*) info;

	return try_smi_init(info);
}

static int __devexit ipmi_of_remove(struct of_device *dev)
{
	cleanup_one_si(dev->dev.driver_data);
	return 0;
}

static struct of_device_id ipmi_match[] =
{
	{ .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 },
	{},
};

static struct of_platform_driver ipmi_of_platform_driver =
{
	.name		= "ipmi",
	.match_table	= ipmi_match,
	.probe		= ipmi_of_probe,
	.remove		= __devexit_p(ipmi_of_remove),
};
#endif /* CONFIG_PPC_OF */


L
Linus Torvalds 已提交
2338 2339
static int try_get_dev_id(struct smi_info *smi_info)
{
2340 2341 2342 2343 2344
	unsigned char         msg[2];
	unsigned char         *resp;
	unsigned long         resp_len;
	enum si_sm_result     smi_result;
	int                   rv = 0;
L
Linus Torvalds 已提交
2345 2346

	resp = kmalloc(IPMI_MAX_MSG_LENGTH, GFP_KERNEL);
2347
	if (!resp)
L
Linus Torvalds 已提交
2348 2349 2350 2351 2352 2353 2354 2355 2356 2357 2358
		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);

	smi_result = smi_info->handlers->event(smi_info->si_sm, 0);
	for (;;)
	{
C
Corey Minyard 已提交
2359 2360
		if (smi_result == SI_SM_CALL_WITH_DELAY ||
		    smi_result == SI_SM_CALL_WITH_TICK_DELAY) {
2361
			schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377 2378 2379 2380 2381 2382 2383
			smi_result = smi_info->handlers->event(
				smi_info->si_sm, 100);
		}
		else if (smi_result == SI_SM_CALL_WITHOUT_DELAY)
		{
			smi_result = smi_info->handlers->event(
				smi_info->si_sm, 0);
		}
		else
			break;
	}
	if (smi_result == SI_SM_HOSED) {
		/* We couldn't get the state machine to run, so whatever's at
		   the port is probably not an IPMI SMI interface. */
		rv = -ENODEV;
		goto out;
	}

	/* Otherwise, we got some data. */
	resp_len = smi_info->handlers->get_result(smi_info->si_sm,
						  resp, IPMI_MAX_MSG_LENGTH);

C
Corey Minyard 已提交
2384 2385
	/* 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 已提交
2386 2387 2388 2389 2390 2391 2392 2393 2394 2395 2396

 out:
	kfree(resp);
	return rv;
}

static int type_file_read_proc(char *page, char **start, off_t off,
			       int count, int *eof, void *data)
{
	struct smi_info *smi = data;

2397
	return sprintf(page, "%s\n", si_to_str[smi->si_type]);
L
Linus Torvalds 已提交
2398 2399 2400 2401 2402 2403 2404 2405 2406
}

static int stat_file_read_proc(char *page, char **start, off_t off,
			       int count, int *eof, void *data)
{
	char            *out = (char *) page;
	struct smi_info *smi = data;

	out += sprintf(out, "interrupts_enabled:    %d\n",
2407
		       smi->irq && !smi->interrupt_disabled);
L
Linus Torvalds 已提交
2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432
	out += sprintf(out, "short_timeouts:        %ld\n",
		       smi->short_timeouts);
	out += sprintf(out, "long_timeouts:         %ld\n",
		       smi->long_timeouts);
	out += sprintf(out, "timeout_restarts:      %ld\n",
		       smi->timeout_restarts);
	out += sprintf(out, "idles:                 %ld\n",
		       smi->idles);
	out += sprintf(out, "interrupts:            %ld\n",
		       smi->interrupts);
	out += sprintf(out, "attentions:            %ld\n",
		       smi->attentions);
	out += sprintf(out, "flag_fetches:          %ld\n",
		       smi->flag_fetches);
	out += sprintf(out, "hosed_count:           %ld\n",
		       smi->hosed_count);
	out += sprintf(out, "complete_transactions: %ld\n",
		       smi->complete_transactions);
	out += sprintf(out, "events:                %ld\n",
		       smi->events);
	out += sprintf(out, "watchdog_pretimeouts:  %ld\n",
		       smi->watchdog_pretimeouts);
	out += sprintf(out, "incoming_messages:     %ld\n",
		       smi->incoming_messages);

2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450
	return out - page;
}

static int param_read_proc(char *page, char **start, off_t off,
			   int count, int *eof, void *data)
{
	struct smi_info *smi = data;

	return sprintf(page,
		       "%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 已提交
2451 2452
}

2453 2454 2455 2456 2457 2458 2459 2460 2461
/*
 * 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 已提交
2462 2463
	smi_info->msg_flags = ((smi_info->msg_flags & ~OEM_DATA_AVAIL) |
			      	RECEIVE_MSG_AVAIL);
2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487
	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 已提交
2488 2489 2490
 * Additionally, PowerEdge systems with IPMI < 1.5 may also assert
 * OEM0_DATA_AVAIL and needs to be treated as RECEIVE_MSG_AVAIL.
 *
2491 2492 2493 2494
 */
#define DELL_POWEREDGE_8G_BMC_DEVICE_ID  0x20
#define DELL_POWEREDGE_8G_BMC_DEVICE_REV 0x80
#define DELL_POWEREDGE_8G_BMC_IPMI_VERSION 0x51
2495
#define DELL_IANA_MFR_ID 0x0002a2
2496 2497 2498
static void setup_dell_poweredge_oem_data_handler(struct smi_info *smi_info)
{
	struct ipmi_device_id *id = &smi_info->device_id;
2499
	if (id->manufacturer_id == DELL_IANA_MFR_ID) {
C
Corey Minyard 已提交
2500 2501
		if (id->device_id       == DELL_POWEREDGE_8G_BMC_DEVICE_ID  &&
		    id->device_revision == DELL_POWEREDGE_8G_BMC_DEVICE_REV &&
2502
		    id->ipmi_version   == DELL_POWEREDGE_8G_BMC_IPMI_VERSION) {
C
Corey Minyard 已提交
2503 2504 2505 2506 2507 2508 2509 2510 2511
			smi_info->oem_data_avail_handler =
				oem_data_avail_to_receive_msg_avail;
		}
		else if (ipmi_version_major(id) < 1 ||
			 (ipmi_version_major(id) == 1 &&
			  ipmi_version_minor(id) < 5)) {
			smi_info->oem_data_avail_handler =
				oem_data_avail_to_receive_msg_avail;
		}
2512 2513 2514
	}
}

2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554 2555 2556 2557 2558 2559 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572 2573
#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;

	/* Make it a reponse */
	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;
2574
	if (id->manufacturer_id == DELL_IANA_MFR_ID &&
2575 2576 2577 2578
	    smi_info->si_type == SI_BT)
		register_xaction_notifier(&dell_poweredge_bt_xaction_notifier);
}

2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591
/*
 * 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);
}

2592 2593 2594 2595 2596
static void setup_xaction_handlers(struct smi_info *smi_info)
{
	setup_dell_poweredge_bt_xaction_handler(smi_info);
}

C
Corey Minyard 已提交
2597 2598
static inline void wait_for_timer_and_thread(struct smi_info *smi_info)
{
2599 2600 2601 2602 2603 2604 2605
	if (smi_info->intf) {
		/* The timer and thread are only running if the
		   interface has been started up and registered. */
		if (smi_info->thread != NULL)
			kthread_stop(smi_info->thread);
		del_timer_sync(&smi_info->si_timer);
	}
C
Corey Minyard 已提交
2606 2607
}

2608
static __devinitdata struct ipmi_default_vals
2609 2610 2611
{
	int type;
	int port;
2612
} ipmi_defaults[] =
2613 2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628 2629 2630 2631 2632
{
	{ .type = SI_KCS, .port = 0xca2 },
	{ .type = SI_SMIC, .port = 0xca9 },
	{ .type = SI_BT, .port = 0xe4 },
	{ .port = 0 }
};

static __devinit void default_find_bmc(void)
{
	struct smi_info *info;
	int             i;

	for (i = 0; ; i++) {
		if (!ipmi_defaults[i].port)
			break;

		info = kzalloc(sizeof(*info), GFP_KERNEL);
		if (!info)
			return;

2633 2634 2635 2636 2637
#ifdef CONFIG_PPC_MERGE
		if (check_legacy_ioport(ipmi_defaults[i].port))
			continue;
#endif

2638 2639 2640 2641 2642 2643 2644 2645 2646 2647 2648 2649 2650 2651 2652 2653 2654 2655 2656 2657 2658 2659 2660 2661 2662
		info->addr_source = NULL;

		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;

		if (try_smi_init(info) == 0) {
			/* Found one... */
			printk(KERN_INFO "ipmi_si: Found default %s 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);
			return;
		}
	}
}

static int is_new_interface(struct smi_info *info)
L
Linus Torvalds 已提交
2663
{
2664
	struct smi_info *e;
L
Linus Torvalds 已提交
2665

2666 2667 2668 2669 2670 2671
	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 已提交
2672

2673 2674
	return 1;
}
L
Linus Torvalds 已提交
2675

2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690
static int try_smi_init(struct smi_info *new_smi)
{
	int rv;

	if (new_smi->addr_source) {
		printk(KERN_INFO "ipmi_si: Trying %s-specified %s state"
		       " machine at %s address 0x%lx, slave address 0x%x,"
		       " irq %d\n",
		       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);
	}

2691
	mutex_lock(&smi_infos_lock);
2692 2693 2694 2695 2696
	if (!is_new_interface(new_smi)) {
		printk(KERN_WARNING "ipmi_si: duplicate interface\n");
		rv = -EBUSY;
		goto out_err;
	}
L
Linus Torvalds 已提交
2697 2698 2699 2700 2701 2702

	/* 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;

2703 2704
	switch (new_smi->si_type) {
	case SI_KCS:
L
Linus Torvalds 已提交
2705
		new_smi->handlers = &kcs_smi_handlers;
2706 2707 2708
		break;

	case SI_SMIC:
L
Linus Torvalds 已提交
2709
		new_smi->handlers = &smic_smi_handlers;
2710 2711 2712
		break;

	case SI_BT:
L
Linus Torvalds 已提交
2713
		new_smi->handlers = &bt_smi_handlers;
2714 2715 2716
		break;

	default:
L
Linus Torvalds 已提交
2717 2718 2719 2720 2721 2722 2723
		/* 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);
2724
	if (!new_smi->si_sm) {
L
Linus Torvalds 已提交
2725 2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744
		printk(" Could not allocate state machine memory\n");
		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) {
		printk(" Could not set up I/O space\n");
		goto out_err;
	}

	spin_lock_init(&(new_smi->si_lock));
	spin_lock_init(&(new_smi->msg_lock));
	spin_lock_init(&(new_smi->count_lock));

	/* Do low-level detection first. */
	if (new_smi->handlers->detect(new_smi->si_sm)) {
2745 2746 2747
		if (new_smi->addr_source)
			printk(KERN_INFO "ipmi_si: Interface detection"
			       " failed\n");
L
Linus Torvalds 已提交
2748 2749 2750 2751 2752
		rv = -ENODEV;
		goto out_err;
	}

	/* Attempt a get device id command.  If it fails, we probably
2753
           don't have a BMC here. */
L
Linus Torvalds 已提交
2754
	rv = try_get_dev_id(new_smi);
2755 2756 2757 2758
	if (rv) {
		if (new_smi->addr_source)
			printk(KERN_INFO "ipmi_si: There appears to be no BMC"
			       " at this location\n");
L
Linus Torvalds 已提交
2759
		goto out_err;
2760
	}
L
Linus Torvalds 已提交
2761

2762
	setup_oem_data_handler(new_smi);
2763
	setup_xaction_handlers(new_smi);
2764

L
Linus Torvalds 已提交
2765 2766 2767 2768 2769 2770 2771
	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;

	new_smi->interrupt_disabled = 0;
C
Corey Minyard 已提交
2772
	atomic_set(&new_smi->stop_operation, 0);
2773 2774
	new_smi->intf_num = smi_num;
	smi_num++;
L
Linus Torvalds 已提交
2775 2776 2777 2778 2779 2780 2781 2782

	/* Start clearing the flags before we enable interrupts or the
	   timer to avoid racing with the timer. */
	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;

2783 2784 2785 2786 2787 2788 2789 2790 2791
	if (!new_smi->dev) {
		/* If we don't already have a device from something
		 * else (like PCI), then register a new one. */
		new_smi->pdev = platform_device_alloc("ipmi_si",
						      new_smi->intf_num);
		if (rv) {
			printk(KERN_ERR
			       "ipmi_si_intf:"
			       " Unable to allocate platform device\n");
2792
			goto out_err;
2793 2794 2795 2796
		}
		new_smi->dev = &new_smi->pdev->dev;
		new_smi->dev->driver = &ipmi_driver;

2797
		rv = platform_device_add(new_smi->pdev);
2798 2799 2800 2801 2802 2803
		if (rv) {
			printk(KERN_ERR
			       "ipmi_si_intf:"
			       " Unable to register system interface device:"
			       " %d\n",
			       rv);
2804
			goto out_err;
2805 2806 2807 2808
		}
		new_smi->dev_registered = 1;
	}

L
Linus Torvalds 已提交
2809 2810
	rv = ipmi_register_smi(&handlers,
			       new_smi,
2811 2812
			       &new_smi->device_id,
			       new_smi->dev,
2813
			       "bmc",
2814
			       new_smi->slave_addr);
L
Linus Torvalds 已提交
2815 2816 2817 2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 2832 2833 2834 2835 2836 2837 2838 2839 2840 2841
	if (rv) {
		printk(KERN_ERR
		       "ipmi_si: Unable to register device: error %d\n",
		       rv);
		goto out_err_stop_timer;
	}

	rv = ipmi_smi_add_proc_entry(new_smi->intf, "type",
				     type_file_read_proc, NULL,
				     new_smi, THIS_MODULE);
	if (rv) {
		printk(KERN_ERR
		       "ipmi_si: Unable to create proc entry: %d\n",
		       rv);
		goto out_err_stop_timer;
	}

	rv = ipmi_smi_add_proc_entry(new_smi->intf, "si_stats",
				     stat_file_read_proc, NULL,
				     new_smi, THIS_MODULE);
	if (rv) {
		printk(KERN_ERR
		       "ipmi_si: Unable to create proc entry: %d\n",
		       rv);
		goto out_err_stop_timer;
	}

2842 2843 2844 2845 2846 2847 2848 2849 2850 2851
	rv = ipmi_smi_add_proc_entry(new_smi->intf, "params",
				     param_read_proc, NULL,
				     new_smi, THIS_MODULE);
	if (rv) {
		printk(KERN_ERR
		       "ipmi_si: Unable to create proc entry: %d\n",
		       rv);
		goto out_err_stop_timer;
	}

2852 2853
	list_add_tail(&new_smi->link, &smi_infos);

2854
	mutex_unlock(&smi_infos_lock);
L
Linus Torvalds 已提交
2855

2856
	printk(KERN_INFO "IPMI %s interface initialized\n",si_to_str[new_smi->si_type]);
L
Linus Torvalds 已提交
2857 2858 2859 2860

	return 0;

 out_err_stop_timer:
C
Corey Minyard 已提交
2861 2862
	atomic_inc(&new_smi->stop_operation);
	wait_for_timer_and_thread(new_smi);
L
Linus Torvalds 已提交
2863 2864 2865 2866 2867

 out_err:
	if (new_smi->intf)
		ipmi_unregister_smi(new_smi->intf);

2868 2869
	if (new_smi->irq_cleanup)
		new_smi->irq_cleanup(new_smi);
L
Linus Torvalds 已提交
2870 2871 2872 2873

	/* Wait until we know that we are out of any interrupt
	   handlers might have been running before we freed the
	   interrupt. */
2874
	synchronize_sched();
L
Linus Torvalds 已提交
2875 2876 2877 2878 2879 2880

	if (new_smi->si_sm) {
		if (new_smi->handlers)
			new_smi->handlers->cleanup(new_smi->si_sm);
		kfree(new_smi->si_sm);
	}
2881 2882
	if (new_smi->addr_source_cleanup)
		new_smi->addr_source_cleanup(new_smi);
P
Paolo Galtieri 已提交
2883 2884
	if (new_smi->io_cleanup)
		new_smi->io_cleanup(new_smi);
L
Linus Torvalds 已提交
2885

2886 2887 2888 2889 2890
	if (new_smi->dev_registered)
		platform_device_unregister(new_smi->pdev);

	kfree(new_smi);

2891
	mutex_unlock(&smi_infos_lock);
2892

L
Linus Torvalds 已提交
2893 2894 2895
	return rv;
}

2896
static __devinit int init_ipmi_si(void)
L
Linus Torvalds 已提交
2897 2898 2899
{
	int  i;
	char *str;
2900
	int  rv;
L
Linus Torvalds 已提交
2901 2902 2903 2904 2905

	if (initialized)
		return 0;
	initialized = 1;

2906 2907 2908 2909 2910 2911 2912 2913 2914 2915
	/* Register the device drivers. */
	rv = driver_register(&ipmi_driver);
	if (rv) {
		printk(KERN_ERR
		       "init_ipmi_si: Unable to register driver: %d\n",
		       rv);
		return rv;
	}


L
Linus Torvalds 已提交
2916 2917 2918
	/* Parse out the si_type string into its components. */
	str = si_type_str;
	if (*str != '\0') {
C
Corey Minyard 已提交
2919
		for (i = 0; (i < SI_MAX_PARMS) && (*str != '\0'); i++) {
L
Linus Torvalds 已提交
2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930
			si_type[i] = str;
			str = strchr(str, ',');
			if (str) {
				*str = '\0';
				str++;
			} else {
				break;
			}
		}
	}

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

2933 2934
	hardcode_find_bmc();

2935
#ifdef CONFIG_DMI
2936
	dmi_find_bmc();
L
Linus Torvalds 已提交
2937 2938
#endif

2939
#ifdef CONFIG_ACPI
C
Corey Minyard 已提交
2940
	acpi_find_bmc();
2941
#endif
L
Linus Torvalds 已提交
2942

2943
#ifdef CONFIG_PCI
C
Corey Minyard 已提交
2944 2945 2946 2947 2948 2949
	rv = pci_register_driver(&ipmi_pci_driver);
	if (rv){
		printk(KERN_ERR
		       "init_ipmi_si: Unable to register PCI driver: %d\n",
		       rv);
	}
2950 2951
#endif

2952 2953 2954 2955
#ifdef CONFIG_PPC_OF
	of_register_platform_driver(&ipmi_of_platform_driver);
#endif

2956
	if (si_trydefaults) {
2957
		mutex_lock(&smi_infos_lock);
2958 2959
		if (list_empty(&smi_infos)) {
			/* No BMC was found, try defaults. */
2960
			mutex_unlock(&smi_infos_lock);
2961 2962
			default_find_bmc();
		} else {
2963
			mutex_unlock(&smi_infos_lock);
2964
		}
L
Linus Torvalds 已提交
2965 2966
	}

2967
	mutex_lock(&smi_infos_lock);
2968
	if (unload_when_empty && list_empty(&smi_infos)) {
2969
		mutex_unlock(&smi_infos_lock);
2970 2971 2972
#ifdef CONFIG_PCI
		pci_unregister_driver(&ipmi_pci_driver);
#endif
2973 2974 2975 2976

#ifdef CONFIG_PPC_OF
		of_unregister_platform_driver(&ipmi_of_platform_driver);
#endif
2977
		driver_unregister(&ipmi_driver);
L
Linus Torvalds 已提交
2978 2979
		printk("ipmi_si: Unable to find any System Interface(s)\n");
		return -ENODEV;
2980
	} else {
2981
		mutex_unlock(&smi_infos_lock);
2982
		return 0;
L
Linus Torvalds 已提交
2983 2984 2985 2986
	}
}
module_init(init_ipmi_si);

2987
static void cleanup_one_si(struct smi_info *to_clean)
L
Linus Torvalds 已提交
2988 2989 2990 2991
{
	int           rv;
	unsigned long flags;

2992
	if (!to_clean)
L
Linus Torvalds 已提交
2993 2994
		return;

2995 2996
	list_del(&to_clean->link);

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

C
Corey Minyard 已提交
3000 3001
	/* Make sure the timer and thread are stopped and will not run
	   again. */
C
Corey Minyard 已提交
3002
	wait_for_timer_and_thread(to_clean);
L
Linus Torvalds 已提交
3003

C
Corey Minyard 已提交
3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023
	/* 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. */
	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 已提交
3024
	while (to_clean->curr_msg || (to_clean->si_state != SI_NORMAL)) {
L
Linus Torvalds 已提交
3025
		poll(to_clean);
3026
		schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037 3038 3039
	}

	rv = ipmi_unregister_smi(to_clean->intf);
	if (rv) {
		printk(KERN_ERR
		       "ipmi_si: Unable to unregister device: errno=%d\n",
		       rv);
	}

	to_clean->handlers->cleanup(to_clean->si_sm);

	kfree(to_clean->si_sm);

3040 3041
	if (to_clean->addr_source_cleanup)
		to_clean->addr_source_cleanup(to_clean);
P
Paolo Galtieri 已提交
3042 3043
	if (to_clean->io_cleanup)
		to_clean->io_cleanup(to_clean);
3044 3045 3046 3047 3048

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

	kfree(to_clean);
L
Linus Torvalds 已提交
3049 3050 3051 3052
}

static __exit void cleanup_ipmi_si(void)
{
3053
	struct smi_info *e, *tmp_e;
L
Linus Torvalds 已提交
3054

3055
	if (!initialized)
L
Linus Torvalds 已提交
3056 3057
		return;

3058 3059 3060 3061
#ifdef CONFIG_PCI
	pci_unregister_driver(&ipmi_pci_driver);
#endif

3062 3063 3064 3065
#ifdef CONFIG_PPC_OF
	of_unregister_platform_driver(&ipmi_of_platform_driver);
#endif

3066
	mutex_lock(&smi_infos_lock);
3067 3068
	list_for_each_entry_safe(e, tmp_e, &smi_infos, link)
		cleanup_one_si(e);
3069
	mutex_unlock(&smi_infos_lock);
3070 3071

	driver_unregister(&ipmi_driver);
L
Linus Torvalds 已提交
3072 3073 3074 3075
}
module_exit(cleanup_ipmi_si);

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