ipmi_si_intf.c 98.3 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
 *
 *  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 <linux/sched.h>
45
#include <linux/seq_file.h>
L
Linus Torvalds 已提交
46 47 48 49 50 51 52 53
#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
#include <asm/irq.h>
#include <linux/interrupt.h>
#include <linux/rcupdate.h>
60
#include <linux/ipmi.h>
L
Linus Torvalds 已提交
61 62 63
#include <linux/ipmi_smi.h>
#include <asm/io.h>
#include "ipmi_si_sm.h"
64
#include <linux/dmi.h>
65 66
#include <linux/string.h>
#include <linux/ctype.h>
67 68
#include <linux/of_device.h>
#include <linux/of_platform.h>
69 70
#include <linux/of_address.h>
#include <linux/of_irq.h>
71

72 73 74 75 76
#ifdef CONFIG_PARISC
#include <asm/hardware.h>	/* for register_parisc_driver() stuff */
#include <asm/parisc-device.h>
#endif

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

/* 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
87
				      short timeout */
L
Linus Torvalds 已提交
88 89 90 91 92 93 94

enum si_intf_state {
	SI_NORMAL,
	SI_GETTING_FLAGS,
	SI_GETTING_EVENTS,
	SI_CLEARING_FLAGS,
	SI_GETTING_MESSAGES,
95 96
	SI_CHECKING_ENABLES,
	SI_SETTING_ENABLES
L
Linus Torvalds 已提交
97 98 99
	/* FIXME - add watchdog stuff. */
};

100 101 102 103 104
/* 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 已提交
105 106 107
enum si_type {
    SI_KCS, SI_SMIC, SI_BT
};
108 109

static const char * const si_to_str[] = { "kcs", "smic", "bt" };
L
Linus Torvalds 已提交
110

111 112
#define DEVICE_NAME "ipmi_si"

113
static struct platform_driver ipmi_driver;
114 115 116 117

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

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

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

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

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

140 141 142 143 144 145 146 147 148 149 150 151 152 153 154
	/* Number of times the driver requested flags from the hardware. */
	SI_STAT_flag_fetches,

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

	/* Number of completed messages. */
	SI_STAT_complete_transactions,

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

	/* Number of watchdog pretimeouts. */
	SI_STAT_watchdog_pretimeouts,

155
	/* Number of asynchronous messages received. */
156 157 158 159 160 161
	SI_STAT_incoming_messages,


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

163
struct smi_info {
C
Corey Minyard 已提交
164
	int                    intf_num;
L
Linus Torvalds 已提交
165 166
	ipmi_smi_t             intf;
	struct si_sm_data      *si_sm;
167
	const struct si_sm_handlers *handlers;
L
Linus Torvalds 已提交
168 169
	enum si_type           si_type;
	spinlock_t             si_lock;
170
	struct ipmi_smi_msg    *waiting_msg;
L
Linus Torvalds 已提交
171 172 173
	struct ipmi_smi_msg    *curr_msg;
	enum si_intf_state     si_state;

174 175 176 177
	/*
	 * Used to handle the various types of I/O that can occur with
	 * IPMI
	 */
L
Linus Torvalds 已提交
178 179 180 181 182 183
	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;
184
	enum ipmi_addr_src addr_source; /* ACPI, PCI, SMBIOS, hardcode, etc. */
185 186
	void (*addr_source_cleanup)(struct smi_info *info);
	void *addr_source_data;
L
Linus Torvalds 已提交
187

188 189 190 191 192
	/*
	 * 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.
	 */
193 194
	int (*oem_data_avail_handler)(struct smi_info *smi_info);

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

211
	/* Does the BMC have an event buffer? */
C
Corey Minyard 已提交
212
	bool		    has_event_buffer;
213

214 215 216 217
	/*
	 * If set to true, this will request events the next time the
	 * state machine is idle.
	 */
L
Linus Torvalds 已提交
218 219
	atomic_t            req_events;

220 221 222 223 224
	/*
	 * If true, run the state machine to completion on every send
	 * call.  Generally used after a panic to make sure stuff goes
	 * out.
	 */
C
Corey Minyard 已提交
225
	bool                run_to_completion;
L
Linus Torvalds 已提交
226 227 228 229

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

230 231 232 233 234
	/*
	 * The space between start addresses of the two ports.  For
	 * instance, if the first port is 0xca2 and the spacing is 4, then
	 * the second port is 0xca6.
	 */
L
Linus Torvalds 已提交
235 236 237 238 239 240 241 242
	unsigned int        spacing;

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

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

243 244 245
	/* This flag is set, if the timer is running (timer_pending() isn't enough) */
	bool		    timer_running;

L
Linus Torvalds 已提交
246 247 248
	/* The time (in jiffies) the last timeout occurred at. */
	unsigned long       last_timeout_jiffies;

249 250 251
	/* Are we waiting for the events, pretimeouts, received msgs? */
	atomic_t            need_watch;

252 253 254 255 256 257
	/*
	 * 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.
	 */
C
Corey Minyard 已提交
258
	bool interrupt_disabled;
L
Linus Torvalds 已提交
259

260 261 262 263 264
	/*
	 * Does the BMC support events?
	 */
	bool supports_event_msg_buff;

265
	/*
266 267 268 269 270 271 272
	 * Can we disable interrupts the global enables receive irq
	 * bit?  There are currently two forms of brokenness, some
	 * systems cannot disable the bit (which is technically within
	 * the spec but a bad idea) and some systems have the bit
	 * forced to zero even though interrupts work (which is
	 * clearly outside the spec).  The next bool tells which form
	 * of brokenness is present.
273
	 */
274 275 276 277 278 279 280
	bool cannot_disable_irq;

	/*
	 * Some systems are broken and cannot set the irq enable
	 * bit, even if they support interrupts.
	 */
	bool irq_enable_broken;
281

282 283 284 285 286
	/*
	 * Did we get an attention that we did not handle?
	 */
	bool got_attn;

287
	/* From the get device id response... */
288
	struct ipmi_device_id device_id;
L
Linus Torvalds 已提交
289

290 291 292 293
	/* Driver model stuff. */
	struct device *dev;
	struct platform_device *pdev;

294 295 296 297
	/*
	 * True if we allocated the device, false if it came from
	 * someplace else (like PCI).
	 */
C
Corey Minyard 已提交
298
	bool dev_registered;
299

L
Linus Torvalds 已提交
300 301 302 303
	/* Slave address, could be reported from DMI. */
	unsigned char slave_addr;

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

306
	struct task_struct *thread;
307 308

	struct list_head link;
309
	union ipmi_smi_info_union addr_info;
L
Linus Torvalds 已提交
310 311
};

312 313 314 315 316
#define smi_inc_stat(smi, stat) \
	atomic_inc(&(smi)->stats[SI_STAT_ ## stat])
#define smi_get_stat(smi, stat) \
	((unsigned int) atomic_read(&(smi)->stats[SI_STAT_ ## stat]))

317 318 319 320
#define SI_MAX_PARMS 4

static int force_kipmid[SI_MAX_PARMS];
static int num_force_kipmid;
321
#ifdef CONFIG_PCI
C
Corey Minyard 已提交
322
static bool pci_registered;
323
#endif
324
#ifdef CONFIG_PARISC
C
Corey Minyard 已提交
325
static bool parisc_registered;
326
#endif
327

328 329 330
static unsigned int kipmid_max_busy_us[SI_MAX_PARMS];
static int num_max_busy_us;

C
Corey Minyard 已提交
331
static bool unload_when_empty = true;
332

333
static int add_smi(struct smi_info *smi);
334
static int try_smi_init(struct smi_info *smi);
335
static void cleanup_one_si(struct smi_info *to_clean);
336
static void cleanup_ipmi_si(void);
337

338 339 340
#ifdef DEBUG_TIMING
void debug_timestamp(char *msg)
{
341
	struct timespec64 t;
342

343 344
	getnstimeofday64(&t);
	pr_debug("**%s: %lld.%9.9ld\n", msg, (long long) t.tv_sec, t.tv_nsec);
345 346 347 348 349
}
#else
#define debug_timestamp(x)
#endif

350
static ATOMIC_NOTIFIER_HEAD(xaction_notifier_list);
351
static int register_xaction_notifier(struct notifier_block *nb)
352
{
353
	return atomic_notifier_chain_register(&xaction_notifier_list, nb);
354 355
}

L
Linus Torvalds 已提交
356 357 358
static void deliver_recv_msg(struct smi_info *smi_info,
			     struct ipmi_smi_msg *msg)
{
359
	/* Deliver the message to the upper layer. */
C
Corey Minyard 已提交
360 361 362 363
	if (smi_info->intf)
		ipmi_smi_msg_received(smi_info->intf, msg);
	else
		ipmi_free_smi_msg(msg);
L
Linus Torvalds 已提交
364 365
}

C
Corey Minyard 已提交
366
static void return_hosed_msg(struct smi_info *smi_info, int cCode)
L
Linus Torvalds 已提交
367 368 369
{
	struct ipmi_smi_msg *msg = smi_info->curr_msg;

C
Corey Minyard 已提交
370 371 372 373
	if (cCode < 0 || cCode > IPMI_ERR_UNSPECIFIED)
		cCode = IPMI_ERR_UNSPECIFIED;
	/* else use it as is */

L
Lucas De Marchi 已提交
374
	/* Make it a response */
L
Linus Torvalds 已提交
375 376
	msg->rsp[0] = msg->data[0] | 4;
	msg->rsp[1] = msg->data[1];
C
Corey Minyard 已提交
377
	msg->rsp[2] = cCode;
L
Linus Torvalds 已提交
378 379 380 381 382 383 384 385 386 387
	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;

388
	if (!smi_info->waiting_msg) {
L
Linus Torvalds 已提交
389 390 391 392 393
		smi_info->curr_msg = NULL;
		rv = SI_SM_IDLE;
	} else {
		int err;

394 395
		smi_info->curr_msg = smi_info->waiting_msg;
		smi_info->waiting_msg = NULL;
396
		debug_timestamp("Start2");
397 398
		err = atomic_notifier_call_chain(&xaction_notifier_list,
				0, smi_info);
399 400 401 402
		if (err & NOTIFY_STOP_MASK) {
			rv = SI_SM_CALL_WITHOUT_DELAY;
			goto out;
		}
L
Linus Torvalds 已提交
403 404 405 406
		err = smi_info->handlers->start_transaction(
			smi_info->si_sm,
			smi_info->curr_msg->data,
			smi_info->curr_msg->data_size);
407
		if (err)
C
Corey Minyard 已提交
408
			return_hosed_msg(smi_info, err);
L
Linus Torvalds 已提交
409 410 411

		rv = SI_SM_CALL_WITHOUT_DELAY;
	}
412
 out:
L
Linus Torvalds 已提交
413 414 415
	return rv;
}

416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437
static void smi_mod_timer(struct smi_info *smi_info, unsigned long new_val)
{
	smi_info->last_timeout_jiffies = jiffies;
	mod_timer(&smi_info->si_timer, new_val);
	smi_info->timer_running = true;
}

/*
 * Start a new message and (re)start the timer and thread.
 */
static void start_new_msg(struct smi_info *smi_info, unsigned char *msg,
			  unsigned int size)
{
	smi_mod_timer(smi_info, jiffies + SI_TIMEOUT_JIFFIES);

	if (smi_info->thread)
		wake_up_process(smi_info->thread);

	smi_info->handlers->start_transaction(smi_info->si_sm, msg, size);
}

static void start_check_enables(struct smi_info *smi_info, bool start_timer)
C
Corey Minyard 已提交
438 439 440 441 442 443
{
	unsigned char msg[2];

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

444 445 446 447
	if (start_timer)
		start_new_msg(smi_info, msg, 2);
	else
		smi_info->handlers->start_transaction(smi_info->si_sm, msg, 2);
448
	smi_info->si_state = SI_CHECKING_ENABLES;
C
Corey Minyard 已提交
449 450
}

451
static void start_clear_flags(struct smi_info *smi_info, bool start_timer)
L
Linus Torvalds 已提交
452 453 454 455 456 457 458 459
{
	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;

460 461 462 463
	if (start_timer)
		start_new_msg(smi_info, msg, 3);
	else
		smi_info->handlers->start_transaction(smi_info->si_sm, msg, 3);
L
Linus Torvalds 已提交
464 465 466
	smi_info->si_state = SI_CLEARING_FLAGS;
}

C
Corey Minyard 已提交
467 468 469 470 471 472
static void start_getting_msg_queue(struct smi_info *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;

473 474
	start_new_msg(smi_info, smi_info->curr_msg->data,
		      smi_info->curr_msg->data_size);
C
Corey Minyard 已提交
475 476 477 478 479 480 481 482 483
	smi_info->si_state = SI_GETTING_MESSAGES;
}

static void start_getting_events(struct smi_info *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;

484 485
	start_new_msg(smi_info, smi_info->curr_msg->data,
		      smi_info->curr_msg->data_size);
C
Corey Minyard 已提交
486 487 488
	smi_info->si_state = SI_GETTING_EVENTS;
}

489 490 491 492 493
/*
 * 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.
494 495 496
 *
 * Note that we cannot just use disable_irq(), since the interrupt may
 * be shared.
497
 */
498
static inline bool disable_si_irq(struct smi_info *smi_info, bool start_timer)
L
Linus Torvalds 已提交
499
{
500
	if ((smi_info->irq) && (!smi_info->interrupt_disabled)) {
C
Corey Minyard 已提交
501
		smi_info->interrupt_disabled = true;
502
		start_check_enables(smi_info, start_timer);
C
Corey Minyard 已提交
503
		return true;
L
Linus Torvalds 已提交
504
	}
C
Corey Minyard 已提交
505
	return false;
L
Linus Torvalds 已提交
506 507
}

C
Corey Minyard 已提交
508
static inline bool enable_si_irq(struct smi_info *smi_info)
L
Linus Torvalds 已提交
509 510
{
	if ((smi_info->irq) && (smi_info->interrupt_disabled)) {
C
Corey Minyard 已提交
511
		smi_info->interrupt_disabled = false;
512
		start_check_enables(smi_info, true);
C
Corey Minyard 已提交
513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529
		return true;
	}
	return false;
}

/*
 * Allocate a message.  If unable to allocate, start the interrupt
 * disable process and return NULL.  If able to allocate but
 * interrupts are disabled, free the message and return NULL after
 * starting the interrupt enable process.
 */
static struct ipmi_smi_msg *alloc_msg_handle_irq(struct smi_info *smi_info)
{
	struct ipmi_smi_msg *msg;

	msg = ipmi_alloc_smi_msg();
	if (!msg) {
530
		if (!disable_si_irq(smi_info, true))
C
Corey Minyard 已提交
531 532 533 534
			smi_info->si_state = SI_NORMAL;
	} else if (enable_si_irq(smi_info)) {
		ipmi_free_smi_msg(msg);
		msg = NULL;
L
Linus Torvalds 已提交
535
	}
C
Corey Minyard 已提交
536
	return msg;
L
Linus Torvalds 已提交
537 538 539 540
}

static void handle_flags(struct smi_info *smi_info)
{
541
 retry:
L
Linus Torvalds 已提交
542 543
	if (smi_info->msg_flags & WDT_PRE_TIMEOUT_INT) {
		/* Watchdog pre-timeout */
544
		smi_inc_stat(smi_info, watchdog_pretimeouts);
L
Linus Torvalds 已提交
545

546
		start_clear_flags(smi_info, true);
L
Linus Torvalds 已提交
547
		smi_info->msg_flags &= ~WDT_PRE_TIMEOUT_INT;
C
Corey Minyard 已提交
548 549
		if (smi_info->intf)
			ipmi_smi_watchdog_pretimeout(smi_info->intf);
L
Linus Torvalds 已提交
550 551
	} else if (smi_info->msg_flags & RECEIVE_MSG_AVAIL) {
		/* Messages available. */
C
Corey Minyard 已提交
552 553
		smi_info->curr_msg = alloc_msg_handle_irq(smi_info);
		if (!smi_info->curr_msg)
L
Linus Torvalds 已提交
554 555
			return;

C
Corey Minyard 已提交
556
		start_getting_msg_queue(smi_info);
L
Linus Torvalds 已提交
557 558
	} else if (smi_info->msg_flags & EVENT_MSG_BUFFER_FULL) {
		/* Events available. */
C
Corey Minyard 已提交
559 560
		smi_info->curr_msg = alloc_msg_handle_irq(smi_info);
		if (!smi_info->curr_msg)
L
Linus Torvalds 已提交
561 562
			return;

C
Corey Minyard 已提交
563
		start_getting_events(smi_info);
564
	} else if (smi_info->msg_flags & OEM_DATA_AVAIL &&
565
		   smi_info->oem_data_avail_handler) {
566 567
		if (smi_info->oem_data_avail_handler(smi_info))
			goto retry;
568
	} else
L
Linus Torvalds 已提交
569 570 571
		smi_info->si_state = SI_NORMAL;
}

572 573 574 575 576 577
/*
 * Global enables we care about.
 */
#define GLOBAL_ENABLES_MASK (IPMI_BMC_EVT_MSG_BUFF | IPMI_BMC_RCV_MSG_INTR | \
			     IPMI_BMC_EVT_MSG_INTR)

578 579
static u8 current_global_enables(struct smi_info *smi_info, u8 base,
				 bool *irq_on)
580 581 582 583 584 585
{
	u8 enables = 0;

	if (smi_info->supports_event_msg_buff)
		enables |= IPMI_BMC_EVT_MSG_BUFF;

586 587 588
	if (((smi_info->irq && !smi_info->interrupt_disabled) ||
	     smi_info->cannot_disable_irq) &&
	    !smi_info->irq_enable_broken)
589 590 591
		enables |= IPMI_BMC_RCV_MSG_INTR;

	if (smi_info->supports_event_msg_buff &&
592 593
	    smi_info->irq && !smi_info->interrupt_disabled &&
	    !smi_info->irq_enable_broken)
594 595
		enables |= IPMI_BMC_EVT_MSG_INTR;

596 597
	*irq_on = enables & (IPMI_BMC_EVT_MSG_INTR | IPMI_BMC_RCV_MSG_INTR);

598 599 600
	return enables;
}

601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616
static void check_bt_irq(struct smi_info *smi_info, bool irq_on)
{
	u8 irqstate = smi_info->io.inputb(&smi_info->io, IPMI_BT_INTMASK_REG);

	irqstate &= IPMI_BT_INTMASK_ENABLE_IRQ_BIT;

	if ((bool)irqstate == irq_on)
		return;

	if (irq_on)
		smi_info->io.outputb(&smi_info->io, IPMI_BT_INTMASK_REG,
				     IPMI_BT_INTMASK_ENABLE_IRQ_BIT);
	else
		smi_info->io.outputb(&smi_info->io, IPMI_BT_INTMASK_REG, 0);
}

L
Linus Torvalds 已提交
617 618 619 620
static void handle_transaction_done(struct smi_info *smi_info)
{
	struct ipmi_smi_msg *msg;

621
	debug_timestamp("Done");
L
Linus Torvalds 已提交
622 623
	switch (smi_info->si_state) {
	case SI_NORMAL:
624
		if (!smi_info->curr_msg)
L
Linus Torvalds 已提交
625 626 627 628 629 630 631 632
			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);

633 634 635 636 637
		/*
		 * Do this here becase deliver_recv_msg() releases the
		 * lock, and a new message can be put in during the
		 * time the lock is released.
		 */
L
Linus Torvalds 已提交
638 639 640 641 642 643 644 645 646 647 648 649 650
		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) {
651
			/* Error fetching flags, just give up for now. */
L
Linus Torvalds 已提交
652 653
			smi_info->si_state = SI_NORMAL;
		} else if (len < 4) {
654 655 656 657
			/*
			 * Hmm, no flags.  That's technically illegal, but
			 * don't use uninitialized data.
			 */
L
Linus Torvalds 已提交
658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673
			smi_info->si_state = SI_NORMAL;
		} else {
			smi_info->msg_flags = msg[3];
			handle_flags(smi_info);
		}
		break;
	}

	case SI_CLEARING_FLAGS:
	{
		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 */
674 675
			dev_warn(smi_info->dev,
				 "Error clearing flags: %2.2x\n", msg[2]);
L
Linus Torvalds 已提交
676
		}
677
		smi_info->si_state = SI_NORMAL;
L
Linus Torvalds 已提交
678 679 680 681 682 683 684 685 686 687 688
		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);

689 690 691 692 693
		/*
		 * Do this here becase deliver_recv_msg() releases the
		 * lock, and a new message can be put in during the
		 * time the lock is released.
		 */
L
Linus Torvalds 已提交
694 695 696 697 698 699 700 701 702 703
		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 {
704
			smi_inc_stat(smi_info, events);
L
Linus Torvalds 已提交
705

706 707 708 709 710 711
			/*
			 * Do this before we deliver the message
			 * because delivering the message releases the
			 * lock and something else can mess with the
			 * state.
			 */
L
Linus Torvalds 已提交
712 713 714 715 716 717 718 719 720 721 722 723 724 725 726
			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);

727 728 729 730 731
		/*
		 * Do this here becase deliver_recv_msg() releases the
		 * lock, and a new message can be put in during the
		 * time the lock is released.
		 */
L
Linus Torvalds 已提交
732 733 734 735 736 737 738 739 740 741
		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 {
742
			smi_inc_stat(smi_info, incoming_messages);
L
Linus Torvalds 已提交
743

744 745 746 747 748 749
			/*
			 * Do this before we deliver the message
			 * because delivering the message releases the
			 * lock and something else can mess with the
			 * state.
			 */
L
Linus Torvalds 已提交
750 751 752 753 754 755 756
			handle_flags(smi_info);

			deliver_recv_msg(smi_info, msg);
		}
		break;
	}

757
	case SI_CHECKING_ENABLES:
L
Linus Torvalds 已提交
758 759
	{
		unsigned char msg[4];
760
		u8 enables;
761
		bool irq_on;
L
Linus Torvalds 已提交
762 763 764 765

		/* 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) {
766 767 768 769
			dev_warn(smi_info->dev,
				 "Couldn't get irq info: %x.\n", msg[2]);
			dev_warn(smi_info->dev,
				 "Maybe ok, but ipmi might run very slowly.\n");
L
Linus Torvalds 已提交
770
			smi_info->si_state = SI_NORMAL;
771 772
			break;
		}
773 774 775 776
		enables = current_global_enables(smi_info, 0, &irq_on);
		if (smi_info->si_type == SI_BT)
			/* BT has its own interrupt enable bit. */
			check_bt_irq(smi_info, irq_on);
777 778
		if (enables != (msg[3] & GLOBAL_ENABLES_MASK)) {
			/* Enables are not correct, fix them. */
L
Linus Torvalds 已提交
779 780
			msg[0] = (IPMI_NETFN_APP_REQUEST << 2);
			msg[1] = IPMI_SET_BMC_GLOBAL_ENABLES_CMD;
781
			msg[2] = enables | (msg[3] & ~GLOBAL_ENABLES_MASK);
L
Linus Torvalds 已提交
782 783
			smi_info->handlers->start_transaction(
				smi_info->si_sm, msg, 3);
784 785 786 787 788 789 790 791 792 793
			smi_info->si_state = SI_SETTING_ENABLES;
		} else if (smi_info->supports_event_msg_buff) {
			smi_info->curr_msg = ipmi_alloc_smi_msg();
			if (!smi_info->curr_msg) {
				smi_info->si_state = SI_NORMAL;
				break;
			}
			start_getting_msg_queue(smi_info);
		} else {
			smi_info->si_state = SI_NORMAL;
L
Linus Torvalds 已提交
794 795 796 797
		}
		break;
	}

798
	case SI_SETTING_ENABLES:
L
Linus Torvalds 已提交
799 800 801 802
	{
		unsigned char msg[4];

		smi_info->handlers->get_result(smi_info->si_sm, msg, 4);
803
		if (msg[2] != 0)
804
			dev_warn(smi_info->dev,
805 806 807 808 809 810 811 812 813 814
				 "Could not set the global enables: 0x%x.\n",
				 msg[2]);

		if (smi_info->supports_event_msg_buff) {
			smi_info->curr_msg = ipmi_alloc_smi_msg();
			if (!smi_info->curr_msg) {
				smi_info->si_state = SI_NORMAL;
				break;
			}
			start_getting_msg_queue(smi_info);
C
Corey Minyard 已提交
815
		} else {
816
			smi_info->si_state = SI_NORMAL;
C
Corey Minyard 已提交
817 818 819
		}
		break;
	}
L
Linus Torvalds 已提交
820 821 822
	}
}

823 824 825 826 827
/*
 * Called on timeouts and events.  Timeouts should pass the elapsed
 * time, interrupts should pass in zero.  Must be called with
 * si_lock held and interrupts disabled.
 */
L
Linus Torvalds 已提交
828 829 830 831 832 833
static enum si_sm_result smi_event_handler(struct smi_info *smi_info,
					   int time)
{
	enum si_sm_result si_sm_result;

 restart:
834 835 836 837 838 839 840 841
	/*
	 * There used to be a loop here that waited a little while
	 * (around 25us) before giving up.  That turned out to be
	 * pointless, the minimum delays I was seeing were in the 300us
	 * range, which is far too long to wait in an interrupt.  So
	 * we just run until the state machine tells us something
	 * happened or it needs a delay.
	 */
L
Linus Torvalds 已提交
842 843 844 845 846
	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);

847
	if (si_sm_result == SI_SM_TRANSACTION_COMPLETE) {
848
		smi_inc_stat(smi_info, complete_transactions);
L
Linus Torvalds 已提交
849 850 851

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

855 856 857 858
		/*
		 * Do the before return_hosed_msg, because that
		 * releases the lock.
		 */
L
Linus Torvalds 已提交
859 860
		smi_info->si_state = SI_NORMAL;
		if (smi_info->curr_msg != NULL) {
861 862 863 864 865
			/*
			 * 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 已提交
866
			return_hosed_msg(smi_info, IPMI_ERR_UNSPECIFIED);
L
Linus Torvalds 已提交
867 868 869 870
		}
		si_sm_result = smi_info->handlers->event(smi_info->si_sm, 0);
	}

871 872 873 874
	/*
	 * We prefer handling attn over new messages.  But don't do
	 * this if there is not yet an upper layer to handle anything.
	 */
875 876
	if (likely(smi_info->intf) &&
	    (si_sm_result == SI_SM_ATTN || smi_info->got_attn)) {
L
Linus Torvalds 已提交
877 878
		unsigned char msg[2];

879 880 881 882 883 884 885 886 887
		if (smi_info->si_state != SI_NORMAL) {
			/*
			 * We got an ATTN, but we are doing something else.
			 * Handle the ATTN later.
			 */
			smi_info->got_attn = true;
		} else {
			smi_info->got_attn = false;
			smi_inc_stat(smi_info, attentions);
L
Linus Torvalds 已提交
888

889 890 891 892 893 894 895 896 897
			/*
			 * 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;
L
Linus Torvalds 已提交
898

899
			start_new_msg(smi_info, msg, 2);
900 901 902
			smi_info->si_state = SI_GETTING_FLAGS;
			goto restart;
		}
L
Linus Torvalds 已提交
903 904 905 906
	}

	/* If we are currently idle, try to start the next message. */
	if (si_sm_result == SI_SM_IDLE) {
907
		smi_inc_stat(smi_info, idles);
L
Linus Torvalds 已提交
908 909 910 911

		si_sm_result = start_next_msg(smi_info);
		if (si_sm_result != SI_SM_IDLE)
			goto restart;
912
	}
L
Linus Torvalds 已提交
913 914

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

922 923 924 925 926 927 928
		/*
		 * Take this opportunity to check the interrupt and
		 * message enable state for the BMC.  The BMC can be
		 * asynchronously reset, and may thus get interrupts
		 * disable and messages disabled.
		 */
		if (smi_info->supports_event_msg_buff || smi_info->irq) {
929
			start_check_enables(smi_info, true);
930 931 932 933
		} else {
			smi_info->curr_msg = alloc_msg_handle_irq(smi_info);
			if (!smi_info->curr_msg)
				goto out;
L
Linus Torvalds 已提交
934

935 936
			start_getting_events(smi_info);
		}
L
Linus Torvalds 已提交
937 938
		goto restart;
	}
939 940 941 942 943 944 945

	if (si_sm_result == SI_SM_IDLE && smi_info->timer_running) {
		/* Ok it if fails, the timer will just go off. */
		if (del_timer(&smi_info->si_timer))
			smi_info->timer_running = false;
	}

C
Corey Minyard 已提交
946
 out:
L
Linus Torvalds 已提交
947 948 949
	return si_sm_result;
}

950 951 952 953 954 955 956 957 958 959 960 961 962
static void check_start_timer_thread(struct smi_info *smi_info)
{
	if (smi_info->si_state == SI_NORMAL && smi_info->curr_msg == NULL) {
		smi_mod_timer(smi_info, jiffies + SI_TIMEOUT_JIFFIES);

		if (smi_info->thread)
			wake_up_process(smi_info->thread);

		start_next_msg(smi_info);
		smi_event_handler(smi_info, 0);
	}
}

963
static void flush_messages(void *send_info)
964
{
965
	struct smi_info *smi_info = send_info;
966 967 968 969 970 971 972 973 974 975 976 977 978
	enum si_sm_result result;

	/*
	 * Currently, this function is called only in run-to-completion
	 * mode.  This means we are single-threaded, no need for locks.
	 */
	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);
	}
}

L
Linus Torvalds 已提交
979
static void sender(void                *send_info,
980
		   struct ipmi_smi_msg *msg)
L
Linus Torvalds 已提交
981 982 983 984
{
	struct smi_info   *smi_info = send_info;
	unsigned long     flags;

985
	debug_timestamp("Enqueue");
L
Linus Torvalds 已提交
986 987

	if (smi_info->run_to_completion) {
C
Corey Minyard 已提交
988
		/*
989 990
		 * If we are running to completion, start it.  Upper
		 * layer will call flush_messages to clear it out.
C
Corey Minyard 已提交
991
		 */
992
		smi_info->waiting_msg = msg;
L
Linus Torvalds 已提交
993 994 995
		return;
	}

C
Corey Minyard 已提交
996
	spin_lock_irqsave(&smi_info->si_lock, flags);
997 998 999 1000 1001 1002 1003 1004 1005
	/*
	 * The following two lines don't need to be under the lock for
	 * the lock's sake, but they do need SMP memory barriers to
	 * avoid getting things out of order.  We are already claiming
	 * the lock, anyway, so just do it under the lock to avoid the
	 * ordering problem.
	 */
	BUG_ON(smi_info->waiting_msg);
	smi_info->waiting_msg = msg;
1006
	check_start_timer_thread(smi_info);
C
Corey Minyard 已提交
1007
	spin_unlock_irqrestore(&smi_info->si_lock, flags);
L
Linus Torvalds 已提交
1008 1009
}

C
Corey Minyard 已提交
1010
static void set_run_to_completion(void *send_info, bool i_run_to_completion)
L
Linus Torvalds 已提交
1011 1012 1013 1014
{
	struct smi_info   *smi_info = send_info;

	smi_info->run_to_completion = i_run_to_completion;
1015 1016
	if (i_run_to_completion)
		flush_messages(smi_info);
L
Linus Torvalds 已提交
1017 1018
}

1019 1020 1021 1022 1023
/*
 * Use -1 in the nsec value of the busy waiting timespec to tell that
 * we are spinning in kipmid looking for something and not delaying
 * between checks
 */
1024
static inline void ipmi_si_set_not_busy(struct timespec64 *ts)
1025 1026 1027
{
	ts->tv_nsec = -1;
}
1028
static inline int ipmi_si_is_busy(struct timespec64 *ts)
1029 1030 1031 1032
{
	return ts->tv_nsec != -1;
}

1033 1034
static inline int ipmi_thread_busy_wait(enum si_sm_result smi_result,
					const struct smi_info *smi_info,
1035
					struct timespec64 *busy_until)
1036 1037 1038 1039 1040 1041 1042 1043
{
	unsigned int max_busy_us = 0;

	if (smi_info->intf_num < num_max_busy_us)
		max_busy_us = kipmid_max_busy_us[smi_info->intf_num];
	if (max_busy_us == 0 || smi_result != SI_SM_CALL_WITH_DELAY)
		ipmi_si_set_not_busy(busy_until);
	else if (!ipmi_si_is_busy(busy_until)) {
1044 1045
		getnstimeofday64(busy_until);
		timespec64_add_ns(busy_until, max_busy_us*NSEC_PER_USEC);
1046
	} else {
1047 1048 1049 1050
		struct timespec64 now;

		getnstimeofday64(&now);
		if (unlikely(timespec64_compare(&now, busy_until) > 0)) {
1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067
			ipmi_si_set_not_busy(busy_until);
			return 0;
		}
	}
	return 1;
}


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

1075
	ipmi_si_set_not_busy(&busy_until);
1076
	set_user_nice(current, MAX_NICE);
M
Matt Domsch 已提交
1077
	while (!kthread_should_stop()) {
1078 1079
		int busy_wait;

C
Corey Minyard 已提交
1080
		spin_lock_irqsave(&(smi_info->si_lock), flags);
1081
		smi_result = smi_event_handler(smi_info, 0);
1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092

		/*
		 * If the driver is doing something, there is a possible
		 * race with the timer.  If the timer handler see idle,
		 * and the thread here sees something else, the timer
		 * handler won't restart the timer even though it is
		 * required.  So start it here if necessary.
		 */
		if (smi_result != SI_SM_IDLE && !smi_info->timer_running)
			smi_mod_timer(smi_info, jiffies + SI_TIMEOUT_JIFFIES);

C
Corey Minyard 已提交
1093
		spin_unlock_irqrestore(&(smi_info->si_lock), flags);
1094 1095
		busy_wait = ipmi_thread_busy_wait(smi_result, smi_info,
						  &busy_until);
1096 1097
		if (smi_result == SI_SM_CALL_WITHOUT_DELAY)
			; /* do nothing */
1098
		else if (smi_result == SI_SM_CALL_WITH_DELAY && busy_wait)
1099
			schedule();
1100 1101 1102 1103 1104 1105 1106 1107 1108
		else if (smi_result == SI_SM_IDLE) {
			if (atomic_read(&smi_info->need_watch)) {
				schedule_timeout_interruptible(100);
			} else {
				/* Wait to be woken up when we are needed. */
				__set_current_state(TASK_INTERRUPTIBLE);
				schedule();
			}
		} else
1109
			schedule_timeout_interruptible(1);
C
Corey Minyard 已提交
1110 1111 1112 1113 1114
	}
	return 0;
}


L
Linus Torvalds 已提交
1115 1116 1117
static void poll(void *send_info)
{
	struct smi_info *smi_info = send_info;
C
Corey Minyard 已提交
1118
	unsigned long flags = 0;
C
Corey Minyard 已提交
1119
	bool run_to_completion = smi_info->run_to_completion;
L
Linus Torvalds 已提交
1120

C
Corey Minyard 已提交
1121 1122 1123 1124 1125
	/*
	 * Make sure there is some delay in the poll loop so we can
	 * drive time forward and timeout things.
	 */
	udelay(10);
C
Corey Minyard 已提交
1126 1127
	if (!run_to_completion)
		spin_lock_irqsave(&smi_info->si_lock, flags);
C
Corey Minyard 已提交
1128
	smi_event_handler(smi_info, 10);
C
Corey Minyard 已提交
1129 1130
	if (!run_to_completion)
		spin_unlock_irqrestore(&smi_info->si_lock, flags);
L
Linus Torvalds 已提交
1131 1132 1133 1134 1135 1136
}

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

1137
	if (!smi_info->has_event_buffer)
1138 1139
		return;

L
Linus Torvalds 已提交
1140 1141 1142
	atomic_set(&smi_info->req_events, 1);
}

C
Corey Minyard 已提交
1143
static void set_need_watch(void *send_info, bool enable)
1144 1145 1146 1147 1148 1149 1150 1151 1152 1153
{
	struct smi_info *smi_info = send_info;
	unsigned long flags;

	atomic_set(&smi_info->need_watch, enable);
	spin_lock_irqsave(&smi_info->si_lock, flags);
	check_start_timer_thread(smi_info);
	spin_unlock_irqrestore(&smi_info->si_lock, flags);
}

R
Randy Dunlap 已提交
1154
static int initialized;
L
Linus Torvalds 已提交
1155 1156 1157 1158 1159 1160 1161

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 已提交
1162
	long              time_diff;
M
Matthew Garrett 已提交
1163
	long		  timeout;
L
Linus Torvalds 已提交
1164 1165

	spin_lock_irqsave(&(smi_info->si_lock), flags);
1166 1167
	debug_timestamp("Timer");

L
Linus Torvalds 已提交
1168
	jiffies_now = jiffies;
C
Corey Minyard 已提交
1169
	time_diff = (((long)jiffies_now - (long)smi_info->last_timeout_jiffies)
L
Linus Torvalds 已提交
1170 1171 1172
		     * SI_USEC_PER_JIFFY);
	smi_result = smi_event_handler(smi_info, time_diff);

1173
	if ((smi_info->irq) && (!smi_info->interrupt_disabled)) {
L
Linus Torvalds 已提交
1174
		/* Running with interrupts, only do long timeouts. */
M
Matthew Garrett 已提交
1175
		timeout = jiffies + SI_TIMEOUT_JIFFIES;
1176
		smi_inc_stat(smi_info, long_timeouts);
M
Matthew Garrett 已提交
1177
		goto do_mod_timer;
L
Linus Torvalds 已提交
1178 1179
	}

1180 1181 1182 1183
	/*
	 * If the state machine asks for a short delay, then shorten
	 * the timer timeout.
	 */
L
Linus Torvalds 已提交
1184
	if (smi_result == SI_SM_CALL_WITH_DELAY) {
1185
		smi_inc_stat(smi_info, short_timeouts);
M
Matthew Garrett 已提交
1186
		timeout = jiffies + 1;
L
Linus Torvalds 已提交
1187
	} else {
1188
		smi_inc_stat(smi_info, long_timeouts);
M
Matthew Garrett 已提交
1189
		timeout = jiffies + SI_TIMEOUT_JIFFIES;
L
Linus Torvalds 已提交
1190 1191
	}

M
Matthew Garrett 已提交
1192 1193
 do_mod_timer:
	if (smi_result != SI_SM_IDLE)
1194 1195 1196 1197
		smi_mod_timer(smi_info, timeout);
	else
		smi_info->timer_running = false;
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);
L
Linus Torvalds 已提交
1198 1199
}

1200
static irqreturn_t si_irq_handler(int irq, void *data)
L
Linus Torvalds 已提交
1201 1202 1203 1204 1205 1206
{
	struct smi_info *smi_info = data;
	unsigned long   flags;

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

1207
	smi_inc_stat(smi_info, interrupts);
L
Linus Torvalds 已提交
1208

1209 1210
	debug_timestamp("Interrupt");

L
Linus Torvalds 已提交
1211 1212 1213 1214 1215
	smi_event_handler(smi_info, 0);
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);
	return IRQ_HANDLED;
}

1216
static irqreturn_t si_bt_irq_handler(int irq, void *data)
1217 1218 1219 1220 1221 1222
{
	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);
1223
	return si_irq_handler(irq, data);
1224 1225
}

1226 1227 1228 1229
static int smi_start_processing(void       *send_info,
				ipmi_smi_t intf)
{
	struct smi_info *new_smi = send_info;
1230
	int             enable = 0;
1231 1232 1233 1234 1235

	new_smi->intf = intf;

	/* Set up the timer that drives the interface. */
	setup_timer(&new_smi->si_timer, smi_timeout, (long)new_smi);
1236
	smi_mod_timer(new_smi, jiffies + SI_TIMEOUT_JIFFIES);
1237

1238 1239 1240 1241
	/* Try to claim any interrupts. */
	if (new_smi->irq_setup)
		new_smi->irq_setup(new_smi);

1242 1243 1244 1245 1246
	/*
	 * Check if the user forcefully enabled the daemon.
	 */
	if (new_smi->intf_num < num_force_kipmid)
		enable = force_kipmid[new_smi->intf_num];
1247 1248 1249 1250
	/*
	 * The BT interface is efficient enough to not need a thread,
	 * and there is no need for a thread if we have interrupts.
	 */
1251
	else if ((new_smi->si_type != SI_BT) && (!new_smi->irq))
1252 1253 1254
		enable = 1;

	if (enable) {
1255 1256 1257
		new_smi->thread = kthread_run(ipmi_thread, new_smi,
					      "kipmi%d", new_smi->intf_num);
		if (IS_ERR(new_smi->thread)) {
1258 1259 1260 1261
			dev_notice(new_smi->dev, "Could not start"
				   " kernel thread due to error %ld, only using"
				   " timers to drive the interface\n",
				   PTR_ERR(new_smi->thread));
1262 1263 1264 1265 1266 1267
			new_smi->thread = NULL;
		}
	}

	return 0;
}
1268

1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280
static int get_smi_info(void *send_info, struct ipmi_smi_info *data)
{
	struct smi_info *smi = send_info;

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

	return 0;
}

C
Corey Minyard 已提交
1281
static void set_maintenance_mode(void *send_info, bool enable)
C
Corey Minyard 已提交
1282 1283 1284 1285 1286 1287 1288
{
	struct smi_info   *smi_info = send_info;

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

1289
static const struct ipmi_smi_handlers handlers = {
L
Linus Torvalds 已提交
1290
	.owner                  = THIS_MODULE,
1291
	.start_processing       = smi_start_processing,
1292
	.get_smi_info		= get_smi_info,
L
Linus Torvalds 已提交
1293 1294
	.sender			= sender,
	.request_events		= request_events,
1295
	.set_need_watch		= set_need_watch,
C
Corey Minyard 已提交
1296
	.set_maintenance_mode   = set_maintenance_mode,
L
Linus Torvalds 已提交
1297
	.set_run_to_completion  = set_run_to_completion,
1298
	.flush_messages		= flush_messages,
L
Linus Torvalds 已提交
1299 1300 1301
	.poll			= poll,
};

1302 1303 1304 1305
/*
 * There can be 4 IO ports passed in (with or without IRQs), 4 addresses,
 * a default IO port, and 1 ACPI/SPMI address.  That sets SI_MAX_DRIVERS.
 */
L
Linus Torvalds 已提交
1306

1307
static LIST_HEAD(smi_infos);
1308
static DEFINE_MUTEX(smi_infos_lock);
1309
static int smi_num; /* Used to sequence the SMIs */
L
Linus Torvalds 已提交
1310 1311

#define DEFAULT_REGSPACING	1
1312
#define DEFAULT_REGSIZE		1
L
Linus Torvalds 已提交
1313

1314
#ifdef CONFIG_ACPI
1315
static bool          si_tryacpi = true;
1316 1317
#endif
#ifdef CONFIG_DMI
1318
static bool          si_trydmi = true;
1319
#endif
1320
static bool          si_tryplatform = true;
1321
#ifdef CONFIG_PCI
1322
static bool          si_trypci = true;
1323
#endif
1324
static bool          si_trydefaults = IS_ENABLED(CONFIG_IPMI_SI_PROBE_DEFAULTS);
L
Linus Torvalds 已提交
1325 1326 1327 1328
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];
1329
static unsigned int num_addrs;
L
Linus Torvalds 已提交
1330
static unsigned int  ports[SI_MAX_PARMS];
1331
static unsigned int num_ports;
L
Linus Torvalds 已提交
1332
static int           irqs[SI_MAX_PARMS];
1333
static unsigned int num_irqs;
L
Linus Torvalds 已提交
1334
static int           regspacings[SI_MAX_PARMS];
1335
static unsigned int num_regspacings;
L
Linus Torvalds 已提交
1336
static int           regsizes[SI_MAX_PARMS];
1337
static unsigned int num_regsizes;
L
Linus Torvalds 已提交
1338
static int           regshifts[SI_MAX_PARMS];
1339
static unsigned int num_regshifts;
1340
static int slave_addrs[SI_MAX_PARMS]; /* Leaving 0 chooses the default value */
1341
static unsigned int num_slave_addrs;
L
Linus Torvalds 已提交
1342

1343 1344
#define IPMI_IO_ADDR_SPACE  0
#define IPMI_MEM_ADDR_SPACE 1
1345
static const char * const addr_space_to_str[] = { "i/o", "mem" };
1346 1347 1348 1349 1350 1351 1352

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 已提交
1353

1354 1355 1356 1357 1358 1359 1360 1361 1362 1363
#ifdef CONFIG_ACPI
module_param_named(tryacpi, si_tryacpi, bool, 0);
MODULE_PARM_DESC(tryacpi, "Setting this to zero will disable the"
		 " default scan of the interfaces identified via ACPI");
#endif
#ifdef CONFIG_DMI
module_param_named(trydmi, si_trydmi, bool, 0);
MODULE_PARM_DESC(trydmi, "Setting this to zero will disable the"
		 " default scan of the interfaces identified via DMI");
#endif
1364 1365 1366 1367 1368 1369 1370 1371 1372
module_param_named(tryplatform, si_tryplatform, bool, 0);
MODULE_PARM_DESC(tryacpi, "Setting this to zero will disable the"
		 " default scan of the interfaces identified via platform"
		 " interfaces like openfirmware");
#ifdef CONFIG_PCI
module_param_named(trypci, si_trypci, bool, 0);
MODULE_PARM_DESC(tryacpi, "Setting this to zero will disable the"
		 " default scan of the interfaces identified via pci");
#endif
L
Linus Torvalds 已提交
1373 1374 1375 1376 1377 1378 1379 1380 1381
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");
1382
module_param_array(addrs, ulong, &num_addrs, 0);
L
Linus Torvalds 已提交
1383 1384 1385 1386
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.");
1387
module_param_array(ports, uint, &num_ports, 0);
L
Linus Torvalds 已提交
1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418
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.");
1419 1420 1421 1422
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.");
C
Corey Minyard 已提交
1423
module_param(unload_when_empty, bool, 0);
1424 1425 1426
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.");
1427 1428 1429 1430 1431
module_param_array(kipmid_max_busy_us, uint, &num_max_busy_us, 0644);
MODULE_PARM_DESC(kipmid_max_busy_us,
		 "Max time (in microseconds) to busy-wait for IPMI data before"
		 " sleeping. 0 (default) means to wait forever. Set to 100-500"
		 " if kipmid is using up a lot of CPU time.");
L
Linus Torvalds 已提交
1432 1433


1434
static void std_irq_cleanup(struct smi_info *info)
L
Linus Torvalds 已提交
1435
{
1436 1437 1438 1439
	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 已提交
1440 1441 1442 1443 1444 1445
}

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

1446
	if (!info->irq)
L
Linus Torvalds 已提交
1447 1448
		return 0;

1449 1450 1451
	if (info->si_type == SI_BT) {
		rv = request_irq(info->irq,
				 si_bt_irq_handler,
1452
				 IRQF_SHARED,
1453 1454
				 DEVICE_NAME,
				 info);
1455
		if (!rv)
1456 1457 1458 1459 1460 1461
			/* 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,
1462
				 IRQF_SHARED,
1463 1464
				 DEVICE_NAME,
				 info);
L
Linus Torvalds 已提交
1465
	if (rv) {
1466 1467 1468
		dev_warn(info->dev, "%s unable to claim interrupt %d,"
			 " running polled\n",
			 DEVICE_NAME, info->irq);
L
Linus Torvalds 已提交
1469 1470
		info->irq = 0;
	} else {
1471
		info->irq_cleanup = std_irq_cleanup;
1472
		dev_info(info->dev, "Using irq %d\n", info->irq);
L
Linus Torvalds 已提交
1473 1474 1475 1476 1477
	}

	return rv;
}

1478
static unsigned char port_inb(const struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1479
{
1480
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1481

1482
	return inb(addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1483 1484
}

1485
static void port_outb(const struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1486 1487
		      unsigned char b)
{
1488
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1489

1490
	outb(b, addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1491 1492
}

1493
static unsigned char port_inw(const struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1494
{
1495
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1496

1497
	return (inw(addr + (offset * io->regspacing)) >> io->regshift) & 0xff;
L
Linus Torvalds 已提交
1498 1499
}

1500
static void port_outw(const struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1501 1502
		      unsigned char b)
{
1503
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1504

1505
	outw(b << io->regshift, addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1506 1507
}

1508
static unsigned char port_inl(const struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1509
{
1510
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1511

1512
	return (inl(addr + (offset * io->regspacing)) >> io->regshift) & 0xff;
L
Linus Torvalds 已提交
1513 1514
}

1515
static void port_outl(const struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1516 1517
		      unsigned char b)
{
1518
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1519

1520
	outl(b << io->regshift, addr+(offset * io->regspacing));
L
Linus Torvalds 已提交
1521 1522 1523 1524
}

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

1528
	if (addr) {
1529
		for (idx = 0; idx < info->io_size; idx++)
1530 1531
			release_region(addr + idx * info->io.regspacing,
				       info->io.regsize);
L
Linus Torvalds 已提交
1532 1533 1534 1535 1536
	}
}

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

1540
	if (!addr)
L
Linus Torvalds 已提交
1541 1542 1543 1544
		return -ENODEV;

	info->io_cleanup = port_cleanup;

1545 1546 1547 1548
	/*
	 * Figure out the actual inb/inw/inl/etc routine to use based
	 * upon the register size.
	 */
L
Linus Torvalds 已提交
1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562
	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:
1563 1564
		dev_warn(info->dev, "Invalid register size: %d\n",
			 info->io.regsize);
L
Linus Torvalds 已提交
1565 1566 1567
		return -EINVAL;
	}

1568 1569
	/*
	 * Some BIOSes reserve disjoint I/O regions in their ACPI
1570 1571 1572 1573
	 * tables.  This causes problems when trying to register the
	 * entire I/O region.  Therefore we must register each I/O
	 * port separately.
	 */
1574
	for (idx = 0; idx < info->io_size; idx++) {
1575 1576 1577 1578 1579 1580 1581 1582 1583 1584
		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 已提交
1585 1586 1587
	return 0;
}

1588 1589
static unsigned char intf_mem_inb(const struct si_sm_io *io,
				  unsigned int offset)
L
Linus Torvalds 已提交
1590 1591 1592 1593
{
	return readb((io->addr)+(offset * io->regspacing));
}

1594 1595
static void intf_mem_outb(const struct si_sm_io *io, unsigned int offset,
			  unsigned char b)
L
Linus Torvalds 已提交
1596 1597 1598 1599
{
	writeb(b, (io->addr)+(offset * io->regspacing));
}

1600 1601
static unsigned char intf_mem_inw(const struct si_sm_io *io,
				  unsigned int offset)
L
Linus Torvalds 已提交
1602 1603
{
	return (readw((io->addr)+(offset * io->regspacing)) >> io->regshift)
1604
		& 0xff;
L
Linus Torvalds 已提交
1605 1606
}

1607 1608
static void intf_mem_outw(const struct si_sm_io *io, unsigned int offset,
			  unsigned char b)
L
Linus Torvalds 已提交
1609 1610 1611 1612
{
	writeb(b << io->regshift, (io->addr)+(offset * io->regspacing));
}

1613 1614
static unsigned char intf_mem_inl(const struct si_sm_io *io,
				  unsigned int offset)
L
Linus Torvalds 已提交
1615 1616
{
	return (readl((io->addr)+(offset * io->regspacing)) >> io->regshift)
1617
		& 0xff;
L
Linus Torvalds 已提交
1618 1619
}

1620 1621
static void intf_mem_outl(const struct si_sm_io *io, unsigned int offset,
			  unsigned char b)
L
Linus Torvalds 已提交
1622 1623 1624 1625 1626
{
	writel(b << io->regshift, (io->addr)+(offset * io->regspacing));
}

#ifdef readq
1627
static unsigned char mem_inq(const struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1628 1629
{
	return (readq((io->addr)+(offset * io->regspacing)) >> io->regshift)
1630
		& 0xff;
L
Linus Torvalds 已提交
1631 1632
}

1633
static void mem_outq(const struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1634 1635 1636 1637 1638 1639 1640 1641
		     unsigned char b)
{
	writeq(b << io->regshift, (io->addr)+(offset * io->regspacing));
}
#endif

static void mem_cleanup(struct smi_info *info)
{
1642
	unsigned long addr = info->io.addr_data;
L
Linus Torvalds 已提交
1643 1644 1645 1646 1647 1648 1649 1650
	int           mapsize;

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

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

1651
		release_mem_region(addr, mapsize);
L
Linus Torvalds 已提交
1652 1653 1654 1655 1656
	}
}

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

1660
	if (!addr)
L
Linus Torvalds 已提交
1661 1662 1663 1664
		return -ENODEV;

	info->io_cleanup = mem_cleanup;

1665 1666 1667 1668
	/*
	 * Figure out the actual readb/readw/readl/etc routine to use based
	 * upon the register size.
	 */
L
Linus Torvalds 已提交
1669 1670
	switch (info->io.regsize) {
	case 1:
1671 1672
		info->io.inputb = intf_mem_inb;
		info->io.outputb = intf_mem_outb;
L
Linus Torvalds 已提交
1673 1674
		break;
	case 2:
1675 1676
		info->io.inputb = intf_mem_inw;
		info->io.outputb = intf_mem_outw;
L
Linus Torvalds 已提交
1677 1678
		break;
	case 4:
1679 1680
		info->io.inputb = intf_mem_inl;
		info->io.outputb = intf_mem_outl;
L
Linus Torvalds 已提交
1681 1682 1683 1684 1685 1686 1687 1688
		break;
#ifdef readq
	case 8:
		info->io.inputb = mem_inq;
		info->io.outputb = mem_outq;
		break;
#endif
	default:
1689 1690
		dev_warn(info->dev, "Invalid register size: %d\n",
			 info->io.regsize);
L
Linus Torvalds 已提交
1691 1692 1693
		return -EINVAL;
	}

1694 1695
	/*
	 * Calculate the total amount of memory to claim.  This is an
L
Linus Torvalds 已提交
1696 1697 1698
	 * 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
1699 1700
	 * register.
	 */
L
Linus Torvalds 已提交
1701 1702 1703
	mapsize = ((info->io_size * info->io.regspacing)
		   - (info->io.regspacing - info->io.regsize));

1704
	if (request_mem_region(addr, mapsize, DEVICE_NAME) == NULL)
L
Linus Torvalds 已提交
1705 1706
		return -EIO;

1707
	info->io.addr = ioremap(addr, mapsize);
L
Linus Torvalds 已提交
1708
	if (info->io.addr == NULL) {
1709
		release_mem_region(addr, mapsize);
L
Linus Torvalds 已提交
1710 1711 1712 1713 1714
		return -EIO;
	}
	return 0;
}

1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726
/*
 * 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 {
1727 1728
	const char *name;
	const int  val;
1729
};
1730 1731

static const struct hotmod_vals hotmod_ops[] = {
1732 1733 1734 1735
	{ "add",	HM_ADD },
	{ "remove",	HM_REMOVE },
	{ NULL }
};
1736 1737

static const struct hotmod_vals hotmod_si[] = {
1738 1739 1740 1741 1742
	{ "kcs",	SI_KCS },
	{ "smic",	SI_SMIC },
	{ "bt",		SI_BT },
	{ NULL }
};
1743 1744

static const struct hotmod_vals hotmod_as[] = {
1745 1746 1747 1748
	{ "mem",	IPMI_MEM_ADDR_SPACE },
	{ "i/o",	IPMI_IO_ADDR_SPACE },
	{ NULL }
};
C
Corey Minyard 已提交
1749

1750 1751
static int parse_str(const struct hotmod_vals *v, int *val, char *name,
		     char **curr)
1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762
{
	char *s;
	int  i;

	s = strchr(*curr, ',');
	if (!s) {
		printk(KERN_WARNING PFX "No hotmod %s given.\n", name);
		return -EINVAL;
	}
	*s = '\0';
	s++;
C
Corey Minyard 已提交
1763
	for (i = 0; v[i].name; i++) {
C
Corey Minyard 已提交
1764
		if (strcmp(*curr, v[i].name) == 0) {
1765 1766 1767 1768 1769 1770 1771 1772 1773 1774
			*val = v[i].val;
			*curr = s;
			return 0;
		}
	}

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

C
Corey Minyard 已提交
1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798
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;
}

1799 1800 1801 1802
static struct smi_info *smi_info_alloc(void)
{
	struct smi_info *info = kzalloc(sizeof(*info), GFP_KERNEL);

C
Corey Minyard 已提交
1803
	if (info)
1804 1805 1806 1807
		spin_lock_init(&info->si_lock);
	return info;
}

1808 1809 1810
static int hotmod_handler(const char *val, struct kernel_param *kp)
{
	char *str = kstrdup(val, GFP_KERNEL);
C
Corey Minyard 已提交
1811
	int  rv;
1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822
	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 已提交
1823
	int len;
1824 1825 1826 1827 1828 1829
	struct smi_info *info;

	if (!str)
		return -ENOMEM;

	/* Kill any trailing spaces, as we can get a "\n" from echo. */
C
Corey Minyard 已提交
1830 1831
	len = strlen(str);
	ival = len - 1;
1832 1833 1834 1835 1836 1837 1838 1839 1840 1841
	while ((ival >= 0) && isspace(str[ival])) {
		str[ival] = '\0';
		ival--;
	}

	for (curr = str; curr; curr = next) {
		regspacing = 1;
		regsize = 1;
		regshift = 0;
		irq = 0;
1842
		ipmb = 0; /* Choose the default if not specified */
1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887

		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 已提交
1888 1889
			rv = check_hotmod_int_op(curr, o, "rsp", &regspacing);
			if (rv < 0)
1890
				goto out;
C
Corey Minyard 已提交
1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918
			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;
1919 1920 1921
		}

		if (op == HM_ADD) {
1922
			info = smi_info_alloc();
1923 1924 1925 1926 1927
			if (!info) {
				rv = -ENOMEM;
				goto out;
			}

1928
			info->addr_source = SI_HOTMOD;
1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949
			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;

C
Corey Minyard 已提交
1950 1951
			rv = add_smi(info);
			if (rv) {
1952
				kfree(info);
C
Corey Minyard 已提交
1953 1954 1955 1956 1957 1958
				goto out;
			}
			rv = try_smi_init(info);
			if (rv) {
				cleanup_one_si(info);
				goto out;
1959
			}
1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975
		} 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 已提交
1976
	rv = len;
1977 1978 1979 1980
 out:
	kfree(str);
	return rv;
}
1981

B
Bill Pemberton 已提交
1982
static int hardcode_find_bmc(void)
L
Linus Torvalds 已提交
1983
{
1984
	int ret = -ENODEV;
1985
	int             i;
L
Linus Torvalds 已提交
1986 1987
	struct smi_info *info;

1988 1989 1990
	for (i = 0; i < SI_MAX_PARMS; i++) {
		if (!ports[i] && !addrs[i])
			continue;
L
Linus Torvalds 已提交
1991

1992
		info = smi_info_alloc();
1993
		if (!info)
1994
			return -ENOMEM;
L
Linus Torvalds 已提交
1995

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

C
Corey Minyard 已提交
1999
		if (!si_type[i] || strcmp(si_type[i], "kcs") == 0) {
2000
			info->si_type = SI_KCS;
C
Corey Minyard 已提交
2001
		} else if (strcmp(si_type[i], "smic") == 0) {
2002
			info->si_type = SI_SMIC;
C
Corey Minyard 已提交
2003
		} else if (strcmp(si_type[i], "bt") == 0) {
2004 2005
			info->si_type = SI_BT;
		} else {
2006
			printk(KERN_WARNING PFX "Interface type specified "
2007 2008 2009 2010 2011
			       "for interface %d, was invalid: %s\n",
			       i, si_type[i]);
			kfree(info);
			continue;
		}
L
Linus Torvalds 已提交
2012

2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023
		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 {
2024 2025 2026
			printk(KERN_WARNING PFX "Interface type specified "
			       "for interface %d, but port and address were "
			       "not set or set to zero.\n", i);
2027 2028 2029
			kfree(info);
			continue;
		}
L
Linus Torvalds 已提交
2030

2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041
		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;
2042
		info->slave_addr = slave_addrs[i];
L
Linus Torvalds 已提交
2043

2044
		if (!add_smi(info)) {
2045 2046
			if (try_smi_init(info))
				cleanup_one_si(info);
2047
			ret = 0;
2048 2049 2050
		} else {
			kfree(info);
		}
2051
	}
2052
	return ret;
2053
}
L
Linus Torvalds 已提交
2054

2055
#ifdef CONFIG_ACPI
L
Linus Torvalds 已提交
2056 2057 2058

#include <linux/acpi.h>

2059 2060 2061 2062 2063
/*
 * 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 已提交
2064
static int acpi_failure;
L
Linus Torvalds 已提交
2065 2066

/* For GPE-type interrupts. */
2067 2068
static u32 ipmi_acpi_gpe(acpi_handle gpe_device,
	u32 gpe_number, void *context)
L
Linus Torvalds 已提交
2069 2070 2071 2072 2073 2074
{
	struct smi_info *smi_info = context;
	unsigned long   flags;

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

2075
	smi_inc_stat(smi_info, interrupts);
L
Linus Torvalds 已提交
2076

2077 2078
	debug_timestamp("ACPI_GPE");

L
Linus Torvalds 已提交
2079 2080 2081 2082 2083 2084
	smi_event_handler(smi_info, 0);
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);

	return ACPI_INTERRUPT_HANDLED;
}

2085 2086 2087 2088 2089 2090 2091 2092
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 已提交
2093 2094 2095 2096
static int acpi_gpe_irq_setup(struct smi_info *info)
{
	acpi_status status;

2097
	if (!info->irq)
L
Linus Torvalds 已提交
2098 2099 2100 2101 2102 2103 2104 2105
		return 0;

	status = acpi_install_gpe_handler(NULL,
					  info->irq,
					  ACPI_GPE_LEVEL_TRIGGERED,
					  &ipmi_acpi_gpe,
					  info);
	if (status != AE_OK) {
2106 2107
		dev_warn(info->dev, "%s unable to claim ACPI GPE %d,"
			 " running polled\n", DEVICE_NAME, info->irq);
L
Linus Torvalds 已提交
2108 2109 2110
		info->irq = 0;
		return -EINVAL;
	} else {
2111
		info->irq_cleanup = acpi_gpe_irq_cleanup;
2112
		dev_info(info->dev, "Using ACPI GPE %d\n", info->irq);
L
Linus Torvalds 已提交
2113 2114 2115 2116 2117 2118
		return 0;
	}
}

/*
 * Defined at
2119
 * http://h21007.www2.hp.com/portal/download/files/unprot/hpspmi.pdf
L
Linus Torvalds 已提交
2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140
 */
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;

2141 2142 2143 2144
	/*
	 * If bit 0 of InterruptType is set, then this is the SCI
	 * interrupt in the GPEx_STS register.
	 */
L
Linus Torvalds 已提交
2145 2146 2147 2148
	u8	GPE;

	s16	Reserved;

2149 2150 2151 2152
	/*
	 * If bit 1 of InterruptType is set, then this is the I/O
	 * APIC/SAPIC interrupt.
	 */
L
Linus Torvalds 已提交
2153 2154 2155 2156 2157 2158 2159 2160 2161 2162
	u32	GlobalSystemInterrupt;

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

	u8	UID[4];

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

B
Bill Pemberton 已提交
2163
static int try_init_spmi(struct SPMITable *spmi)
L
Linus Torvalds 已提交
2164 2165
{
	struct smi_info  *info;
C
Corey Minyard 已提交
2166
	int rv;
L
Linus Torvalds 已提交
2167 2168

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

2173
	info = smi_info_alloc();
2174
	if (!info) {
2175
		printk(KERN_ERR PFX "Could not allocate SI data (3)\n");
2176 2177 2178
		return -ENOMEM;
	}

2179
	info->addr_source = SI_SPMI;
2180
	printk(KERN_INFO PFX "probing via SPMI\n");
L
Linus Torvalds 已提交
2181 2182

	/* Figure out the interface type. */
2183
	switch (spmi->InterfaceType) {
L
Linus Torvalds 已提交
2184
	case 1:	/* KCS */
2185
		info->si_type = SI_KCS;
L
Linus Torvalds 已提交
2186 2187
		break;
	case 2:	/* SMIC */
2188
		info->si_type = SI_SMIC;
L
Linus Torvalds 已提交
2189 2190
		break;
	case 3:	/* BT */
2191
		info->si_type = SI_BT;
L
Linus Torvalds 已提交
2192
		break;
2193 2194 2195
	case 4: /* SSIF, just ignore */
		kfree(info);
		return -EIO;
L
Linus Torvalds 已提交
2196
	default:
2197 2198
		printk(KERN_INFO PFX "Unknown ACPI/SPMI SI type %d\n",
		       spmi->InterfaceType);
2199
		kfree(info);
L
Linus Torvalds 已提交
2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216
		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;
	}

2217
	if (spmi->addr.bit_width) {
2218
		/* A (hopefully) properly formed register bit width. */
2219
		info->io.regspacing = spmi->addr.bit_width / 8;
2220 2221 2222
	} else {
		info->io.regspacing = DEFAULT_REGSPACING;
	}
2223
	info->io.regsize = info->io.regspacing;
2224
	info->io.regshift = spmi->addr.bit_offset;
L
Linus Torvalds 已提交
2225

2226
	if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_MEMORY) {
L
Linus Torvalds 已提交
2227
		info->io_setup = mem_setup;
2228
		info->io.addr_type = IPMI_MEM_ADDR_SPACE;
2229
	} else if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_IO) {
L
Linus Torvalds 已提交
2230
		info->io_setup = port_setup;
2231
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
L
Linus Torvalds 已提交
2232 2233
	} else {
		kfree(info);
2234
		printk(KERN_WARNING PFX "Unknown ACPI I/O Address type\n");
L
Linus Torvalds 已提交
2235 2236
		return -EIO;
	}
2237
	info->io.addr_data = spmi->addr.address;
L
Linus Torvalds 已提交
2238

2239 2240 2241 2242 2243
	pr_info("ipmi_si: SPMI: %s %#lx regsize %d spacing %d irq %d\n",
		 (info->io.addr_type == IPMI_IO_ADDR_SPACE) ? "io" : "mem",
		 info->io.addr_data, info->io.regsize, info->io.regspacing,
		 info->irq);

C
Corey Minyard 已提交
2244 2245
	rv = add_smi(info);
	if (rv)
2246
		kfree(info);
L
Linus Torvalds 已提交
2247

C
Corey Minyard 已提交
2248
	return rv;
L
Linus Torvalds 已提交
2249
}
2250

B
Bill Pemberton 已提交
2251
static void spmi_find_bmc(void)
2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263
{
	acpi_status      status;
	struct SPMITable *spmi;
	int              i;

	if (acpi_disabled)
		return;

	if (acpi_failure)
		return;

	for (i = 0; ; i++) {
2264 2265
		status = acpi_get_table(ACPI_SIG_SPMI, i+1,
					(struct acpi_table_header **)&spmi);
2266 2267 2268
		if (status != AE_OK)
			return;

2269
		try_init_spmi(spmi);
2270 2271
	}
}
L
Linus Torvalds 已提交
2272 2273
#endif

2274
#ifdef CONFIG_DMI
2275
struct dmi_ipmi_data {
L
Linus Torvalds 已提交
2276 2277 2278 2279 2280 2281
	u8   		type;
	u8   		addr_space;
	unsigned long	base_addr;
	u8   		irq;
	u8              offset;
	u8              slave_addr;
2282
};
L
Linus Torvalds 已提交
2283

B
Bill Pemberton 已提交
2284
static int decode_dmi(const struct dmi_header *dm,
2285
				struct dmi_ipmi_data *dmi)
L
Linus Torvalds 已提交
2286
{
2287
	const u8	*data = (const u8 *)dm;
L
Linus Torvalds 已提交
2288 2289
	unsigned long  	base_addr;
	u8		reg_spacing;
2290
	u8              len = dm->length;
L
Linus Torvalds 已提交
2291

2292
	dmi->type = data[4];
L
Linus Torvalds 已提交
2293 2294 2295 2296 2297 2298

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

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

2308
		dmi->irq = data[0x11];
L
Linus Torvalds 已提交
2309 2310

		/* The top two bits of byte 0x10 hold the register spacing. */
2311
		reg_spacing = (data[0x10] & 0xC0) >> 6;
2312
		switch (reg_spacing) {
L
Linus Torvalds 已提交
2313
		case 0x00: /* Byte boundaries */
2314
		    dmi->offset = 1;
L
Linus Torvalds 已提交
2315 2316
		    break;
		case 0x01: /* 32-bit boundaries */
2317
		    dmi->offset = 4;
L
Linus Torvalds 已提交
2318 2319
		    break;
		case 0x02: /* 16-byte boundaries */
2320
		    dmi->offset = 16;
L
Linus Torvalds 已提交
2321 2322 2323 2324 2325 2326 2327
		    break;
		default:
		    /* Some other interface, just ignore it. */
		    return -EIO;
		}
	} else {
		/* Old DMI spec. */
2328 2329
		/*
		 * Note that technically, the lower bit of the base
2330 2331 2332 2333
		 * 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
2334 2335
		 * memory should use the newer spec, anyway.
		 */
2336 2337 2338
		dmi->base_addr = base_addr & 0xfffe;
		dmi->addr_space = IPMI_IO_ADDR_SPACE;
		dmi->offset = 1;
L
Linus Torvalds 已提交
2339 2340
	}

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

2343
	return 0;
L
Linus Torvalds 已提交
2344 2345
}

B
Bill Pemberton 已提交
2346
static void try_init_dmi(struct dmi_ipmi_data *ipmi_data)
L
Linus Torvalds 已提交
2347
{
2348
	struct smi_info *info;
L
Linus Torvalds 已提交
2349

2350
	info = smi_info_alloc();
2351
	if (!info) {
2352
		printk(KERN_ERR PFX "Could not allocate SI data\n");
2353
		return;
L
Linus Torvalds 已提交
2354 2355
	}

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

C
Corey Minyard 已提交
2359
	switch (ipmi_data->type) {
2360 2361 2362 2363 2364 2365 2366 2367 2368 2369
	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:
2370
		kfree(info);
2371
		return;
L
Linus Torvalds 已提交
2372 2373
	}

2374 2375
	switch (ipmi_data->addr_space) {
	case IPMI_MEM_ADDR_SPACE:
L
Linus Torvalds 已提交
2376
		info->io_setup = mem_setup;
2377 2378 2379 2380
		info->io.addr_type = IPMI_MEM_ADDR_SPACE;
		break;

	case IPMI_IO_ADDR_SPACE:
L
Linus Torvalds 已提交
2381
		info->io_setup = port_setup;
2382 2383 2384 2385
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
		break;

	default:
L
Linus Torvalds 已提交
2386
		kfree(info);
2387
		printk(KERN_WARNING PFX "Unknown SMBIOS I/O Address type: %d\n",
2388 2389
		       ipmi_data->addr_space);
		return;
L
Linus Torvalds 已提交
2390
	}
2391
	info->io.addr_data = ipmi_data->base_addr;
L
Linus Torvalds 已提交
2392

2393 2394
	info->io.regspacing = ipmi_data->offset;
	if (!info->io.regspacing)
L
Linus Torvalds 已提交
2395 2396
		info->io.regspacing = DEFAULT_REGSPACING;
	info->io.regsize = DEFAULT_REGSPACING;
2397
	info->io.regshift = 0;
L
Linus Torvalds 已提交
2398 2399 2400

	info->slave_addr = ipmi_data->slave_addr;

2401 2402 2403
	info->irq = ipmi_data->irq;
	if (info->irq)
		info->irq_setup = std_irq_setup;
L
Linus Torvalds 已提交
2404

2405 2406 2407 2408 2409
	pr_info("ipmi_si: SMBIOS: %s %#lx regsize %d spacing %d irq %d\n",
		 (info->io.addr_type == IPMI_IO_ADDR_SPACE) ? "io" : "mem",
		 info->io.addr_data, info->io.regsize, info->io.regspacing,
		 info->irq);

2410 2411
	if (add_smi(info))
		kfree(info);
2412
}
L
Linus Torvalds 已提交
2413

B
Bill Pemberton 已提交
2414
static void dmi_find_bmc(void)
2415
{
2416
	const struct dmi_device *dev = NULL;
2417 2418 2419 2420
	struct dmi_ipmi_data data;
	int                  rv;

	while ((dev = dmi_find_device(DMI_DEV_TYPE_IPMI, NULL, dev))) {
2421
		memset(&data, 0, sizeof(data));
2422 2423
		rv = decode_dmi((const struct dmi_header *) dev->device_data,
				&data);
2424 2425 2426
		if (!rv)
			try_init_dmi(&data);
	}
L
Linus Torvalds 已提交
2427
}
2428
#endif /* CONFIG_DMI */
L
Linus Torvalds 已提交
2429 2430 2431

#ifdef CONFIG_PCI

2432 2433 2434 2435 2436 2437 2438
#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 已提交
2439 2440 2441 2442
#define PCI_HP_VENDOR_ID    0x103C
#define PCI_MMC_DEVICE_ID   0x121A
#define PCI_MMC_ADDR_CW     0x10

2443 2444 2445 2446 2447 2448
static void ipmi_pci_cleanup(struct smi_info *info)
{
	struct pci_dev *pdev = info->addr_source_data;

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

B
Bill Pemberton 已提交
2450
static int ipmi_pci_probe_regspacing(struct smi_info *info)
2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481
{
	if (info->si_type == SI_KCS) {
		unsigned char	status;
		int		regspacing;

		info->io.regsize = DEFAULT_REGSIZE;
		info->io.regshift = 0;
		info->io_size = 2;
		info->handlers = &kcs_smi_handlers;

		/* detect 1, 4, 16byte spacing */
		for (regspacing = DEFAULT_REGSPACING; regspacing <= 16;) {
			info->io.regspacing = regspacing;
			if (info->io_setup(info)) {
				dev_err(info->dev,
					"Could not setup I/O space\n");
				return DEFAULT_REGSPACING;
			}
			/* write invalid cmd */
			info->io.outputb(&info->io, 1, 0x10);
			/* read status back */
			status = info->io.inputb(&info->io, 1);
			info->io_cleanup(info);
			if (status)
				return regspacing;
			regspacing *= 4;
		}
	}
	return DEFAULT_REGSPACING;
}

B
Bill Pemberton 已提交
2482
static int ipmi_pci_probe(struct pci_dev *pdev,
2483
				    const struct pci_device_id *ent)
L
Linus Torvalds 已提交
2484
{
2485 2486 2487
	int rv;
	int class_type = pdev->class & PCI_ERMC_CLASSCODE_TYPE_MASK;
	struct smi_info *info;
L
Linus Torvalds 已提交
2488

2489
	info = smi_info_alloc();
2490
	if (!info)
2491
		return -ENOMEM;
L
Linus Torvalds 已提交
2492

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

2496 2497 2498 2499
	switch (class_type) {
	case PCI_ERMC_CLASSCODE_TYPE_SMIC:
		info->si_type = SI_SMIC;
		break;
L
Linus Torvalds 已提交
2500

2501 2502 2503 2504 2505 2506 2507 2508 2509 2510
	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);
2511
		dev_info(&pdev->dev, "Unknown IPMI type: %d\n", class_type);
2512
		return -ENOMEM;
L
Linus Torvalds 已提交
2513 2514
	}

2515 2516
	rv = pci_enable_device(pdev);
	if (rv) {
2517
		dev_err(&pdev->dev, "couldn't enable PCI device\n");
2518 2519
		kfree(info);
		return rv;
L
Linus Torvalds 已提交
2520 2521
	}

2522 2523
	info->addr_source_cleanup = ipmi_pci_cleanup;
	info->addr_source_data = pdev;
L
Linus Torvalds 已提交
2524

2525 2526 2527 2528 2529 2530
	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 已提交
2531
	}
2532
	info->io.addr_data = pci_resource_start(pdev, 0);
L
Linus Torvalds 已提交
2533

2534 2535
	info->io.regspacing = ipmi_pci_probe_regspacing(info);
	info->io.regsize = DEFAULT_REGSIZE;
2536
	info->io.regshift = 0;
L
Linus Torvalds 已提交
2537

2538 2539 2540
	info->irq = pdev->irq;
	if (info->irq)
		info->irq_setup = std_irq_setup;
L
Linus Torvalds 已提交
2541

2542
	info->dev = &pdev->dev;
C
Corey Minyard 已提交
2543
	pci_set_drvdata(pdev, info);
2544

2545 2546 2547 2548
	dev_info(&pdev->dev, "%pR regsize %d spacing %d irq %d\n",
		&pdev->resource[0], info->io.regsize, info->io.regspacing,
		info->irq);

C
Corey Minyard 已提交
2549 2550
	rv = add_smi(info);
	if (rv) {
2551
		kfree(info);
C
Corey Minyard 已提交
2552 2553
		pci_disable_device(pdev);
	}
2554

C
Corey Minyard 已提交
2555
	return rv;
2556
}
L
Linus Torvalds 已提交
2557

B
Bill Pemberton 已提交
2558
static void ipmi_pci_remove(struct pci_dev *pdev)
2559
{
C
Corey Minyard 已提交
2560 2561
	struct smi_info *info = pci_get_drvdata(pdev);
	cleanup_one_si(info);
C
Corey Minyard 已提交
2562
	pci_disable_device(pdev);
2563
}
L
Linus Torvalds 已提交
2564

2565
static const struct pci_device_id ipmi_pci_devices[] = {
2566
	{ PCI_DEVICE(PCI_HP_VENDOR_ID, PCI_MMC_DEVICE_ID) },
2567 2568
	{ PCI_DEVICE_CLASS(PCI_ERMC_CLASSCODE, PCI_ERMC_CLASSCODE_MASK) },
	{ 0, }
2569 2570 2571 2572
};
MODULE_DEVICE_TABLE(pci, ipmi_pci_devices);

static struct pci_driver ipmi_pci_driver = {
2573 2574 2575
	.name =         DEVICE_NAME,
	.id_table =     ipmi_pci_devices,
	.probe =        ipmi_pci_probe,
2576
	.remove =       ipmi_pci_remove,
2577 2578
};
#endif /* CONFIG_PCI */
L
Linus Torvalds 已提交
2579

2580
#ifdef CONFIG_OF
2581 2582 2583 2584 2585 2586 2587 2588 2589
static const struct of_device_id of_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 },
	{},
};
2590
MODULE_DEVICE_TABLE(of, of_ipmi_match);
2591 2592 2593

static int of_ipmi_probe(struct platform_device *dev)
{
2594
	const struct of_device_id *match;
2595 2596
	struct smi_info *info;
	struct resource resource;
2597
	const __be32 *regsize, *regspacing, *regshift;
2598
	struct device_node *np = dev->dev.of_node;
2599 2600 2601
	int ret;
	int proplen;

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

2604
	match = of_match_device(of_ipmi_match, &dev->dev);
2605
	if (!match)
2606
		return -ENODEV;
2607

2608 2609 2610
	if (!of_device_is_available(np))
		return -EINVAL;

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

2617
	regsize = of_get_property(np, "reg-size", &proplen);
2618 2619 2620 2621 2622
	if (regsize && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regsize from OF\n");
		return -EINVAL;
	}

2623
	regspacing = of_get_property(np, "reg-spacing", &proplen);
2624 2625 2626 2627 2628
	if (regspacing && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regspacing from OF\n");
		return -EINVAL;
	}

2629
	regshift = of_get_property(np, "reg-shift", &proplen);
2630 2631 2632 2633 2634
	if (regshift && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regshift from OF\n");
		return -EINVAL;
	}

2635
	info = smi_info_alloc();
2636 2637 2638

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

2643
	info->si_type		= (enum si_type) match->data;
2644
	info->addr_source	= SI_DEVICETREE;
2645 2646
	info->irq_setup		= std_irq_setup;

2647 2648 2649 2650 2651 2652 2653 2654
	if (resource.flags & IORESOURCE_IO) {
		info->io_setup		= port_setup;
		info->io.addr_type	= IPMI_IO_ADDR_SPACE;
	} else {
		info->io_setup		= mem_setup;
		info->io.addr_type	= IPMI_MEM_ADDR_SPACE;
	}

2655 2656
	info->io.addr_data	= resource.start;

2657 2658 2659
	info->io.regsize	= regsize ? be32_to_cpup(regsize) : DEFAULT_REGSIZE;
	info->io.regspacing	= regspacing ? be32_to_cpup(regspacing) : DEFAULT_REGSPACING;
	info->io.regshift	= regshift ? be32_to_cpup(regshift) : 0;
2660

2661
	info->irq		= irq_of_parse_and_map(dev->dev.of_node, 0);
2662 2663
	info->dev		= &dev->dev;

2664
	dev_dbg(&dev->dev, "addr 0x%lx regsize %d spacing %d irq %d\n",
2665 2666 2667
		info->io.addr_data, info->io.regsize, info->io.regspacing,
		info->irq);

2668
	dev_set_drvdata(&dev->dev, info);
2669

C
Corey Minyard 已提交
2670 2671
	ret = add_smi(info);
	if (ret) {
2672
		kfree(info);
C
Corey Minyard 已提交
2673
		return ret;
2674 2675
	}
	return 0;
2676
}
2677 2678 2679 2680 2681 2682 2683
#else
#define of_ipmi_match NULL
static int of_ipmi_probe(struct platform_device *dev)
{
	return -ENODEV;
}
#endif
2684

2685 2686
#ifdef CONFIG_ACPI
static int acpi_ipmi_probe(struct platform_device *dev)
2687
{
2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747 2748 2749 2750 2751 2752 2753 2754 2755 2756 2757 2758 2759 2760 2761 2762 2763 2764 2765 2766 2767 2768 2769 2770 2771 2772 2773 2774 2775 2776 2777 2778 2779 2780 2781 2782 2783 2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794
	struct smi_info *info;
	struct resource *res, *res_second;
	acpi_handle handle;
	acpi_status status;
	unsigned long long tmp;
	int rv = -EINVAL;

	handle = ACPI_HANDLE(&dev->dev);
	if (!handle)
		return -ENODEV;

	info = smi_info_alloc();
	if (!info)
		return -ENOMEM;

	info->addr_source = SI_ACPI;
	dev_info(&dev->dev, PFX "probing via ACPI\n");

	info->addr_info.acpi_info.acpi_handle = handle;

	/* _IFT tells us the interface type: KCS, BT, etc */
	status = acpi_evaluate_integer(handle, "_IFT", NULL, &tmp);
	if (ACPI_FAILURE(status)) {
		dev_err(&dev->dev, "Could not find ACPI IPMI interface type\n");
		goto err_free;
	}

	switch (tmp) {
	case 1:
		info->si_type = SI_KCS;
		break;
	case 2:
		info->si_type = SI_SMIC;
		break;
	case 3:
		info->si_type = SI_BT;
		break;
	case 4: /* SSIF, just ignore */
		rv = -ENODEV;
		goto err_free;
	default:
		dev_info(&dev->dev, "unknown IPMI type %lld\n", tmp);
		goto err_free;
	}

	res = platform_get_resource(dev, IORESOURCE_IO, 0);
	if (res) {
		info->io_setup = port_setup;
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
	} else {
		res = platform_get_resource(dev, IORESOURCE_MEM, 0);
		if (res) {
			info->io_setup = mem_setup;
			info->io.addr_type = IPMI_MEM_ADDR_SPACE;
		}
	}
	if (!res) {
		dev_err(&dev->dev, "no I/O or memory address\n");
		goto err_free;
	}
	info->io.addr_data = res->start;

	info->io.regspacing = DEFAULT_REGSPACING;
	res_second = platform_get_resource(dev,
			       (info->io.addr_type == IPMI_IO_ADDR_SPACE) ?
					IORESOURCE_IO : IORESOURCE_MEM,
			       1);
	if (res_second) {
		if (res_second->start > info->io.addr_data)
			info->io.regspacing =
				res_second->start - info->io.addr_data;
	}
	info->io.regsize = DEFAULT_REGSPACING;
	info->io.regshift = 0;

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

		if (irq > 0) {
			info->irq = irq;
			info->irq_setup = std_irq_setup;
		}
	}

	info->dev = &dev->dev;
	platform_set_drvdata(dev, info);

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

	rv = add_smi(info);
	if (rv)
		kfree(info);

	return rv;

err_free:
	kfree(info);
	return rv;
}

2795
static const struct acpi_device_id acpi_ipmi_match[] = {
2796 2797 2798 2799 2800 2801 2802 2803 2804
	{ "IPI0001", 0 },
	{ },
};
MODULE_DEVICE_TABLE(acpi, acpi_ipmi_match);
#else
static int acpi_ipmi_probe(struct platform_device *dev)
{
	return -ENODEV;
}
2805
#endif
2806 2807 2808 2809 2810 2811 2812

static int ipmi_probe(struct platform_device *dev)
{
	if (of_ipmi_probe(dev) == 0)
		return 0;

	return acpi_ipmi_probe(dev);
2813 2814
}

2815
static int ipmi_remove(struct platform_device *dev)
2816
{
2817 2818
	struct smi_info *info = dev_get_drvdata(&dev->dev);

2819
	cleanup_one_si(info);
2820 2821
	return 0;
}
2822

2823
static struct platform_driver ipmi_driver = {
2824
	.driver = {
2825
		.name = DEVICE_NAME,
2826 2827
		.of_match_table = of_ipmi_match,
		.acpi_match_table = ACPI_PTR(acpi_ipmi_match),
2828
	},
2829
	.probe		= ipmi_probe,
2830
	.remove		= ipmi_remove,
2831 2832
};

2833 2834 2835 2836
#ifdef CONFIG_PARISC
static int ipmi_parisc_probe(struct parisc_device *dev)
{
	struct smi_info *info;
2837
	int rv;
2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 2862

	info = smi_info_alloc();

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

	info->si_type		= SI_KCS;
	info->addr_source	= SI_DEVICETREE;
	info->io_setup		= mem_setup;
	info->io.addr_type	= IPMI_MEM_ADDR_SPACE;
	info->io.addr_data	= dev->hpa.start;
	info->io.regsize	= 1;
	info->io.regspacing	= 1;
	info->io.regshift	= 0;
	info->irq		= 0; /* no interrupt */
	info->irq_setup		= NULL;
	info->dev		= &dev->dev;

	dev_dbg(&dev->dev, "addr 0x%lx\n", info->io.addr_data);

	dev_set_drvdata(&dev->dev, info);

C
Corey Minyard 已提交
2863 2864
	rv = add_smi(info);
	if (rv) {
2865
		kfree(info);
C
Corey Minyard 已提交
2866
		return rv;
2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877
	}

	return 0;
}

static int ipmi_parisc_remove(struct parisc_device *dev)
{
	cleanup_one_si(dev_get_drvdata(&dev->dev));
	return 0;
}

2878
static const struct parisc_device_id ipmi_parisc_tbl[] = {
2879 2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890
	{ HPHW_MC, HVERSION_REV_ANY_ID, 0x004, 0xC0 },
	{ 0, }
};

static struct parisc_driver ipmi_parisc_driver = {
	.name =		"ipmi",
	.id_table =	ipmi_parisc_tbl,
	.probe =	ipmi_parisc_probe,
	.remove =	ipmi_parisc_remove,
};
#endif /* CONFIG_PARISC */

2891
static int wait_for_msg_done(struct smi_info *smi_info)
L
Linus Torvalds 已提交
2892
{
2893
	enum si_sm_result     smi_result;
L
Linus Torvalds 已提交
2894 2895

	smi_result = smi_info->handlers->event(smi_info->si_sm, 0);
2896
	for (;;) {
C
Corey Minyard 已提交
2897 2898
		if (smi_result == SI_SM_CALL_WITH_DELAY ||
		    smi_result == SI_SM_CALL_WITH_TICK_DELAY) {
2899
			schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
2900
			smi_result = smi_info->handlers->event(
2901
				smi_info->si_sm, jiffies_to_usecs(1));
2902
		} else if (smi_result == SI_SM_CALL_WITHOUT_DELAY) {
L
Linus Torvalds 已提交
2903 2904
			smi_result = smi_info->handlers->event(
				smi_info->si_sm, 0);
2905
		} else
L
Linus Torvalds 已提交
2906 2907
			break;
	}
2908
	if (smi_result == SI_SM_HOSED)
2909 2910 2911 2912
		/*
		 * We couldn't get the state machine to run, so whatever's at
		 * the port is probably not an IPMI SMI interface.
		 */
2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937 2938
		return -ENODEV;

	return 0;
}

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

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

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

	rv = wait_for_msg_done(smi_info);
	if (rv)
L
Linus Torvalds 已提交
2939 2940 2941 2942 2943
		goto out;

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

C
Corey Minyard 已提交
2944 2945
	/* 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 已提交
2946 2947 2948 2949 2950 2951

 out:
	kfree(resp);
	return rv;
}

2952
static int get_global_enables(struct smi_info *smi_info, u8 *enables)
2953 2954 2955 2956 2957 2958 2959
{
	unsigned char         msg[3];
	unsigned char         *resp;
	unsigned long         resp_len;
	int                   rv;

	resp = kmalloc(IPMI_MAX_MSG_LENGTH, GFP_KERNEL);
2960 2961
	if (!resp)
		return -ENOMEM;
2962 2963 2964 2965 2966 2967 2968

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

	rv = wait_for_msg_done(smi_info);
	if (rv) {
2969 2970 2971
		dev_warn(smi_info->dev,
			 "Error getting response from get global enables command: %d\n",
			 rv);
2972 2973 2974 2975 2976 2977 2978 2979 2980 2981
		goto out;
	}

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

	if (resp_len < 4 ||
			resp[0] != (IPMI_NETFN_APP_REQUEST | 1) << 2 ||
			resp[1] != IPMI_GET_BMC_GLOBAL_ENABLES_CMD   ||
			resp[2] != 0) {
2982 2983 2984
		dev_warn(smi_info->dev,
			 "Invalid return from get global enables command: %ld %x %x %x\n",
			 resp_len, resp[0], resp[1], resp[2]);
2985 2986
		rv = -EINVAL;
		goto out;
2987 2988
	} else {
		*enables = resp[3];
2989 2990
	}

2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008
out:
	kfree(resp);
	return rv;
}

/*
 * Returns 1 if it gets an error from the command.
 */
static int set_global_enables(struct smi_info *smi_info, u8 enables)
{
	unsigned char         msg[3];
	unsigned char         *resp;
	unsigned long         resp_len;
	int                   rv;

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

	msg[0] = IPMI_NETFN_APP_REQUEST << 2;
	msg[1] = IPMI_SET_BMC_GLOBAL_ENABLES_CMD;
3012
	msg[2] = enables;
3013 3014 3015 3016
	smi_info->handlers->start_transaction(smi_info->si_sm, msg, 3);

	rv = wait_for_msg_done(smi_info);
	if (rv) {
3017 3018 3019
		dev_warn(smi_info->dev,
			 "Error getting response from set global enables command: %d\n",
			 rv);
3020 3021 3022 3023 3024 3025 3026 3027 3028
		goto out;
	}

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

	if (resp_len < 3 ||
			resp[0] != (IPMI_NETFN_APP_REQUEST | 1) << 2 ||
			resp[1] != IPMI_SET_BMC_GLOBAL_ENABLES_CMD) {
3029 3030 3031
		dev_warn(smi_info->dev,
			 "Invalid return from set global enables command: %ld %x %x\n",
			 resp_len, resp[0], resp[1]);
3032 3033 3034 3035
		rv = -EINVAL;
		goto out;
	}

3036 3037 3038 3039 3040 3041 3042 3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070
	if (resp[2] != 0)
		rv = 1;

out:
	kfree(resp);
	return rv;
}

/*
 * Some BMCs do not support clearing the receive irq bit in the global
 * enables (even if they don't support interrupts on the BMC).  Check
 * for this and handle it properly.
 */
static void check_clr_rcv_irq(struct smi_info *smi_info)
{
	u8 enables = 0;
	int rv;

	rv = get_global_enables(smi_info, &enables);
	if (!rv) {
		if ((enables & IPMI_BMC_RCV_MSG_INTR) == 0)
			/* Already clear, should work ok. */
			return;

		enables &= ~IPMI_BMC_RCV_MSG_INTR;
		rv = set_global_enables(smi_info, enables);
	}

	if (rv < 0) {
		dev_err(smi_info->dev,
			"Cannot check clearing the rcv irq: %d\n", rv);
		return;
	}

	if (rv) {
3071 3072 3073 3074
		/*
		 * An error when setting the event buffer bit means
		 * clearing the bit is not supported.
		 */
3075 3076 3077 3078 3079 3080 3081 3082 3083 3084 3085 3086 3087 3088 3089 3090 3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103 3104 3105 3106 3107 3108 3109 3110 3111 3112 3113 3114
		dev_warn(smi_info->dev,
			 "The BMC does not support clearing the recv irq bit, compensating, but the BMC needs to be fixed.\n");
		smi_info->cannot_disable_irq = true;
	}
}

/*
 * Some BMCs do not support setting the interrupt bits in the global
 * enables even if they support interrupts.  Clearly bad, but we can
 * compensate.
 */
static void check_set_rcv_irq(struct smi_info *smi_info)
{
	u8 enables = 0;
	int rv;

	if (!smi_info->irq)
		return;

	rv = get_global_enables(smi_info, &enables);
	if (!rv) {
		enables |= IPMI_BMC_RCV_MSG_INTR;
		rv = set_global_enables(smi_info, enables);
	}

	if (rv < 0) {
		dev_err(smi_info->dev,
			"Cannot check setting the rcv irq: %d\n", rv);
		return;
	}

	if (rv) {
		/*
		 * An error when setting the event buffer bit means
		 * setting the bit is not supported.
		 */
		dev_warn(smi_info->dev,
			 "The BMC does not support setting the recv irq bit, compensating, but the BMC needs to be fixed.\n");
		smi_info->cannot_disable_irq = true;
		smi_info->irq_enable_broken = true;
3115 3116 3117
	}
}

3118 3119 3120 3121 3122 3123 3124 3125 3126 3127 3128 3129 3130 3131 3132 3133 3134
static int try_enable_event_buffer(struct smi_info *smi_info)
{
	unsigned char         msg[3];
	unsigned char         *resp;
	unsigned long         resp_len;
	int                   rv = 0;

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

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

	rv = wait_for_msg_done(smi_info);
	if (rv) {
3135 3136
		printk(KERN_WARNING PFX "Error getting response from get"
		       " global enables command, the event buffer is not"
3137 3138 3139 3140 3141 3142 3143 3144 3145 3146 3147
		       " enabled.\n");
		goto out;
	}

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

	if (resp_len < 4 ||
			resp[0] != (IPMI_NETFN_APP_REQUEST | 1) << 2 ||
			resp[1] != IPMI_GET_BMC_GLOBAL_ENABLES_CMD   ||
			resp[2] != 0) {
3148 3149
		printk(KERN_WARNING PFX "Invalid return from get global"
		       " enables command, cannot enable the event buffer.\n");
3150 3151 3152 3153
		rv = -EINVAL;
		goto out;
	}

3154
	if (resp[3] & IPMI_BMC_EVT_MSG_BUFF) {
3155
		/* buffer is already enabled, nothing to do. */
3156
		smi_info->supports_event_msg_buff = true;
3157
		goto out;
3158
	}
3159 3160 3161 3162 3163 3164 3165 3166

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

	rv = wait_for_msg_done(smi_info);
	if (rv) {
3167 3168
		printk(KERN_WARNING PFX "Error getting response from set"
		       " global, enables command, the event buffer is not"
3169 3170 3171 3172 3173 3174 3175 3176 3177 3178
		       " enabled.\n");
		goto out;
	}

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

	if (resp_len < 3 ||
			resp[0] != (IPMI_NETFN_APP_REQUEST | 1) << 2 ||
			resp[1] != IPMI_SET_BMC_GLOBAL_ENABLES_CMD) {
3179 3180
		printk(KERN_WARNING PFX "Invalid return from get global,"
		       "enables command, not enable the event buffer.\n");
3181 3182 3183 3184 3185 3186 3187 3188 3189 3190
		rv = -EINVAL;
		goto out;
	}

	if (resp[2] != 0)
		/*
		 * An error when setting the event buffer bit means
		 * that the event buffer is not supported.
		 */
		rv = -ENOENT;
3191 3192 3193
	else
		smi_info->supports_event_msg_buff = true;

3194 3195 3196 3197 3198
 out:
	kfree(resp);
	return rv;
}

3199
static int smi_type_proc_show(struct seq_file *m, void *v)
L
Linus Torvalds 已提交
3200
{
3201
	struct smi_info *smi = m->private;
L
Linus Torvalds 已提交
3202

3203 3204
	seq_printf(m, "%s\n", si_to_str[smi->si_type]);

3205
	return 0;
L
Linus Torvalds 已提交
3206 3207
}

3208
static int smi_type_proc_open(struct inode *inode, struct file *file)
L
Linus Torvalds 已提交
3209
{
A
Al Viro 已提交
3210
	return single_open(file, smi_type_proc_show, PDE_DATA(inode));
3211 3212 3213 3214 3215 3216 3217 3218 3219 3220 3221 3222
}

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

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

3224
	seq_printf(m, "interrupts_enabled:    %d\n",
3225
		       smi->irq && !smi->interrupt_disabled);
3226
	seq_printf(m, "short_timeouts:        %u\n",
3227
		       smi_get_stat(smi, short_timeouts));
3228
	seq_printf(m, "long_timeouts:         %u\n",
3229
		       smi_get_stat(smi, long_timeouts));
3230
	seq_printf(m, "idles:                 %u\n",
3231
		       smi_get_stat(smi, idles));
3232
	seq_printf(m, "interrupts:            %u\n",
3233
		       smi_get_stat(smi, interrupts));
3234
	seq_printf(m, "attentions:            %u\n",
3235
		       smi_get_stat(smi, attentions));
3236
	seq_printf(m, "flag_fetches:          %u\n",
3237
		       smi_get_stat(smi, flag_fetches));
3238
	seq_printf(m, "hosed_count:           %u\n",
3239
		       smi_get_stat(smi, hosed_count));
3240
	seq_printf(m, "complete_transactions: %u\n",
3241
		       smi_get_stat(smi, complete_transactions));
3242
	seq_printf(m, "events:                %u\n",
3243
		       smi_get_stat(smi, events));
3244
	seq_printf(m, "watchdog_pretimeouts:  %u\n",
3245
		       smi_get_stat(smi, watchdog_pretimeouts));
3246
	seq_printf(m, "incoming_messages:     %u\n",
3247
		       smi_get_stat(smi, incoming_messages));
3248 3249
	return 0;
}
L
Linus Torvalds 已提交
3250

3251 3252
static int smi_si_stats_proc_open(struct inode *inode, struct file *file)
{
A
Al Viro 已提交
3253
	return single_open(file, smi_si_stats_proc_show, PDE_DATA(inode));
3254 3255
}

3256 3257 3258 3259 3260 3261 3262 3263
static const struct file_operations smi_si_stats_proc_ops = {
	.open		= smi_si_stats_proc_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

static int smi_params_proc_show(struct seq_file *m, void *v)
3264
{
3265
	struct smi_info *smi = m->private;
3266

3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277
	seq_printf(m,
		   "%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);

3278
	return 0;
L
Linus Torvalds 已提交
3279 3280
}

3281 3282
static int smi_params_proc_open(struct inode *inode, struct file *file)
{
A
Al Viro 已提交
3283
	return single_open(file, smi_params_proc_show, PDE_DATA(inode));
3284 3285 3286 3287 3288 3289 3290 3291 3292
}

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

3293 3294 3295 3296 3297 3298 3299 3300 3301
/*
 * 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 已提交
3302
	smi_info->msg_flags = ((smi_info->msg_flags & ~OEM_DATA_AVAIL) |
3303
			       RECEIVE_MSG_AVAIL);
3304 3305 3306 3307 3308 3309 3310 3311 3312 3313 3314 3315 3316 3317 3318 3319 3320 3321 3322 3323 3324 3325 3326 3327
	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 已提交
3328 3329 3330
 * Additionally, PowerEdge systems with IPMI < 1.5 may also assert
 * OEM0_DATA_AVAIL and needs to be treated as RECEIVE_MSG_AVAIL.
 *
3331 3332 3333 3334
 */
#define DELL_POWEREDGE_8G_BMC_DEVICE_ID  0x20
#define DELL_POWEREDGE_8G_BMC_DEVICE_REV 0x80
#define DELL_POWEREDGE_8G_BMC_IPMI_VERSION 0x51
3335
#define DELL_IANA_MFR_ID 0x0002a2
3336 3337 3338
static void setup_dell_poweredge_oem_data_handler(struct smi_info *smi_info)
{
	struct ipmi_device_id *id = &smi_info->device_id;
3339
	if (id->manufacturer_id == DELL_IANA_MFR_ID) {
C
Corey Minyard 已提交
3340 3341
		if (id->device_id       == DELL_POWEREDGE_8G_BMC_DEVICE_ID  &&
		    id->device_revision == DELL_POWEREDGE_8G_BMC_DEVICE_REV &&
3342
		    id->ipmi_version   == DELL_POWEREDGE_8G_BMC_IPMI_VERSION) {
C
Corey Minyard 已提交
3343 3344
			smi_info->oem_data_avail_handler =
				oem_data_avail_to_receive_msg_avail;
3345 3346 3347
		} else if (ipmi_version_major(id) < 1 ||
			   (ipmi_version_major(id) == 1 &&
			    ipmi_version_minor(id) < 5)) {
C
Corey Minyard 已提交
3348 3349 3350
			smi_info->oem_data_avail_handler =
				oem_data_avail_to_receive_msg_avail;
		}
3351 3352 3353
	}
}

3354 3355 3356 3357 3358
#define CANNOT_RETURN_REQUESTED_LENGTH 0xCA
static void return_hosed_msg_badsize(struct smi_info *smi_info)
{
	struct ipmi_smi_msg *msg = smi_info->curr_msg;

L
Lucas De Marchi 已提交
3359
	/* Make it a response */
3360 3361 3362 3363 3364 3365 3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377 3378 3379 3380 3381 3382 3383 3384 3385 3386 3387 3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412
	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;
3413
	if (id->manufacturer_id == DELL_IANA_MFR_ID &&
3414 3415 3416 3417
	    smi_info->si_type == SI_BT)
		register_xaction_notifier(&dell_poweredge_bt_xaction_notifier);
}

3418 3419 3420 3421 3422 3423 3424 3425 3426 3427 3428 3429 3430
/*
 * 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);
}

3431 3432 3433 3434 3435
static void setup_xaction_handlers(struct smi_info *smi_info)
{
	setup_dell_poweredge_bt_xaction_handler(smi_info);
}

3436 3437 3438 3439 3440 3441
static void check_for_broken_irqs(struct smi_info *smi_info)
{
	check_clr_rcv_irq(smi_info);
	check_set_rcv_irq(smi_info);
}

C
Corey Minyard 已提交
3442 3443
static inline void wait_for_timer_and_thread(struct smi_info *smi_info)
{
3444 3445 3446
	if (smi_info->thread != NULL)
		kthread_stop(smi_info->thread);
	if (smi_info->timer_running)
3447
		del_timer_sync(&smi_info->si_timer);
C
Corey Minyard 已提交
3448 3449
}

3450
static const struct ipmi_default_vals
3451
{
3452 3453
	const int type;
	const int port;
3454
} ipmi_defaults[] =
3455 3456 3457 3458 3459 3460 3461
{
	{ .type = SI_KCS, .port = 0xca2 },
	{ .type = SI_SMIC, .port = 0xca9 },
	{ .type = SI_BT, .port = 0xe4 },
	{ .port = 0 }
};

B
Bill Pemberton 已提交
3462
static void default_find_bmc(void)
3463 3464 3465 3466 3467 3468 3469
{
	struct smi_info *info;
	int             i;

	for (i = 0; ; i++) {
		if (!ipmi_defaults[i].port)
			break;
3470
#ifdef CONFIG_PPC
3471 3472 3473
		if (check_legacy_ioport(ipmi_defaults[i].port))
			continue;
#endif
3474
		info = smi_info_alloc();
3475 3476
		if (!info)
			return;
3477

3478
		info->addr_source = SI_DEFAULT;
3479 3480 3481 3482 3483 3484 3485 3486 3487 3488 3489

		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;

3490 3491 3492
		if (add_smi(info) == 0) {
			if ((try_smi_init(info)) == 0) {
				/* Found one... */
3493
				printk(KERN_INFO PFX "Found default %s"
3494 3495 3496 3497 3498 3499
				" state machine at %s address 0x%lx\n",
				si_to_str[info->si_type],
				addr_space_to_str[info->io.addr_type],
				info->io.addr_data);
			} else
				cleanup_one_si(info);
3500 3501
		} else {
			kfree(info);
3502 3503 3504 3505 3506
		}
	}
}

static int is_new_interface(struct smi_info *info)
L
Linus Torvalds 已提交
3507
{
3508
	struct smi_info *e;
L
Linus Torvalds 已提交
3509

3510 3511 3512 3513 3514 3515
	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 已提交
3516

3517 3518
	return 1;
}
L
Linus Torvalds 已提交
3519

3520
static int add_smi(struct smi_info *new_smi)
3521
{
3522
	int rv = 0;
3523

3524
	printk(KERN_INFO PFX "Adding %s-specified %s state machine",
3525 3526
	       ipmi_addr_src_to_str(new_smi->addr_source),
	       si_to_str[new_smi->si_type]);
3527
	mutex_lock(&smi_infos_lock);
3528
	if (!is_new_interface(new_smi)) {
3529
		printk(KERN_CONT " duplicate interface\n");
3530 3531 3532
		rv = -EBUSY;
		goto out_err;
	}
L
Linus Torvalds 已提交
3533

3534 3535
	printk(KERN_CONT "\n");

L
Linus Torvalds 已提交
3536 3537 3538 3539 3540
	/* 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;

3541 3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552
	list_add_tail(&new_smi->link, &smi_infos);

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

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

3553
	printk(KERN_INFO PFX "Trying %s-specified %s state"
3554 3555
	       " machine at %s address 0x%lx, slave address 0x%x,"
	       " irq %d\n",
3556
	       ipmi_addr_src_to_str(new_smi->addr_source),
3557 3558 3559 3560 3561
	       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);

3562 3563
	switch (new_smi->si_type) {
	case SI_KCS:
L
Linus Torvalds 已提交
3564
		new_smi->handlers = &kcs_smi_handlers;
3565 3566 3567
		break;

	case SI_SMIC:
L
Linus Torvalds 已提交
3568
		new_smi->handlers = &smic_smi_handlers;
3569 3570 3571
		break;

	case SI_BT:
L
Linus Torvalds 已提交
3572
		new_smi->handlers = &bt_smi_handlers;
3573 3574 3575
		break;

	default:
L
Linus Torvalds 已提交
3576 3577 3578 3579 3580 3581 3582
		/* 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);
3583
	if (!new_smi->si_sm) {
3584 3585
		printk(KERN_ERR PFX
		       "Could not allocate state machine memory\n");
L
Linus Torvalds 已提交
3586 3587 3588 3589 3590 3591 3592 3593 3594
		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) {
3595
		printk(KERN_ERR PFX "Could not set up I/O space\n");
L
Linus Torvalds 已提交
3596 3597 3598 3599 3600
		goto out_err;
	}

	/* Do low-level detection first. */
	if (new_smi->handlers->detect(new_smi->si_sm)) {
3601
		if (new_smi->addr_source)
3602
			printk(KERN_INFO PFX "Interface detection failed\n");
L
Linus Torvalds 已提交
3603 3604 3605 3606
		rv = -ENODEV;
		goto out_err;
	}

3607 3608 3609 3610
	/*
	 * Attempt a get device id command.  If it fails, we probably
	 * don't have a BMC here.
	 */
L
Linus Torvalds 已提交
3611
	rv = try_get_dev_id(new_smi);
3612 3613
	if (rv) {
		if (new_smi->addr_source)
3614
			printk(KERN_INFO PFX "There appears to be no BMC"
3615
			       " at this location\n");
L
Linus Torvalds 已提交
3616
		goto out_err;
3617
	}
L
Linus Torvalds 已提交
3618

3619
	setup_oem_data_handler(new_smi);
3620
	setup_xaction_handlers(new_smi);
3621
	check_for_broken_irqs(new_smi);
3622

3623
	new_smi->waiting_msg = NULL;
L
Linus Torvalds 已提交
3624 3625
	new_smi->curr_msg = NULL;
	atomic_set(&new_smi->req_events, 0);
C
Corey Minyard 已提交
3626
	new_smi->run_to_completion = false;
3627 3628
	for (i = 0; i < SI_NUM_STATS; i++)
		atomic_set(&new_smi->stats[i], 0);
L
Linus Torvalds 已提交
3629

C
Corey Minyard 已提交
3630
	new_smi->interrupt_disabled = true;
3631
	atomic_set(&new_smi->need_watch, 0);
3632 3633
	new_smi->intf_num = smi_num;
	smi_num++;
L
Linus Torvalds 已提交
3634

3635 3636
	rv = try_enable_event_buffer(new_smi);
	if (rv == 0)
C
Corey Minyard 已提交
3637
		new_smi->has_event_buffer = true;
3638

3639 3640 3641 3642
	/*
	 * Start clearing the flags before we enable interrupts or the
	 * timer to avoid racing with the timer.
	 */
3643
	start_clear_flags(new_smi, false);
3644 3645 3646 3647 3648 3649 3650 3651 3652

	/*
	 * IRQ is defined to be set when non-zero.  req_events will
	 * cause a global flags check that will enable interrupts.
	 */
	if (new_smi->irq) {
		new_smi->interrupt_disabled = false;
		atomic_set(&new_smi->req_events, 1);
	}
L
Linus Torvalds 已提交
3653

3654
	if (!new_smi->dev) {
3655 3656 3657 3658
		/*
		 * If we don't already have a device from something
		 * else (like PCI), then register a new one.
		 */
3659 3660
		new_smi->pdev = platform_device_alloc("ipmi_si",
						      new_smi->intf_num);
C
Corey Minyard 已提交
3661
		if (!new_smi->pdev) {
3662 3663
			printk(KERN_ERR PFX
			       "Unable to allocate platform device\n");
3664
			goto out_err;
3665 3666
		}
		new_smi->dev = &new_smi->pdev->dev;
3667
		new_smi->dev->driver = &ipmi_driver.driver;
3668

3669
		rv = platform_device_add(new_smi->pdev);
3670
		if (rv) {
3671 3672
			printk(KERN_ERR PFX
			       "Unable to register system interface device:"
3673 3674
			       " %d\n",
			       rv);
3675
			goto out_err;
3676
		}
C
Corey Minyard 已提交
3677
		new_smi->dev_registered = true;
3678 3679
	}

L
Linus Torvalds 已提交
3680 3681
	rv = ipmi_register_smi(&handlers,
			       new_smi,
3682 3683
			       &new_smi->device_id,
			       new_smi->dev,
3684
			       new_smi->slave_addr);
L
Linus Torvalds 已提交
3685
	if (rv) {
3686 3687
		dev_err(new_smi->dev, "Unable to register device: error %d\n",
			rv);
L
Linus Torvalds 已提交
3688 3689 3690 3691
		goto out_err_stop_timer;
	}

	rv = ipmi_smi_add_proc_entry(new_smi->intf, "type",
3692
				     &smi_type_proc_ops,
3693
				     new_smi);
L
Linus Torvalds 已提交
3694
	if (rv) {
3695
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
L
Linus Torvalds 已提交
3696 3697 3698 3699
		goto out_err_stop_timer;
	}

	rv = ipmi_smi_add_proc_entry(new_smi->intf, "si_stats",
3700
				     &smi_si_stats_proc_ops,
3701
				     new_smi);
L
Linus Torvalds 已提交
3702
	if (rv) {
3703
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
L
Linus Torvalds 已提交
3704 3705 3706
		goto out_err_stop_timer;
	}

3707
	rv = ipmi_smi_add_proc_entry(new_smi->intf, "params",
3708
				     &smi_params_proc_ops,
3709
				     new_smi);
3710
	if (rv) {
3711
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
3712 3713 3714
		goto out_err_stop_timer;
	}

3715 3716
	dev_info(new_smi->dev, "IPMI %s interface initialized\n",
		 si_to_str[new_smi->si_type]);
L
Linus Torvalds 已提交
3717 3718 3719 3720

	return 0;

 out_err_stop_timer:
C
Corey Minyard 已提交
3721
	wait_for_timer_and_thread(new_smi);
L
Linus Torvalds 已提交
3722 3723

 out_err:
C
Corey Minyard 已提交
3724
	new_smi->interrupt_disabled = true;
3725 3726

	if (new_smi->intf) {
3727
		ipmi_smi_t intf = new_smi->intf;
3728
		new_smi->intf = NULL;
3729
		ipmi_unregister_smi(intf);
3730
	}
L
Linus Torvalds 已提交
3731

3732
	if (new_smi->irq_cleanup) {
3733
		new_smi->irq_cleanup(new_smi);
3734 3735
		new_smi->irq_cleanup = NULL;
	}
L
Linus Torvalds 已提交
3736

3737 3738 3739 3740 3741
	/*
	 * Wait until we know that we are out of any interrupt
	 * handlers might have been running before we freed the
	 * interrupt.
	 */
3742
	synchronize_sched();
L
Linus Torvalds 已提交
3743 3744 3745 3746 3747

	if (new_smi->si_sm) {
		if (new_smi->handlers)
			new_smi->handlers->cleanup(new_smi->si_sm);
		kfree(new_smi->si_sm);
3748
		new_smi->si_sm = NULL;
L
Linus Torvalds 已提交
3749
	}
3750
	if (new_smi->addr_source_cleanup) {
3751
		new_smi->addr_source_cleanup(new_smi);
3752 3753 3754
		new_smi->addr_source_cleanup = NULL;
	}
	if (new_smi->io_cleanup) {
P
Paolo Galtieri 已提交
3755
		new_smi->io_cleanup(new_smi);
3756 3757
		new_smi->io_cleanup = NULL;
	}
L
Linus Torvalds 已提交
3758

3759
	if (new_smi->dev_registered) {
3760
		platform_device_unregister(new_smi->pdev);
C
Corey Minyard 已提交
3761
		new_smi->dev_registered = false;
3762
	}
3763

L
Linus Torvalds 已提交
3764 3765 3766
	return rv;
}

B
Bill Pemberton 已提交
3767
static int init_ipmi_si(void)
L
Linus Torvalds 已提交
3768 3769 3770
{
	int  i;
	char *str;
3771
	int  rv;
3772
	struct smi_info *e;
3773
	enum ipmi_addr_src type = SI_INVALID;
L
Linus Torvalds 已提交
3774 3775 3776 3777 3778

	if (initialized)
		return 0;
	initialized = 1;

3779 3780 3781 3782 3783 3784 3785
	if (si_tryplatform) {
		rv = platform_driver_register(&ipmi_driver);
		if (rv) {
			printk(KERN_ERR PFX "Unable to register "
			       "driver: %d\n", rv);
			return rv;
		}
3786 3787
	}

L
Linus Torvalds 已提交
3788 3789 3790
	/* Parse out the si_type string into its components. */
	str = si_type_str;
	if (*str != '\0') {
C
Corey Minyard 已提交
3791
		for (i = 0; (i < SI_MAX_PARMS) && (*str != '\0'); i++) {
L
Linus Torvalds 已提交
3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802
			si_type[i] = str;
			str = strchr(str, ',');
			if (str) {
				*str = '\0';
				str++;
			} else {
				break;
			}
		}
	}

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

3805
	/* If the user gave us a device, they presumably want us to use it */
3806
	if (!hardcode_find_bmc())
3807 3808
		return 0;

3809
#ifdef CONFIG_PCI
3810 3811 3812 3813 3814 3815
	if (si_trypci) {
		rv = pci_register_driver(&ipmi_pci_driver);
		if (rv)
			printk(KERN_ERR PFX "Unable to register "
			       "PCI driver: %d\n", rv);
		else
C
Corey Minyard 已提交
3816
			pci_registered = true;
3817
	}
3818 3819
#endif

3820
#ifdef CONFIG_DMI
3821 3822
	if (si_trydmi)
		dmi_find_bmc();
3823 3824 3825
#endif

#ifdef CONFIG_ACPI
3826 3827
	if (si_tryacpi)
		spmi_find_bmc();
3828 3829
#endif

3830 3831
#ifdef CONFIG_PARISC
	register_parisc_driver(&ipmi_parisc_driver);
C
Corey Minyard 已提交
3832
	parisc_registered = true;
3833 3834 3835 3836
	/* poking PC IO addresses will crash machine, don't do it */
	si_trydefaults = 0;
#endif

3837 3838 3839 3840
	/* We prefer devices with interrupts, but in the case of a machine
	   with multiple BMCs we assume that there will be several instances
	   of a given type so if we succeed in registering a type then also
	   try to register everything else of the same type */
3841

3842 3843
	mutex_lock(&smi_infos_lock);
	list_for_each_entry(e, &smi_infos, link) {
3844 3845 3846 3847
		/* Try to register a device if it has an IRQ and we either
		   haven't successfully registered a device yet or this
		   device has the same type as one we successfully registered */
		if (e->irq && (!type || e->addr_source == type)) {
3848
			if (!try_smi_init(e)) {
3849
				type = e->addr_source;
3850 3851 3852 3853
			}
		}
	}

3854 3855 3856 3857 3858 3859
	/* type will only have been set if we successfully registered an si */
	if (type) {
		mutex_unlock(&smi_infos_lock);
		return 0;
	}

3860 3861 3862
	/* Fall back to the preferred device */

	list_for_each_entry(e, &smi_infos, link) {
3863
		if (!e->irq && (!type || e->addr_source == type)) {
3864
			if (!try_smi_init(e)) {
3865
				type = e->addr_source;
3866 3867
			}
		}
3868 3869 3870
	}
	mutex_unlock(&smi_infos_lock);

3871 3872 3873
	if (type)
		return 0;

3874
	if (si_trydefaults) {
3875
		mutex_lock(&smi_infos_lock);
3876 3877
		if (list_empty(&smi_infos)) {
			/* No BMC was found, try defaults. */
3878
			mutex_unlock(&smi_infos_lock);
3879
			default_find_bmc();
3880
		} else
3881
			mutex_unlock(&smi_infos_lock);
L
Linus Torvalds 已提交
3882 3883
	}

3884
	mutex_lock(&smi_infos_lock);
3885
	if (unload_when_empty && list_empty(&smi_infos)) {
3886
		mutex_unlock(&smi_infos_lock);
3887
		cleanup_ipmi_si();
3888 3889
		printk(KERN_WARNING PFX
		       "Unable to find any System Interface(s)\n");
L
Linus Torvalds 已提交
3890
		return -ENODEV;
3891
	} else {
3892
		mutex_unlock(&smi_infos_lock);
3893
		return 0;
L
Linus Torvalds 已提交
3894 3895 3896 3897
	}
}
module_init(init_ipmi_si);

3898
static void cleanup_one_si(struct smi_info *to_clean)
L
Linus Torvalds 已提交
3899
{
3900
	int           rv = 0;
L
Linus Torvalds 已提交
3901

3902
	if (!to_clean)
L
Linus Torvalds 已提交
3903 3904
		return;

3905 3906 3907 3908 3909 3910 3911 3912 3913 3914 3915
	if (to_clean->intf) {
		ipmi_smi_t intf = to_clean->intf;

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

3916 3917 3918
	if (to_clean->dev)
		dev_set_drvdata(to_clean->dev, NULL);

3919 3920
	list_del(&to_clean->link);

3921
	/*
3922 3923
	 * Make sure that interrupts, the timer and the thread are
	 * stopped and will not run again.
3924
	 */
3925 3926
	if (to_clean->irq_cleanup)
		to_clean->irq_cleanup(to_clean);
C
Corey Minyard 已提交
3927
	wait_for_timer_and_thread(to_clean);
L
Linus Torvalds 已提交
3928

3929 3930
	/*
	 * Timeouts are stopped, now make sure the interrupts are off
3931 3932
	 * in the BMC.  Note that timers and CPU interrupts are off,
	 * so no need for locks.
3933
	 */
C
Corey Minyard 已提交
3934 3935 3936 3937
	while (to_clean->curr_msg || (to_clean->si_state != SI_NORMAL)) {
		poll(to_clean);
		schedule_timeout_uninterruptible(1);
	}
3938
	disable_si_irq(to_clean, false);
C
Corey Minyard 已提交
3939
	while (to_clean->curr_msg || (to_clean->si_state != SI_NORMAL)) {
L
Linus Torvalds 已提交
3940
		poll(to_clean);
3941
		schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
3942 3943
	}

3944 3945
	if (to_clean->handlers)
		to_clean->handlers->cleanup(to_clean->si_sm);
L
Linus Torvalds 已提交
3946 3947 3948

	kfree(to_clean->si_sm);

3949 3950
	if (to_clean->addr_source_cleanup)
		to_clean->addr_source_cleanup(to_clean);
P
Paolo Galtieri 已提交
3951 3952
	if (to_clean->io_cleanup)
		to_clean->io_cleanup(to_clean);
3953 3954 3955 3956 3957

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

	kfree(to_clean);
L
Linus Torvalds 已提交
3958 3959
}

3960
static void cleanup_ipmi_si(void)
L
Linus Torvalds 已提交
3961
{
3962
	struct smi_info *e, *tmp_e;
L
Linus Torvalds 已提交
3963

3964
	if (!initialized)
L
Linus Torvalds 已提交
3965 3966
		return;

3967
#ifdef CONFIG_PCI
3968 3969
	if (pci_registered)
		pci_unregister_driver(&ipmi_pci_driver);
3970
#endif
3971 3972 3973 3974
#ifdef CONFIG_PARISC
	if (parisc_registered)
		unregister_parisc_driver(&ipmi_parisc_driver);
#endif
3975

3976
	platform_driver_unregister(&ipmi_driver);
3977

3978
	mutex_lock(&smi_infos_lock);
3979 3980
	list_for_each_entry_safe(e, tmp_e, &smi_infos, link)
		cleanup_one_si(e);
3981
	mutex_unlock(&smi_infos_lock);
L
Linus Torvalds 已提交
3982 3983 3984 3985
}
module_exit(cleanup_ipmi_si);

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