ipmi_si_intf.c 98.1 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
static char *si_to_str[] = { "kcs", "smic", "bt" };
L
Linus Torvalds 已提交
109

110 111
#define DEVICE_NAME "ipmi_si"

112
static struct platform_driver ipmi_driver;
113 114 115 116

/*
 * Indexes into stats[] in smi_info below.
 */
117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137
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,
138

139 140 141 142 143 144 145 146 147 148 149 150 151 152 153
	/* 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,

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


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

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

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

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

194 195 196 197 198
	/*
	 * 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 已提交
199 200 201
#define RECEIVE_MSG_AVAIL	0x01
#define EVENT_MSG_BUFFER_FULL	0x02
#define WDT_PRE_TIMEOUT_INT	0x08
202 203 204 205
#define OEM0_DATA_AVAIL     0x20
#define OEM1_DATA_AVAIL     0x40
#define OEM2_DATA_AVAIL     0x80
#define OEM_DATA_AVAIL      (OEM0_DATA_AVAIL | \
206 207
			     OEM1_DATA_AVAIL | \
			     OEM2_DATA_AVAIL)
L
Linus Torvalds 已提交
208 209
	unsigned char       msg_flags;

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

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

219 220 221 222 223
	/*
	 * 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 已提交
224
	bool                run_to_completion;
L
Linus Torvalds 已提交
225 226 227 228

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

229 230 231 232 233
	/*
	 * 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 已提交
234 235 236 237 238 239 240 241
	unsigned int        spacing;

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

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

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

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

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

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

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

264
	/*
265 266 267 268 269 270 271
	 * 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.
272
	 */
273 274 275 276 277 278 279
	bool cannot_disable_irq;

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

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

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

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

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

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

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

305
	struct task_struct *thread;
306 307

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

311 312 313 314 315
#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]))

316 317 318 319
#define SI_MAX_PARMS 4

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

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

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

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

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

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

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

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

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

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

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

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

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

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

415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436
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 已提交
437 438 439 440 441 442
{
	unsigned char msg[2];

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

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

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

459 460 461 462
	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 已提交
463 464 465
	smi_info->si_state = SI_CLEARING_FLAGS;
}

C
Corey Minyard 已提交
466 467 468 469 470 471
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;

472 473
	start_new_msg(smi_info, smi_info->curr_msg->data,
		      smi_info->curr_msg->data_size);
C
Corey Minyard 已提交
474 475 476 477 478 479 480 481 482
	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;

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

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

C
Corey Minyard 已提交
507
static inline bool enable_si_irq(struct smi_info *smi_info)
L
Linus Torvalds 已提交
508 509
{
	if ((smi_info->irq) && (smi_info->interrupt_disabled)) {
C
Corey Minyard 已提交
510
		smi_info->interrupt_disabled = false;
511
		start_check_enables(smi_info, true);
C
Corey Minyard 已提交
512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528
		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) {
529
		if (!disable_si_irq(smi_info, true))
C
Corey Minyard 已提交
530 531 532 533
			smi_info->si_state = SI_NORMAL;
	} else if (enable_si_irq(smi_info)) {
		ipmi_free_smi_msg(msg);
		msg = NULL;
L
Linus Torvalds 已提交
534
	}
C
Corey Minyard 已提交
535
	return msg;
L
Linus Torvalds 已提交
536 537 538 539
}

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

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

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

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

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

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

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

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

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

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

597 598 599
	return enables;
}

600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615
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 已提交
616 617 618 619
static void handle_transaction_done(struct smi_info *smi_info)
{
	struct ipmi_smi_msg *msg;

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

632 633 634 635 636
		/*
		 * 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 已提交
637 638 639 640 641 642 643 644 645 646 647 648 649
		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) {
650
			/* Error fetching flags, just give up for now. */
L
Linus Torvalds 已提交
651 652
			smi_info->si_state = SI_NORMAL;
		} else if (len < 4) {
653 654 655 656
			/*
			 * Hmm, no flags.  That's technically illegal, but
			 * don't use uninitialized data.
			 */
L
Linus Torvalds 已提交
657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672
			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 */
673 674
			dev_warn(smi_info->dev,
				 "Error clearing flags: %2.2x\n", msg[2]);
L
Linus Torvalds 已提交
675
		}
676
		smi_info->si_state = SI_NORMAL;
L
Linus Torvalds 已提交
677 678 679 680 681 682 683 684 685 686 687
		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);

688 689 690 691 692
		/*
		 * 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 已提交
693 694 695 696 697 698 699 700 701 702
		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 {
703
			smi_inc_stat(smi_info, events);
L
Linus Torvalds 已提交
704

705 706 707 708 709 710
			/*
			 * 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 已提交
711 712 713 714 715 716 717 718 719 720 721 722 723 724 725
			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);

726 727 728 729 730
		/*
		 * 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 已提交
731 732 733 734 735 736 737 738 739 740
		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 {
741
			smi_inc_stat(smi_info, incoming_messages);
L
Linus Torvalds 已提交
742

743 744 745 746 747 748
			/*
			 * 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 已提交
749 750 751 752 753 754 755
			handle_flags(smi_info);

			deliver_recv_msg(smi_info, msg);
		}
		break;
	}

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

		/* 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) {
765 766 767 768
			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 已提交
769
			smi_info->si_state = SI_NORMAL;
770 771
			break;
		}
772 773 774 775
		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);
776 777
		if (enables != (msg[3] & GLOBAL_ENABLES_MASK)) {
			/* Enables are not correct, fix them. */
L
Linus Torvalds 已提交
778 779
			msg[0] = (IPMI_NETFN_APP_REQUEST << 2);
			msg[1] = IPMI_SET_BMC_GLOBAL_ENABLES_CMD;
780
			msg[2] = enables | (msg[3] & ~GLOBAL_ENABLES_MASK);
L
Linus Torvalds 已提交
781 782
			smi_info->handlers->start_transaction(
				smi_info->si_sm, msg, 3);
783 784 785 786 787 788 789 790 791 792
			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 已提交
793 794 795 796
		}
		break;
	}

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

		smi_info->handlers->get_result(smi_info->si_sm, msg, 4);
802
		if (msg[2] != 0)
803
			dev_warn(smi_info->dev,
804 805 806 807 808 809 810 811 812 813
				 "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 已提交
814
		} else {
815
			smi_info->si_state = SI_NORMAL;
C
Corey Minyard 已提交
816 817 818
		}
		break;
	}
L
Linus Torvalds 已提交
819 820 821
	}
}

822 823 824 825 826
/*
 * 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 已提交
827 828 829 830 831 832
static enum si_sm_result smi_event_handler(struct smi_info *smi_info,
					   int time)
{
	enum si_sm_result si_sm_result;

 restart:
833 834 835 836 837 838 839 840
	/*
	 * 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 已提交
841 842 843 844 845
	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);

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

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

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

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

878 879 880 881 882 883 884 885 886
		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 已提交
887

888 889 890 891 892 893 894 895 896
			/*
			 * 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 已提交
897

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

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

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

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

921 922 923 924 925 926 927
		/*
		 * 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) {
928
			start_check_enables(smi_info, true);
929 930 931 932
		} else {
			smi_info->curr_msg = alloc_msg_handle_irq(smi_info);
			if (!smi_info->curr_msg)
				goto out;
L
Linus Torvalds 已提交
933

934 935
			start_getting_events(smi_info);
		}
L
Linus Torvalds 已提交
936 937
		goto restart;
	}
C
Corey Minyard 已提交
938
 out:
L
Linus Torvalds 已提交
939 940 941
	return si_sm_result;
}

942 943 944 945 946 947 948 949 950 951 952 953 954
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);
	}
}

955
static void flush_messages(void *send_info)
956
{
957
	struct smi_info *smi_info = send_info;
958 959 960 961 962 963 964 965 966 967 968 969 970
	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 已提交
971
static void sender(void                *send_info,
972
		   struct ipmi_smi_msg *msg)
L
Linus Torvalds 已提交
973 974 975 976
{
	struct smi_info   *smi_info = send_info;
	unsigned long     flags;

977
	debug_timestamp("Enqueue");
L
Linus Torvalds 已提交
978 979

	if (smi_info->run_to_completion) {
C
Corey Minyard 已提交
980
		/*
981 982
		 * If we are running to completion, start it.  Upper
		 * layer will call flush_messages to clear it out.
C
Corey Minyard 已提交
983
		 */
984
		smi_info->waiting_msg = msg;
L
Linus Torvalds 已提交
985 986 987
		return;
	}

C
Corey Minyard 已提交
988
	spin_lock_irqsave(&smi_info->si_lock, flags);
989 990 991 992 993 994 995 996 997
	/*
	 * 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;
998
	check_start_timer_thread(smi_info);
C
Corey Minyard 已提交
999
	spin_unlock_irqrestore(&smi_info->si_lock, flags);
L
Linus Torvalds 已提交
1000 1001
}

C
Corey Minyard 已提交
1002
static void set_run_to_completion(void *send_info, bool i_run_to_completion)
L
Linus Torvalds 已提交
1003 1004 1005 1006
{
	struct smi_info   *smi_info = send_info;

	smi_info->run_to_completion = i_run_to_completion;
1007 1008
	if (i_run_to_completion)
		flush_messages(smi_info);
L
Linus Torvalds 已提交
1009 1010
}

1011 1012 1013 1014 1015
/*
 * 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
 */
1016
static inline void ipmi_si_set_not_busy(struct timespec64 *ts)
1017 1018 1019
{
	ts->tv_nsec = -1;
}
1020
static inline int ipmi_si_is_busy(struct timespec64 *ts)
1021 1022 1023 1024
{
	return ts->tv_nsec != -1;
}

1025 1026
static inline int ipmi_thread_busy_wait(enum si_sm_result smi_result,
					const struct smi_info *smi_info,
1027
					struct timespec64 *busy_until)
1028 1029 1030 1031 1032 1033 1034 1035
{
	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)) {
1036 1037
		getnstimeofday64(busy_until);
		timespec64_add_ns(busy_until, max_busy_us*NSEC_PER_USEC);
1038
	} else {
1039 1040 1041 1042
		struct timespec64 now;

		getnstimeofday64(&now);
		if (unlikely(timespec64_compare(&now, busy_until) > 0)) {
1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059
			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 已提交
1060 1061 1062
static int ipmi_thread(void *data)
{
	struct smi_info *smi_info = data;
M
Matt Domsch 已提交
1063
	unsigned long flags;
C
Corey Minyard 已提交
1064
	enum si_sm_result smi_result;
1065
	struct timespec64 busy_until;
C
Corey Minyard 已提交
1066

1067
	ipmi_si_set_not_busy(&busy_until);
1068
	set_user_nice(current, MAX_NICE);
M
Matt Domsch 已提交
1069
	while (!kthread_should_stop()) {
1070 1071
		int busy_wait;

C
Corey Minyard 已提交
1072
		spin_lock_irqsave(&(smi_info->si_lock), flags);
1073
		smi_result = smi_event_handler(smi_info, 0);
1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084

		/*
		 * 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 已提交
1085
		spin_unlock_irqrestore(&(smi_info->si_lock), flags);
1086 1087
		busy_wait = ipmi_thread_busy_wait(smi_result, smi_info,
						  &busy_until);
1088 1089
		if (smi_result == SI_SM_CALL_WITHOUT_DELAY)
			; /* do nothing */
1090
		else if (smi_result == SI_SM_CALL_WITH_DELAY && busy_wait)
1091
			schedule();
1092 1093 1094 1095 1096 1097 1098 1099 1100
		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
1101
			schedule_timeout_interruptible(1);
C
Corey Minyard 已提交
1102 1103 1104 1105 1106
	}
	return 0;
}


L
Linus Torvalds 已提交
1107 1108 1109
static void poll(void *send_info)
{
	struct smi_info *smi_info = send_info;
C
Corey Minyard 已提交
1110
	unsigned long flags = 0;
C
Corey Minyard 已提交
1111
	bool run_to_completion = smi_info->run_to_completion;
L
Linus Torvalds 已提交
1112

C
Corey Minyard 已提交
1113 1114 1115 1116 1117
	/*
	 * Make sure there is some delay in the poll loop so we can
	 * drive time forward and timeout things.
	 */
	udelay(10);
C
Corey Minyard 已提交
1118 1119
	if (!run_to_completion)
		spin_lock_irqsave(&smi_info->si_lock, flags);
C
Corey Minyard 已提交
1120
	smi_event_handler(smi_info, 10);
C
Corey Minyard 已提交
1121 1122
	if (!run_to_completion)
		spin_unlock_irqrestore(&smi_info->si_lock, flags);
L
Linus Torvalds 已提交
1123 1124 1125 1126 1127 1128
}

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

1129
	if (!smi_info->has_event_buffer)
1130 1131
		return;

L
Linus Torvalds 已提交
1132 1133 1134
	atomic_set(&smi_info->req_events, 1);
}

C
Corey Minyard 已提交
1135
static void set_need_watch(void *send_info, bool enable)
1136 1137 1138 1139 1140 1141 1142 1143 1144 1145
{
	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 已提交
1146
static int initialized;
L
Linus Torvalds 已提交
1147 1148 1149 1150 1151 1152 1153

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 已提交
1154
	long              time_diff;
M
Matthew Garrett 已提交
1155
	long		  timeout;
L
Linus Torvalds 已提交
1156 1157

	spin_lock_irqsave(&(smi_info->si_lock), flags);
1158 1159
	debug_timestamp("Timer");

L
Linus Torvalds 已提交
1160
	jiffies_now = jiffies;
C
Corey Minyard 已提交
1161
	time_diff = (((long)jiffies_now - (long)smi_info->last_timeout_jiffies)
L
Linus Torvalds 已提交
1162 1163 1164
		     * SI_USEC_PER_JIFFY);
	smi_result = smi_event_handler(smi_info, time_diff);

1165
	if ((smi_info->irq) && (!smi_info->interrupt_disabled)) {
L
Linus Torvalds 已提交
1166
		/* Running with interrupts, only do long timeouts. */
M
Matthew Garrett 已提交
1167
		timeout = jiffies + SI_TIMEOUT_JIFFIES;
1168
		smi_inc_stat(smi_info, long_timeouts);
M
Matthew Garrett 已提交
1169
		goto do_mod_timer;
L
Linus Torvalds 已提交
1170 1171
	}

1172 1173 1174 1175
	/*
	 * If the state machine asks for a short delay, then shorten
	 * the timer timeout.
	 */
L
Linus Torvalds 已提交
1176
	if (smi_result == SI_SM_CALL_WITH_DELAY) {
1177
		smi_inc_stat(smi_info, short_timeouts);
M
Matthew Garrett 已提交
1178
		timeout = jiffies + 1;
L
Linus Torvalds 已提交
1179
	} else {
1180
		smi_inc_stat(smi_info, long_timeouts);
M
Matthew Garrett 已提交
1181
		timeout = jiffies + SI_TIMEOUT_JIFFIES;
L
Linus Torvalds 已提交
1182 1183
	}

M
Matthew Garrett 已提交
1184 1185
 do_mod_timer:
	if (smi_result != SI_SM_IDLE)
1186 1187 1188 1189
		smi_mod_timer(smi_info, timeout);
	else
		smi_info->timer_running = false;
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);
L
Linus Torvalds 已提交
1190 1191
}

1192
static irqreturn_t si_irq_handler(int irq, void *data)
L
Linus Torvalds 已提交
1193 1194 1195 1196 1197 1198
{
	struct smi_info *smi_info = data;
	unsigned long   flags;

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

1199
	smi_inc_stat(smi_info, interrupts);
L
Linus Torvalds 已提交
1200

1201 1202
	debug_timestamp("Interrupt");

L
Linus Torvalds 已提交
1203 1204 1205 1206 1207
	smi_event_handler(smi_info, 0);
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);
	return IRQ_HANDLED;
}

1208
static irqreturn_t si_bt_irq_handler(int irq, void *data)
1209 1210 1211 1212 1213 1214
{
	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);
1215
	return si_irq_handler(irq, data);
1216 1217
}

1218 1219 1220 1221
static int smi_start_processing(void       *send_info,
				ipmi_smi_t intf)
{
	struct smi_info *new_smi = send_info;
1222
	int             enable = 0;
1223 1224 1225

	new_smi->intf = intf;

C
Corey Minyard 已提交
1226 1227 1228 1229
	/* Try to claim any interrupts. */
	if (new_smi->irq_setup)
		new_smi->irq_setup(new_smi);

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

1234 1235 1236 1237 1238
	/*
	 * Check if the user forcefully enabled the daemon.
	 */
	if (new_smi->intf_num < num_force_kipmid)
		enable = force_kipmid[new_smi->intf_num];
1239 1240 1241 1242
	/*
	 * The BT interface is efficient enough to not need a thread,
	 * and there is no need for a thread if we have interrupts.
	 */
1243
	else if ((new_smi->si_type != SI_BT) && (!new_smi->irq))
1244 1245 1246
		enable = 1;

	if (enable) {
1247 1248 1249
		new_smi->thread = kthread_run(ipmi_thread, new_smi,
					      "kipmi%d", new_smi->intf_num);
		if (IS_ERR(new_smi->thread)) {
1250 1251 1252 1253
			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));
1254 1255 1256 1257 1258 1259
			new_smi->thread = NULL;
		}
	}

	return 0;
}
1260

1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272
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 已提交
1273
static void set_maintenance_mode(void *send_info, bool enable)
C
Corey Minyard 已提交
1274 1275 1276 1277 1278 1279 1280
{
	struct smi_info   *smi_info = send_info;

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

1281
static const struct ipmi_smi_handlers handlers = {
L
Linus Torvalds 已提交
1282
	.owner                  = THIS_MODULE,
1283
	.start_processing       = smi_start_processing,
1284
	.get_smi_info		= get_smi_info,
L
Linus Torvalds 已提交
1285 1286
	.sender			= sender,
	.request_events		= request_events,
1287
	.set_need_watch		= set_need_watch,
C
Corey Minyard 已提交
1288
	.set_maintenance_mode   = set_maintenance_mode,
L
Linus Torvalds 已提交
1289
	.set_run_to_completion  = set_run_to_completion,
1290
	.flush_messages		= flush_messages,
L
Linus Torvalds 已提交
1291 1292 1293
	.poll			= poll,
};

1294 1295 1296 1297
/*
 * 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 已提交
1298

1299
static LIST_HEAD(smi_infos);
1300
static DEFINE_MUTEX(smi_infos_lock);
1301
static int smi_num; /* Used to sequence the SMIs */
L
Linus Torvalds 已提交
1302 1303

#define DEFAULT_REGSPACING	1
1304
#define DEFAULT_REGSIZE		1
L
Linus Torvalds 已提交
1305

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

1335 1336
#define IPMI_IO_ADDR_SPACE  0
#define IPMI_MEM_ADDR_SPACE 1
C
Corey Minyard 已提交
1337
static char *addr_space_to_str[] = { "i/o", "mem" };
1338 1339 1340 1341 1342 1343 1344

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

1346 1347 1348 1349 1350 1351 1352 1353 1354 1355
#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
1356 1357 1358 1359 1360 1361 1362 1363 1364
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 已提交
1365 1366 1367 1368 1369 1370 1371 1372 1373
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");
1374
module_param_array(addrs, ulong, &num_addrs, 0);
L
Linus Torvalds 已提交
1375 1376 1377 1378
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.");
1379
module_param_array(ports, uint, &num_ports, 0);
L
Linus Torvalds 已提交
1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410
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.");
1411 1412 1413 1414
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 已提交
1415
module_param(unload_when_empty, bool, 0);
1416 1417 1418
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.");
1419 1420 1421 1422 1423
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 已提交
1424 1425


1426
static void std_irq_cleanup(struct smi_info *info)
L
Linus Torvalds 已提交
1427
{
1428 1429 1430 1431
	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 已提交
1432 1433 1434 1435 1436 1437
}

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

1438
	if (!info->irq)
L
Linus Torvalds 已提交
1439 1440
		return 0;

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

	return rv;
}

1470
static unsigned char port_inb(const struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1471
{
1472
	unsigned int addr = io->addr_data;
L
Linus Torvalds 已提交
1473

1474
	return inb(addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1475 1476
}

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

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

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

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

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

1497
	outw(b << io->regshift, addr + (offset * io->regspacing));
L
Linus Torvalds 已提交
1498 1499
}

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

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

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

1512
	outl(b << io->regshift, addr+(offset * io->regspacing));
L
Linus Torvalds 已提交
1513 1514 1515 1516
}

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

1520
	if (addr) {
1521
		for (idx = 0; idx < info->io_size; idx++)
1522 1523
			release_region(addr + idx * info->io.regspacing,
				       info->io.regsize);
L
Linus Torvalds 已提交
1524 1525 1526 1527 1528
	}
}

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

1532
	if (!addr)
L
Linus Torvalds 已提交
1533 1534 1535 1536
		return -ENODEV;

	info->io_cleanup = port_cleanup;

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

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

1580 1581
static unsigned char intf_mem_inb(const struct si_sm_io *io,
				  unsigned int offset)
L
Linus Torvalds 已提交
1582 1583 1584 1585
{
	return readb((io->addr)+(offset * io->regspacing));
}

1586 1587
static void intf_mem_outb(const struct si_sm_io *io, unsigned int offset,
			  unsigned char b)
L
Linus Torvalds 已提交
1588 1589 1590 1591
{
	writeb(b, (io->addr)+(offset * io->regspacing));
}

1592 1593
static unsigned char intf_mem_inw(const struct si_sm_io *io,
				  unsigned int offset)
L
Linus Torvalds 已提交
1594 1595
{
	return (readw((io->addr)+(offset * io->regspacing)) >> io->regshift)
1596
		& 0xff;
L
Linus Torvalds 已提交
1597 1598
}

1599 1600
static void intf_mem_outw(const struct si_sm_io *io, unsigned int offset,
			  unsigned char b)
L
Linus Torvalds 已提交
1601 1602 1603 1604
{
	writeb(b << io->regshift, (io->addr)+(offset * io->regspacing));
}

1605 1606
static unsigned char intf_mem_inl(const struct si_sm_io *io,
				  unsigned int offset)
L
Linus Torvalds 已提交
1607 1608
{
	return (readl((io->addr)+(offset * io->regspacing)) >> io->regshift)
1609
		& 0xff;
L
Linus Torvalds 已提交
1610 1611
}

1612 1613
static void intf_mem_outl(const struct si_sm_io *io, unsigned int offset,
			  unsigned char b)
L
Linus Torvalds 已提交
1614 1615 1616 1617 1618
{
	writel(b << io->regshift, (io->addr)+(offset * io->regspacing));
}

#ifdef readq
1619
static unsigned char mem_inq(const struct si_sm_io *io, unsigned int offset)
L
Linus Torvalds 已提交
1620 1621
{
	return (readq((io->addr)+(offset * io->regspacing)) >> io->regshift)
1622
		& 0xff;
L
Linus Torvalds 已提交
1623 1624
}

1625
static void mem_outq(const struct si_sm_io *io, unsigned int offset,
L
Linus Torvalds 已提交
1626 1627 1628 1629 1630 1631 1632 1633
		     unsigned char b)
{
	writeq(b << io->regshift, (io->addr)+(offset * io->regspacing));
}
#endif

static void mem_cleanup(struct smi_info *info)
{
1634
	unsigned long addr = info->io.addr_data;
L
Linus Torvalds 已提交
1635 1636 1637 1638 1639 1640 1641 1642
	int           mapsize;

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

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

1643
		release_mem_region(addr, mapsize);
L
Linus Torvalds 已提交
1644 1645 1646 1647 1648
	}
}

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

1652
	if (!addr)
L
Linus Torvalds 已提交
1653 1654 1655 1656
		return -ENODEV;

	info->io_cleanup = mem_cleanup;

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

1686 1687
	/*
	 * Calculate the total amount of memory to claim.  This is an
L
Linus Torvalds 已提交
1688 1689 1690
	 * 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
1691 1692
	 * register.
	 */
L
Linus Torvalds 已提交
1693 1694 1695
	mapsize = ((info->io_size * info->io.regspacing)
		   - (info->io.regspacing - info->io.regsize));

1696
	if (request_mem_region(addr, mapsize, DEVICE_NAME) == NULL)
L
Linus Torvalds 已提交
1697 1698
		return -EIO;

1699
	info->io.addr = ioremap(addr, mapsize);
L
Linus Torvalds 已提交
1700
	if (info->io.addr == NULL) {
1701
		release_mem_region(addr, mapsize);
L
Linus Torvalds 已提交
1702 1703 1704 1705 1706
		return -EIO;
	}
	return 0;
}

1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737
/*
 * Parms come in as <op1>[:op2[:op3...]].  ops are:
 *   add|remove,kcs|bt|smic,mem|i/o,<address>[,<opt1>[,<opt2>[,...]]]
 * Options are:
 *   rsp=<regspacing>
 *   rsi=<regsize>
 *   rsh=<regshift>
 *   irq=<irq>
 *   ipmb=<ipmb addr>
 */
enum hotmod_op { HM_ADD, HM_REMOVE };
struct hotmod_vals {
	char *name;
	int  val;
};
static struct hotmod_vals hotmod_ops[] = {
	{ "add",	HM_ADD },
	{ "remove",	HM_REMOVE },
	{ NULL }
};
static struct hotmod_vals hotmod_si[] = {
	{ "kcs",	SI_KCS },
	{ "smic",	SI_SMIC },
	{ "bt",		SI_BT },
	{ NULL }
};
static struct hotmod_vals hotmod_as[] = {
	{ "mem",	IPMI_MEM_ADDR_SPACE },
	{ "i/o",	IPMI_IO_ADDR_SPACE },
	{ NULL }
};
C
Corey Minyard 已提交
1738

1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750
static int parse_str(struct hotmod_vals *v, int *val, char *name, char **curr)
{
	char *s;
	int  i;

	s = strchr(*curr, ',');
	if (!s) {
		printk(KERN_WARNING PFX "No hotmod %s given.\n", name);
		return -EINVAL;
	}
	*s = '\0';
	s++;
C
Corey Minyard 已提交
1751
	for (i = 0; v[i].name; i++) {
C
Corey Minyard 已提交
1752
		if (strcmp(*curr, v[i].name) == 0) {
1753 1754 1755 1756 1757 1758 1759 1760 1761 1762
			*val = v[i].val;
			*curr = s;
			return 0;
		}
	}

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

C
Corey Minyard 已提交
1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786
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;
}

1787 1788 1789 1790
static struct smi_info *smi_info_alloc(void)
{
	struct smi_info *info = kzalloc(sizeof(*info), GFP_KERNEL);

C
Corey Minyard 已提交
1791
	if (info)
1792 1793 1794 1795
		spin_lock_init(&info->si_lock);
	return info;
}

1796 1797 1798
static int hotmod_handler(const char *val, struct kernel_param *kp)
{
	char *str = kstrdup(val, GFP_KERNEL);
C
Corey Minyard 已提交
1799
	int  rv;
1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810
	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 已提交
1811
	int len;
1812 1813 1814 1815 1816 1817
	struct smi_info *info;

	if (!str)
		return -ENOMEM;

	/* Kill any trailing spaces, as we can get a "\n" from echo. */
C
Corey Minyard 已提交
1818 1819
	len = strlen(str);
	ival = len - 1;
1820 1821 1822 1823 1824 1825 1826 1827 1828 1829
	while ((ival >= 0) && isspace(str[ival])) {
		str[ival] = '\0';
		ival--;
	}

	for (curr = str; curr; curr = next) {
		regspacing = 1;
		regsize = 1;
		regshift = 0;
		irq = 0;
1830
		ipmb = 0; /* Choose the default if not specified */
1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875

		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 已提交
1876 1877
			rv = check_hotmod_int_op(curr, o, "rsp", &regspacing);
			if (rv < 0)
1878
				goto out;
C
Corey Minyard 已提交
1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906
			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;
1907 1908 1909
		}

		if (op == HM_ADD) {
1910
			info = smi_info_alloc();
1911 1912 1913 1914 1915
			if (!info) {
				rv = -ENOMEM;
				goto out;
			}

1916
			info->addr_source = SI_HOTMOD;
1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937
			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 已提交
1938 1939
			rv = add_smi(info);
			if (rv) {
1940
				kfree(info);
C
Corey Minyard 已提交
1941 1942 1943 1944 1945 1946
				goto out;
			}
			rv = try_smi_init(info);
			if (rv) {
				cleanup_one_si(info);
				goto out;
1947
			}
1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963
		} 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 已提交
1964
	rv = len;
1965 1966 1967 1968
 out:
	kfree(str);
	return rv;
}
1969

B
Bill Pemberton 已提交
1970
static int hardcode_find_bmc(void)
L
Linus Torvalds 已提交
1971
{
1972
	int ret = -ENODEV;
1973
	int             i;
L
Linus Torvalds 已提交
1974 1975
	struct smi_info *info;

1976 1977 1978
	for (i = 0; i < SI_MAX_PARMS; i++) {
		if (!ports[i] && !addrs[i])
			continue;
L
Linus Torvalds 已提交
1979

1980
		info = smi_info_alloc();
1981
		if (!info)
1982
			return -ENOMEM;
L
Linus Torvalds 已提交
1983

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

C
Corey Minyard 已提交
1987
		if (!si_type[i] || strcmp(si_type[i], "kcs") == 0) {
1988
			info->si_type = SI_KCS;
C
Corey Minyard 已提交
1989
		} else if (strcmp(si_type[i], "smic") == 0) {
1990
			info->si_type = SI_SMIC;
C
Corey Minyard 已提交
1991
		} else if (strcmp(si_type[i], "bt") == 0) {
1992 1993
			info->si_type = SI_BT;
		} else {
1994
			printk(KERN_WARNING PFX "Interface type specified "
1995 1996 1997 1998 1999
			       "for interface %d, was invalid: %s\n",
			       i, si_type[i]);
			kfree(info);
			continue;
		}
L
Linus Torvalds 已提交
2000

2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011
		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 {
2012 2013 2014
			printk(KERN_WARNING PFX "Interface type specified "
			       "for interface %d, but port and address were "
			       "not set or set to zero.\n", i);
2015 2016 2017
			kfree(info);
			continue;
		}
L
Linus Torvalds 已提交
2018

2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029
		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;
2030
		info->slave_addr = slave_addrs[i];
L
Linus Torvalds 已提交
2031

2032
		if (!add_smi(info)) {
2033 2034
			if (try_smi_init(info))
				cleanup_one_si(info);
2035
			ret = 0;
2036 2037 2038
		} else {
			kfree(info);
		}
2039
	}
2040
	return ret;
2041
}
L
Linus Torvalds 已提交
2042

2043
#ifdef CONFIG_ACPI
L
Linus Torvalds 已提交
2044 2045 2046

#include <linux/acpi.h>

2047 2048 2049 2050 2051
/*
 * 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 已提交
2052
static int acpi_failure;
L
Linus Torvalds 已提交
2053 2054

/* For GPE-type interrupts. */
2055 2056
static u32 ipmi_acpi_gpe(acpi_handle gpe_device,
	u32 gpe_number, void *context)
L
Linus Torvalds 已提交
2057 2058 2059 2060 2061 2062
{
	struct smi_info *smi_info = context;
	unsigned long   flags;

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

2063
	smi_inc_stat(smi_info, interrupts);
L
Linus Torvalds 已提交
2064

2065 2066
	debug_timestamp("ACPI_GPE");

L
Linus Torvalds 已提交
2067 2068 2069 2070 2071 2072
	smi_event_handler(smi_info, 0);
	spin_unlock_irqrestore(&(smi_info->si_lock), flags);

	return ACPI_INTERRUPT_HANDLED;
}

2073 2074 2075 2076 2077 2078 2079 2080
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 已提交
2081 2082 2083 2084
static int acpi_gpe_irq_setup(struct smi_info *info)
{
	acpi_status status;

2085
	if (!info->irq)
L
Linus Torvalds 已提交
2086 2087 2088 2089 2090 2091 2092 2093
		return 0;

	status = acpi_install_gpe_handler(NULL,
					  info->irq,
					  ACPI_GPE_LEVEL_TRIGGERED,
					  &ipmi_acpi_gpe,
					  info);
	if (status != AE_OK) {
2094 2095
		dev_warn(info->dev, "%s unable to claim ACPI GPE %d,"
			 " running polled\n", DEVICE_NAME, info->irq);
L
Linus Torvalds 已提交
2096 2097 2098
		info->irq = 0;
		return -EINVAL;
	} else {
2099
		info->irq_cleanup = acpi_gpe_irq_cleanup;
2100
		dev_info(info->dev, "Using ACPI GPE %d\n", info->irq);
L
Linus Torvalds 已提交
2101 2102 2103 2104 2105 2106
		return 0;
	}
}

/*
 * Defined at
2107
 * http://h21007.www2.hp.com/portal/download/files/unprot/hpspmi.pdf
L
Linus Torvalds 已提交
2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128
 */
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;

2129 2130 2131 2132
	/*
	 * If bit 0 of InterruptType is set, then this is the SCI
	 * interrupt in the GPEx_STS register.
	 */
L
Linus Torvalds 已提交
2133 2134 2135 2136
	u8	GPE;

	s16	Reserved;

2137 2138 2139 2140
	/*
	 * If bit 1 of InterruptType is set, then this is the I/O
	 * APIC/SAPIC interrupt.
	 */
L
Linus Torvalds 已提交
2141 2142 2143 2144 2145 2146 2147 2148 2149 2150
	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 已提交
2151
static int try_init_spmi(struct SPMITable *spmi)
L
Linus Torvalds 已提交
2152 2153
{
	struct smi_info  *info;
C
Corey Minyard 已提交
2154
	int rv;
L
Linus Torvalds 已提交
2155 2156

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

2161
	info = smi_info_alloc();
2162
	if (!info) {
2163
		printk(KERN_ERR PFX "Could not allocate SI data (3)\n");
2164 2165 2166
		return -ENOMEM;
	}

2167
	info->addr_source = SI_SPMI;
2168
	printk(KERN_INFO PFX "probing via SPMI\n");
L
Linus Torvalds 已提交
2169 2170

	/* Figure out the interface type. */
2171
	switch (spmi->InterfaceType) {
L
Linus Torvalds 已提交
2172
	case 1:	/* KCS */
2173
		info->si_type = SI_KCS;
L
Linus Torvalds 已提交
2174 2175
		break;
	case 2:	/* SMIC */
2176
		info->si_type = SI_SMIC;
L
Linus Torvalds 已提交
2177 2178
		break;
	case 3:	/* BT */
2179
		info->si_type = SI_BT;
L
Linus Torvalds 已提交
2180
		break;
2181 2182 2183
	case 4: /* SSIF, just ignore */
		kfree(info);
		return -EIO;
L
Linus Torvalds 已提交
2184
	default:
2185 2186
		printk(KERN_INFO PFX "Unknown ACPI/SPMI SI type %d\n",
		       spmi->InterfaceType);
2187
		kfree(info);
L
Linus Torvalds 已提交
2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204
		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;
	}

2205
	if (spmi->addr.bit_width) {
2206
		/* A (hopefully) properly formed register bit width. */
2207
		info->io.regspacing = spmi->addr.bit_width / 8;
2208 2209 2210
	} else {
		info->io.regspacing = DEFAULT_REGSPACING;
	}
2211
	info->io.regsize = info->io.regspacing;
2212
	info->io.regshift = spmi->addr.bit_offset;
L
Linus Torvalds 已提交
2213

2214
	if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_MEMORY) {
L
Linus Torvalds 已提交
2215
		info->io_setup = mem_setup;
2216
		info->io.addr_type = IPMI_MEM_ADDR_SPACE;
2217
	} else if (spmi->addr.space_id == ACPI_ADR_SPACE_SYSTEM_IO) {
L
Linus Torvalds 已提交
2218
		info->io_setup = port_setup;
2219
		info->io.addr_type = IPMI_IO_ADDR_SPACE;
L
Linus Torvalds 已提交
2220 2221
	} else {
		kfree(info);
2222
		printk(KERN_WARNING PFX "Unknown ACPI I/O Address type\n");
L
Linus Torvalds 已提交
2223 2224
		return -EIO;
	}
2225
	info->io.addr_data = spmi->addr.address;
L
Linus Torvalds 已提交
2226

2227 2228 2229 2230 2231
	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 已提交
2232 2233
	rv = add_smi(info);
	if (rv)
2234
		kfree(info);
L
Linus Torvalds 已提交
2235

C
Corey Minyard 已提交
2236
	return rv;
L
Linus Torvalds 已提交
2237
}
2238

B
Bill Pemberton 已提交
2239
static void spmi_find_bmc(void)
2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251
{
	acpi_status      status;
	struct SPMITable *spmi;
	int              i;

	if (acpi_disabled)
		return;

	if (acpi_failure)
		return;

	for (i = 0; ; i++) {
2252 2253
		status = acpi_get_table(ACPI_SIG_SPMI, i+1,
					(struct acpi_table_header **)&spmi);
2254 2255 2256
		if (status != AE_OK)
			return;

2257
		try_init_spmi(spmi);
2258 2259
	}
}
L
Linus Torvalds 已提交
2260 2261
#endif

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

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

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

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

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

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

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

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

2331
	return 0;
L
Linus Torvalds 已提交
2332 2333
}

B
Bill Pemberton 已提交
2334
static void try_init_dmi(struct dmi_ipmi_data *ipmi_data)
L
Linus Torvalds 已提交
2335
{
2336
	struct smi_info *info;
L
Linus Torvalds 已提交
2337

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

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

C
Corey Minyard 已提交
2347
	switch (ipmi_data->type) {
2348 2349 2350 2351 2352 2353 2354 2355 2356 2357
	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:
2358
		kfree(info);
2359
		return;
L
Linus Torvalds 已提交
2360 2361
	}

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

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

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

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

	info->slave_addr = ipmi_data->slave_addr;

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

2393 2394 2395 2396 2397
	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);

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

B
Bill Pemberton 已提交
2402
static void dmi_find_bmc(void)
2403
{
2404
	const struct dmi_device *dev = NULL;
2405 2406 2407 2408
	struct dmi_ipmi_data data;
	int                  rv;

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

#ifdef CONFIG_PCI

2420 2421 2422 2423 2424 2425 2426
#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 已提交
2427 2428 2429 2430
#define PCI_HP_VENDOR_ID    0x103C
#define PCI_MMC_DEVICE_ID   0x121A
#define PCI_MMC_ADDR_CW     0x10

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

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

B
Bill Pemberton 已提交
2438
static int ipmi_pci_probe_regspacing(struct smi_info *info)
2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469
{
	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 已提交
2470
static int ipmi_pci_probe(struct pci_dev *pdev,
2471
				    const struct pci_device_id *ent)
L
Linus Torvalds 已提交
2472
{
2473 2474 2475
	int rv;
	int class_type = pdev->class & PCI_ERMC_CLASSCODE_TYPE_MASK;
	struct smi_info *info;
L
Linus Torvalds 已提交
2476

2477
	info = smi_info_alloc();
2478
	if (!info)
2479
		return -ENOMEM;
L
Linus Torvalds 已提交
2480

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

2484 2485 2486 2487
	switch (class_type) {
	case PCI_ERMC_CLASSCODE_TYPE_SMIC:
		info->si_type = SI_SMIC;
		break;
L
Linus Torvalds 已提交
2488

2489 2490 2491 2492 2493 2494 2495 2496 2497 2498
	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);
2499
		dev_info(&pdev->dev, "Unknown IPMI type: %d\n", class_type);
2500
		return -ENOMEM;
L
Linus Torvalds 已提交
2501 2502
	}

2503 2504
	rv = pci_enable_device(pdev);
	if (rv) {
2505
		dev_err(&pdev->dev, "couldn't enable PCI device\n");
2506 2507
		kfree(info);
		return rv;
L
Linus Torvalds 已提交
2508 2509
	}

2510 2511
	info->addr_source_cleanup = ipmi_pci_cleanup;
	info->addr_source_data = pdev;
L
Linus Torvalds 已提交
2512

2513 2514 2515 2516 2517 2518
	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 已提交
2519
	}
2520
	info->io.addr_data = pci_resource_start(pdev, 0);
L
Linus Torvalds 已提交
2521

2522 2523
	info->io.regspacing = ipmi_pci_probe_regspacing(info);
	info->io.regsize = DEFAULT_REGSIZE;
2524
	info->io.regshift = 0;
L
Linus Torvalds 已提交
2525

2526 2527 2528
	info->irq = pdev->irq;
	if (info->irq)
		info->irq_setup = std_irq_setup;
L
Linus Torvalds 已提交
2529

2530
	info->dev = &pdev->dev;
C
Corey Minyard 已提交
2531
	pci_set_drvdata(pdev, info);
2532

2533 2534 2535 2536
	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 已提交
2537 2538
	rv = add_smi(info);
	if (rv) {
2539
		kfree(info);
C
Corey Minyard 已提交
2540 2541
		pci_disable_device(pdev);
	}
2542

C
Corey Minyard 已提交
2543
	return rv;
2544
}
L
Linus Torvalds 已提交
2545

B
Bill Pemberton 已提交
2546
static void ipmi_pci_remove(struct pci_dev *pdev)
2547
{
C
Corey Minyard 已提交
2548 2549
	struct smi_info *info = pci_get_drvdata(pdev);
	cleanup_one_si(info);
C
Corey Minyard 已提交
2550
	pci_disable_device(pdev);
2551
}
L
Linus Torvalds 已提交
2552

2553
static const struct pci_device_id ipmi_pci_devices[] = {
2554
	{ PCI_DEVICE(PCI_HP_VENDOR_ID, PCI_MMC_DEVICE_ID) },
2555 2556
	{ PCI_DEVICE_CLASS(PCI_ERMC_CLASSCODE, PCI_ERMC_CLASSCODE_MASK) },
	{ 0, }
2557 2558 2559 2560
};
MODULE_DEVICE_TABLE(pci, ipmi_pci_devices);

static struct pci_driver ipmi_pci_driver = {
2561 2562 2563
	.name =         DEVICE_NAME,
	.id_table =     ipmi_pci_devices,
	.probe =        ipmi_pci_probe,
2564
	.remove =       ipmi_pci_remove,
2565 2566
};
#endif /* CONFIG_PCI */
L
Linus Torvalds 已提交
2567

2568
#ifdef CONFIG_OF
2569 2570 2571 2572 2573 2574 2575 2576 2577 2578 2579 2580
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 },
	{},
};

static int of_ipmi_probe(struct platform_device *dev)
{
2581
	const struct of_device_id *match;
2582 2583
	struct smi_info *info;
	struct resource resource;
2584
	const __be32 *regsize, *regspacing, *regshift;
2585
	struct device_node *np = dev->dev.of_node;
2586 2587 2588
	int ret;
	int proplen;

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

2591
	match = of_match_device(of_ipmi_match, &dev->dev);
2592
	if (!match)
2593
		return -ENODEV;
2594

2595 2596 2597
	if (!of_device_is_available(np))
		return -EINVAL;

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

2604
	regsize = of_get_property(np, "reg-size", &proplen);
2605 2606 2607 2608 2609
	if (regsize && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regsize from OF\n");
		return -EINVAL;
	}

2610
	regspacing = of_get_property(np, "reg-spacing", &proplen);
2611 2612 2613 2614 2615
	if (regspacing && proplen != 4) {
		dev_warn(&dev->dev, PFX "invalid regspacing from OF\n");
		return -EINVAL;
	}

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

2622
	info = smi_info_alloc();
2623 2624 2625

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

2630
	info->si_type		= (enum si_type) match->data;
2631
	info->addr_source	= SI_DEVICETREE;
2632 2633
	info->irq_setup		= std_irq_setup;

2634 2635 2636 2637 2638 2639 2640 2641
	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;
	}

2642 2643
	info->io.addr_data	= resource.start;

2644 2645 2646
	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;
2647

2648
	info->irq		= irq_of_parse_and_map(dev->dev.of_node, 0);
2649 2650
	info->dev		= &dev->dev;

2651
	dev_dbg(&dev->dev, "addr 0x%lx regsize %d spacing %d irq %d\n",
2652 2653 2654
		info->io.addr_data, info->io.regsize, info->io.regspacing,
		info->irq);

2655
	dev_set_drvdata(&dev->dev, info);
2656

C
Corey Minyard 已提交
2657 2658
	ret = add_smi(info);
	if (ret) {
2659
		kfree(info);
C
Corey Minyard 已提交
2660
		return ret;
2661 2662
	}
	return 0;
2663
}
2664
MODULE_DEVICE_TABLE(of, of_ipmi_match);
2665 2666 2667 2668 2669 2670 2671
#else
#define of_ipmi_match NULL
static int of_ipmi_probe(struct platform_device *dev)
{
	return -ENODEV;
}
#endif
2672

2673 2674
#ifdef CONFIG_ACPI
static int acpi_ipmi_probe(struct platform_device *dev)
2675
{
2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 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
	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;
}

2783
static const struct acpi_device_id acpi_ipmi_match[] = {
2784 2785 2786 2787 2788 2789 2790 2791 2792
	{ "IPI0001", 0 },
	{ },
};
MODULE_DEVICE_TABLE(acpi, acpi_ipmi_match);
#else
static int acpi_ipmi_probe(struct platform_device *dev)
{
	return -ENODEV;
}
2793
#endif
2794 2795 2796 2797 2798 2799 2800

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

	return acpi_ipmi_probe(dev);
2801 2802
}

2803
static int ipmi_remove(struct platform_device *dev)
2804
{
2805 2806
	struct smi_info *info = dev_get_drvdata(&dev->dev);

2807
	cleanup_one_si(info);
2808 2809
	return 0;
}
2810

2811
static struct platform_driver ipmi_driver = {
2812
	.driver = {
2813
		.name = DEVICE_NAME,
2814 2815
		.of_match_table = of_ipmi_match,
		.acpi_match_table = ACPI_PTR(acpi_ipmi_match),
2816
	},
2817
	.probe		= ipmi_probe,
2818
	.remove		= ipmi_remove,
2819 2820
};

2821 2822 2823 2824
#ifdef CONFIG_PARISC
static int ipmi_parisc_probe(struct parisc_device *dev)
{
	struct smi_info *info;
2825
	int rv;
2826 2827 2828 2829 2830 2831 2832 2833 2834 2835 2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848 2849 2850

	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 已提交
2851 2852
	rv = add_smi(info);
	if (rv) {
2853
		kfree(info);
C
Corey Minyard 已提交
2854
		return rv;
2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878
	}

	return 0;
}

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

static struct parisc_device_id ipmi_parisc_tbl[] = {
	{ 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 */

2879
static int wait_for_msg_done(struct smi_info *smi_info)
L
Linus Torvalds 已提交
2880
{
2881
	enum si_sm_result     smi_result;
L
Linus Torvalds 已提交
2882 2883

	smi_result = smi_info->handlers->event(smi_info->si_sm, 0);
2884
	for (;;) {
C
Corey Minyard 已提交
2885 2886
		if (smi_result == SI_SM_CALL_WITH_DELAY ||
		    smi_result == SI_SM_CALL_WITH_TICK_DELAY) {
2887
			schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
2888
			smi_result = smi_info->handlers->event(
2889
				smi_info->si_sm, jiffies_to_usecs(1));
2890
		} else if (smi_result == SI_SM_CALL_WITHOUT_DELAY) {
L
Linus Torvalds 已提交
2891 2892
			smi_result = smi_info->handlers->event(
				smi_info->si_sm, 0);
2893
		} else
L
Linus Torvalds 已提交
2894 2895
			break;
	}
2896
	if (smi_result == SI_SM_HOSED)
2897 2898 2899 2900
		/*
		 * We couldn't get the state machine to run, so whatever's at
		 * the port is probably not an IPMI SMI interface.
		 */
2901 2902 2903 2904 2905 2906 2907 2908 2909 2910 2911 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926
		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 已提交
2927 2928 2929 2930 2931
		goto out;

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

C
Corey Minyard 已提交
2932 2933
	/* 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 已提交
2934 2935 2936 2937 2938 2939

 out:
	kfree(resp);
	return rv;
}

2940
static int get_global_enables(struct smi_info *smi_info, u8 *enables)
2941 2942 2943 2944 2945 2946 2947
{
	unsigned char         msg[3];
	unsigned char         *resp;
	unsigned long         resp_len;
	int                   rv;

	resp = kmalloc(IPMI_MAX_MSG_LENGTH, GFP_KERNEL);
2948 2949
	if (!resp)
		return -ENOMEM;
2950 2951 2952 2953 2954 2955 2956

	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) {
2957 2958 2959
		dev_warn(smi_info->dev,
			 "Error getting response from get global enables command: %d\n",
			 rv);
2960 2961 2962 2963 2964 2965 2966 2967 2968 2969
		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) {
2970 2971 2972
		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]);
2973 2974
		rv = -EINVAL;
		goto out;
2975 2976
	} else {
		*enables = resp[3];
2977 2978
	}

2979 2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996
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;
2997 2998 2999

	msg[0] = IPMI_NETFN_APP_REQUEST << 2;
	msg[1] = IPMI_SET_BMC_GLOBAL_ENABLES_CMD;
3000
	msg[2] = enables;
3001 3002 3003 3004
	smi_info->handlers->start_transaction(smi_info->si_sm, msg, 3);

	rv = wait_for_msg_done(smi_info);
	if (rv) {
3005 3006 3007
		dev_warn(smi_info->dev,
			 "Error getting response from set global enables command: %d\n",
			 rv);
3008 3009 3010 3011 3012 3013 3014 3015 3016
		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) {
3017 3018 3019
		dev_warn(smi_info->dev,
			 "Invalid return from set global enables command: %ld %x %x\n",
			 resp_len, resp[0], resp[1]);
3020 3021 3022 3023
		rv = -EINVAL;
		goto out;
	}

3024 3025 3026 3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037 3038 3039 3040 3041 3042 3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058
	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) {
3059 3060 3061 3062
		/*
		 * An error when setting the event buffer bit means
		 * clearing the bit is not supported.
		 */
3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074 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
		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;
3103 3104 3105
	}
}

3106 3107 3108 3109 3110 3111 3112 3113 3114 3115 3116 3117 3118 3119 3120 3121 3122
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) {
3123 3124
		printk(KERN_WARNING PFX "Error getting response from get"
		       " global enables command, the event buffer is not"
3125 3126 3127 3128 3129 3130 3131 3132 3133 3134 3135
		       " 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) {
3136 3137
		printk(KERN_WARNING PFX "Invalid return from get global"
		       " enables command, cannot enable the event buffer.\n");
3138 3139 3140 3141
		rv = -EINVAL;
		goto out;
	}

3142
	if (resp[3] & IPMI_BMC_EVT_MSG_BUFF) {
3143
		/* buffer is already enabled, nothing to do. */
3144
		smi_info->supports_event_msg_buff = true;
3145
		goto out;
3146
	}
3147 3148 3149 3150 3151 3152 3153 3154

	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) {
3155 3156
		printk(KERN_WARNING PFX "Error getting response from set"
		       " global, enables command, the event buffer is not"
3157 3158 3159 3160 3161 3162 3163 3164 3165 3166
		       " 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) {
3167 3168
		printk(KERN_WARNING PFX "Invalid return from get global,"
		       "enables command, not enable the event buffer.\n");
3169 3170 3171 3172 3173 3174 3175 3176 3177 3178
		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;
3179 3180 3181
	else
		smi_info->supports_event_msg_buff = true;

3182 3183 3184 3185 3186
 out:
	kfree(resp);
	return rv;
}

3187
static int smi_type_proc_show(struct seq_file *m, void *v)
L
Linus Torvalds 已提交
3188
{
3189
	struct smi_info *smi = m->private;
L
Linus Torvalds 已提交
3190

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

3193
	return 0;
L
Linus Torvalds 已提交
3194 3195
}

3196
static int smi_type_proc_open(struct inode *inode, struct file *file)
L
Linus Torvalds 已提交
3197
{
A
Al Viro 已提交
3198
	return single_open(file, smi_type_proc_show, PDE_DATA(inode));
3199 3200 3201 3202 3203 3204 3205 3206 3207 3208 3209 3210
}

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

3212
	seq_printf(m, "interrupts_enabled:    %d\n",
3213
		       smi->irq && !smi->interrupt_disabled);
3214
	seq_printf(m, "short_timeouts:        %u\n",
3215
		       smi_get_stat(smi, short_timeouts));
3216
	seq_printf(m, "long_timeouts:         %u\n",
3217
		       smi_get_stat(smi, long_timeouts));
3218
	seq_printf(m, "idles:                 %u\n",
3219
		       smi_get_stat(smi, idles));
3220
	seq_printf(m, "interrupts:            %u\n",
3221
		       smi_get_stat(smi, interrupts));
3222
	seq_printf(m, "attentions:            %u\n",
3223
		       smi_get_stat(smi, attentions));
3224
	seq_printf(m, "flag_fetches:          %u\n",
3225
		       smi_get_stat(smi, flag_fetches));
3226
	seq_printf(m, "hosed_count:           %u\n",
3227
		       smi_get_stat(smi, hosed_count));
3228
	seq_printf(m, "complete_transactions: %u\n",
3229
		       smi_get_stat(smi, complete_transactions));
3230
	seq_printf(m, "events:                %u\n",
3231
		       smi_get_stat(smi, events));
3232
	seq_printf(m, "watchdog_pretimeouts:  %u\n",
3233
		       smi_get_stat(smi, watchdog_pretimeouts));
3234
	seq_printf(m, "incoming_messages:     %u\n",
3235
		       smi_get_stat(smi, incoming_messages));
3236 3237
	return 0;
}
L
Linus Torvalds 已提交
3238

3239 3240
static int smi_si_stats_proc_open(struct inode *inode, struct file *file)
{
A
Al Viro 已提交
3241
	return single_open(file, smi_si_stats_proc_show, PDE_DATA(inode));
3242 3243
}

3244 3245 3246 3247 3248 3249 3250 3251
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)
3252
{
3253
	struct smi_info *smi = m->private;
3254

3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265
	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);

3266
	return 0;
L
Linus Torvalds 已提交
3267 3268
}

3269 3270
static int smi_params_proc_open(struct inode *inode, struct file *file)
{
A
Al Viro 已提交
3271
	return single_open(file, smi_params_proc_show, PDE_DATA(inode));
3272 3273 3274 3275 3276 3277 3278 3279 3280
}

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

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

3342 3343 3344 3345 3346
#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 已提交
3347
	/* Make it a response */
3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 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
	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;
3401
	if (id->manufacturer_id == DELL_IANA_MFR_ID &&
3402 3403 3404 3405
	    smi_info->si_type == SI_BT)
		register_xaction_notifier(&dell_poweredge_bt_xaction_notifier);
}

3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418
/*
 * 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);
}

3419 3420 3421 3422 3423
static void setup_xaction_handlers(struct smi_info *smi_info)
{
	setup_dell_poweredge_bt_xaction_handler(smi_info);
}

3424 3425 3426 3427 3428 3429
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 已提交
3430 3431
static inline void wait_for_timer_and_thread(struct smi_info *smi_info)
{
3432 3433 3434
	if (smi_info->thread != NULL)
		kthread_stop(smi_info->thread);
	if (smi_info->timer_running)
3435
		del_timer_sync(&smi_info->si_timer);
C
Corey Minyard 已提交
3436 3437
}

3438
static const struct ipmi_default_vals
3439 3440 3441
{
	int type;
	int port;
3442
} ipmi_defaults[] =
3443 3444 3445 3446 3447 3448 3449
{
	{ .type = SI_KCS, .port = 0xca2 },
	{ .type = SI_SMIC, .port = 0xca9 },
	{ .type = SI_BT, .port = 0xe4 },
	{ .port = 0 }
};

B
Bill Pemberton 已提交
3450
static void default_find_bmc(void)
3451 3452 3453 3454 3455 3456 3457
{
	struct smi_info *info;
	int             i;

	for (i = 0; ; i++) {
		if (!ipmi_defaults[i].port)
			break;
3458
#ifdef CONFIG_PPC
3459 3460 3461
		if (check_legacy_ioport(ipmi_defaults[i].port))
			continue;
#endif
3462
		info = smi_info_alloc();
3463 3464
		if (!info)
			return;
3465

3466
		info->addr_source = SI_DEFAULT;
3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477

		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;

3478 3479 3480
		if (add_smi(info) == 0) {
			if ((try_smi_init(info)) == 0) {
				/* Found one... */
3481
				printk(KERN_INFO PFX "Found default %s"
3482 3483 3484 3485 3486 3487
				" 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);
3488 3489
		} else {
			kfree(info);
3490 3491 3492 3493 3494
		}
	}
}

static int is_new_interface(struct smi_info *info)
L
Linus Torvalds 已提交
3495
{
3496
	struct smi_info *e;
L
Linus Torvalds 已提交
3497

3498 3499 3500 3501 3502 3503
	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 已提交
3504

3505 3506
	return 1;
}
L
Linus Torvalds 已提交
3507

3508
static int add_smi(struct smi_info *new_smi)
3509
{
3510
	int rv = 0;
3511

3512
	printk(KERN_INFO PFX "Adding %s-specified %s state machine",
3513 3514
	       ipmi_addr_src_to_str(new_smi->addr_source),
	       si_to_str[new_smi->si_type]);
3515
	mutex_lock(&smi_infos_lock);
3516
	if (!is_new_interface(new_smi)) {
3517
		printk(KERN_CONT " duplicate interface\n");
3518 3519 3520
		rv = -EBUSY;
		goto out_err;
	}
L
Linus Torvalds 已提交
3521

3522 3523
	printk(KERN_CONT "\n");

L
Linus Torvalds 已提交
3524 3525 3526 3527 3528
	/* 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;

3529 3530 3531 3532 3533 3534 3535 3536 3537 3538 3539 3540
	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;

3541
	printk(KERN_INFO PFX "Trying %s-specified %s state"
3542 3543
	       " machine at %s address 0x%lx, slave address 0x%x,"
	       " irq %d\n",
3544
	       ipmi_addr_src_to_str(new_smi->addr_source),
3545 3546 3547 3548 3549
	       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);

3550 3551
	switch (new_smi->si_type) {
	case SI_KCS:
L
Linus Torvalds 已提交
3552
		new_smi->handlers = &kcs_smi_handlers;
3553 3554 3555
		break;

	case SI_SMIC:
L
Linus Torvalds 已提交
3556
		new_smi->handlers = &smic_smi_handlers;
3557 3558 3559
		break;

	case SI_BT:
L
Linus Torvalds 已提交
3560
		new_smi->handlers = &bt_smi_handlers;
3561 3562 3563
		break;

	default:
L
Linus Torvalds 已提交
3564 3565 3566 3567 3568 3569 3570
		/* 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);
3571
	if (!new_smi->si_sm) {
3572 3573
		printk(KERN_ERR PFX
		       "Could not allocate state machine memory\n");
L
Linus Torvalds 已提交
3574 3575 3576 3577 3578 3579 3580 3581 3582
		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) {
3583
		printk(KERN_ERR PFX "Could not set up I/O space\n");
L
Linus Torvalds 已提交
3584 3585 3586 3587 3588
		goto out_err;
	}

	/* Do low-level detection first. */
	if (new_smi->handlers->detect(new_smi->si_sm)) {
3589
		if (new_smi->addr_source)
3590
			printk(KERN_INFO PFX "Interface detection failed\n");
L
Linus Torvalds 已提交
3591 3592 3593 3594
		rv = -ENODEV;
		goto out_err;
	}

3595 3596 3597 3598
	/*
	 * Attempt a get device id command.  If it fails, we probably
	 * don't have a BMC here.
	 */
L
Linus Torvalds 已提交
3599
	rv = try_get_dev_id(new_smi);
3600 3601
	if (rv) {
		if (new_smi->addr_source)
3602
			printk(KERN_INFO PFX "There appears to be no BMC"
3603
			       " at this location\n");
L
Linus Torvalds 已提交
3604
		goto out_err;
3605
	}
L
Linus Torvalds 已提交
3606

3607
	setup_oem_data_handler(new_smi);
3608
	setup_xaction_handlers(new_smi);
3609
	check_for_broken_irqs(new_smi);
3610

3611
	new_smi->waiting_msg = NULL;
L
Linus Torvalds 已提交
3612 3613
	new_smi->curr_msg = NULL;
	atomic_set(&new_smi->req_events, 0);
C
Corey Minyard 已提交
3614
	new_smi->run_to_completion = false;
3615 3616
	for (i = 0; i < SI_NUM_STATS; i++)
		atomic_set(&new_smi->stats[i], 0);
L
Linus Torvalds 已提交
3617

C
Corey Minyard 已提交
3618
	new_smi->interrupt_disabled = true;
3619
	atomic_set(&new_smi->need_watch, 0);
3620 3621
	new_smi->intf_num = smi_num;
	smi_num++;
L
Linus Torvalds 已提交
3622

3623 3624
	rv = try_enable_event_buffer(new_smi);
	if (rv == 0)
C
Corey Minyard 已提交
3625
		new_smi->has_event_buffer = true;
3626

3627 3628 3629 3630
	/*
	 * Start clearing the flags before we enable interrupts or the
	 * timer to avoid racing with the timer.
	 */
3631
	start_clear_flags(new_smi, false);
3632 3633 3634 3635 3636 3637 3638 3639 3640

	/*
	 * 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 已提交
3641

3642
	if (!new_smi->dev) {
3643 3644 3645 3646
		/*
		 * If we don't already have a device from something
		 * else (like PCI), then register a new one.
		 */
3647 3648
		new_smi->pdev = platform_device_alloc("ipmi_si",
						      new_smi->intf_num);
C
Corey Minyard 已提交
3649
		if (!new_smi->pdev) {
3650 3651
			printk(KERN_ERR PFX
			       "Unable to allocate platform device\n");
3652
			goto out_err;
3653 3654
		}
		new_smi->dev = &new_smi->pdev->dev;
3655
		new_smi->dev->driver = &ipmi_driver.driver;
3656

3657
		rv = platform_device_add(new_smi->pdev);
3658
		if (rv) {
3659 3660
			printk(KERN_ERR PFX
			       "Unable to register system interface device:"
3661 3662
			       " %d\n",
			       rv);
3663
			goto out_err;
3664
		}
C
Corey Minyard 已提交
3665
		new_smi->dev_registered = true;
3666 3667
	}

L
Linus Torvalds 已提交
3668 3669
	rv = ipmi_register_smi(&handlers,
			       new_smi,
3670 3671
			       &new_smi->device_id,
			       new_smi->dev,
3672
			       new_smi->slave_addr);
L
Linus Torvalds 已提交
3673
	if (rv) {
3674 3675
		dev_err(new_smi->dev, "Unable to register device: error %d\n",
			rv);
L
Linus Torvalds 已提交
3676 3677 3678 3679
		goto out_err_stop_timer;
	}

	rv = ipmi_smi_add_proc_entry(new_smi->intf, "type",
3680
				     &smi_type_proc_ops,
3681
				     new_smi);
L
Linus Torvalds 已提交
3682
	if (rv) {
3683
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
L
Linus Torvalds 已提交
3684 3685 3686 3687
		goto out_err_stop_timer;
	}

	rv = ipmi_smi_add_proc_entry(new_smi->intf, "si_stats",
3688
				     &smi_si_stats_proc_ops,
3689
				     new_smi);
L
Linus Torvalds 已提交
3690
	if (rv) {
3691
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
L
Linus Torvalds 已提交
3692 3693 3694
		goto out_err_stop_timer;
	}

3695
	rv = ipmi_smi_add_proc_entry(new_smi->intf, "params",
3696
				     &smi_params_proc_ops,
3697
				     new_smi);
3698
	if (rv) {
3699
		dev_err(new_smi->dev, "Unable to create proc entry: %d\n", rv);
3700 3701 3702
		goto out_err_stop_timer;
	}

3703 3704
	dev_info(new_smi->dev, "IPMI %s interface initialized\n",
		 si_to_str[new_smi->si_type]);
L
Linus Torvalds 已提交
3705 3706 3707 3708

	return 0;

 out_err_stop_timer:
C
Corey Minyard 已提交
3709
	wait_for_timer_and_thread(new_smi);
L
Linus Torvalds 已提交
3710 3711

 out_err:
C
Corey Minyard 已提交
3712
	new_smi->interrupt_disabled = true;
3713 3714

	if (new_smi->intf) {
3715
		ipmi_smi_t intf = new_smi->intf;
3716
		new_smi->intf = NULL;
3717
		ipmi_unregister_smi(intf);
3718
	}
L
Linus Torvalds 已提交
3719

3720
	if (new_smi->irq_cleanup) {
3721
		new_smi->irq_cleanup(new_smi);
3722 3723
		new_smi->irq_cleanup = NULL;
	}
L
Linus Torvalds 已提交
3724

3725 3726 3727 3728 3729
	/*
	 * Wait until we know that we are out of any interrupt
	 * handlers might have been running before we freed the
	 * interrupt.
	 */
3730
	synchronize_sched();
L
Linus Torvalds 已提交
3731 3732 3733 3734 3735

	if (new_smi->si_sm) {
		if (new_smi->handlers)
			new_smi->handlers->cleanup(new_smi->si_sm);
		kfree(new_smi->si_sm);
3736
		new_smi->si_sm = NULL;
L
Linus Torvalds 已提交
3737
	}
3738
	if (new_smi->addr_source_cleanup) {
3739
		new_smi->addr_source_cleanup(new_smi);
3740 3741 3742
		new_smi->addr_source_cleanup = NULL;
	}
	if (new_smi->io_cleanup) {
P
Paolo Galtieri 已提交
3743
		new_smi->io_cleanup(new_smi);
3744 3745
		new_smi->io_cleanup = NULL;
	}
L
Linus Torvalds 已提交
3746

3747
	if (new_smi->dev_registered) {
3748
		platform_device_unregister(new_smi->pdev);
C
Corey Minyard 已提交
3749
		new_smi->dev_registered = false;
3750
	}
3751

L
Linus Torvalds 已提交
3752 3753 3754
	return rv;
}

B
Bill Pemberton 已提交
3755
static int init_ipmi_si(void)
L
Linus Torvalds 已提交
3756 3757 3758
{
	int  i;
	char *str;
3759
	int  rv;
3760
	struct smi_info *e;
3761
	enum ipmi_addr_src type = SI_INVALID;
L
Linus Torvalds 已提交
3762 3763 3764 3765 3766

	if (initialized)
		return 0;
	initialized = 1;

3767 3768 3769 3770 3771 3772 3773
	if (si_tryplatform) {
		rv = platform_driver_register(&ipmi_driver);
		if (rv) {
			printk(KERN_ERR PFX "Unable to register "
			       "driver: %d\n", rv);
			return rv;
		}
3774 3775
	}

L
Linus Torvalds 已提交
3776 3777 3778
	/* Parse out the si_type string into its components. */
	str = si_type_str;
	if (*str != '\0') {
C
Corey Minyard 已提交
3779
		for (i = 0; (i < SI_MAX_PARMS) && (*str != '\0'); i++) {
L
Linus Torvalds 已提交
3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790
			si_type[i] = str;
			str = strchr(str, ',');
			if (str) {
				*str = '\0';
				str++;
			} else {
				break;
			}
		}
	}

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

3793
	/* If the user gave us a device, they presumably want us to use it */
3794
	if (!hardcode_find_bmc())
3795 3796
		return 0;

3797
#ifdef CONFIG_PCI
3798 3799 3800 3801 3802 3803
	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 已提交
3804
			pci_registered = true;
3805
	}
3806 3807
#endif

3808
#ifdef CONFIG_DMI
3809 3810
	if (si_trydmi)
		dmi_find_bmc();
3811 3812 3813
#endif

#ifdef CONFIG_ACPI
3814 3815
	if (si_tryacpi)
		spmi_find_bmc();
3816 3817
#endif

3818 3819
#ifdef CONFIG_PARISC
	register_parisc_driver(&ipmi_parisc_driver);
C
Corey Minyard 已提交
3820
	parisc_registered = true;
3821 3822 3823 3824
	/* poking PC IO addresses will crash machine, don't do it */
	si_trydefaults = 0;
#endif

3825 3826 3827 3828
	/* 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 */
3829

3830 3831
	mutex_lock(&smi_infos_lock);
	list_for_each_entry(e, &smi_infos, link) {
3832 3833 3834 3835
		/* 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)) {
3836
			if (!try_smi_init(e)) {
3837
				type = e->addr_source;
3838 3839 3840 3841
			}
		}
	}

3842 3843 3844 3845 3846 3847
	/* type will only have been set if we successfully registered an si */
	if (type) {
		mutex_unlock(&smi_infos_lock);
		return 0;
	}

3848 3849 3850
	/* Fall back to the preferred device */

	list_for_each_entry(e, &smi_infos, link) {
3851
		if (!e->irq && (!type || e->addr_source == type)) {
3852
			if (!try_smi_init(e)) {
3853
				type = e->addr_source;
3854 3855
			}
		}
3856 3857 3858
	}
	mutex_unlock(&smi_infos_lock);

3859 3860 3861
	if (type)
		return 0;

3862
	if (si_trydefaults) {
3863
		mutex_lock(&smi_infos_lock);
3864 3865
		if (list_empty(&smi_infos)) {
			/* No BMC was found, try defaults. */
3866
			mutex_unlock(&smi_infos_lock);
3867
			default_find_bmc();
3868
		} else
3869
			mutex_unlock(&smi_infos_lock);
L
Linus Torvalds 已提交
3870 3871
	}

3872
	mutex_lock(&smi_infos_lock);
3873
	if (unload_when_empty && list_empty(&smi_infos)) {
3874
		mutex_unlock(&smi_infos_lock);
3875
		cleanup_ipmi_si();
3876 3877
		printk(KERN_WARNING PFX
		       "Unable to find any System Interface(s)\n");
L
Linus Torvalds 已提交
3878
		return -ENODEV;
3879
	} else {
3880
		mutex_unlock(&smi_infos_lock);
3881
		return 0;
L
Linus Torvalds 已提交
3882 3883 3884 3885
	}
}
module_init(init_ipmi_si);

3886
static void cleanup_one_si(struct smi_info *to_clean)
L
Linus Torvalds 已提交
3887
{
3888
	int           rv = 0;
L
Linus Torvalds 已提交
3889

3890
	if (!to_clean)
L
Linus Torvalds 已提交
3891 3892
		return;

3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903
	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);
		}
	}

3904 3905 3906
	if (to_clean->dev)
		dev_set_drvdata(to_clean->dev, NULL);

3907 3908
	list_del(&to_clean->link);

3909
	/*
3910 3911
	 * Make sure that interrupts, the timer and the thread are
	 * stopped and will not run again.
3912
	 */
3913 3914
	if (to_clean->irq_cleanup)
		to_clean->irq_cleanup(to_clean);
C
Corey Minyard 已提交
3915
	wait_for_timer_and_thread(to_clean);
L
Linus Torvalds 已提交
3916

3917 3918
	/*
	 * Timeouts are stopped, now make sure the interrupts are off
3919 3920
	 * in the BMC.  Note that timers and CPU interrupts are off,
	 * so no need for locks.
3921
	 */
C
Corey Minyard 已提交
3922 3923 3924 3925
	while (to_clean->curr_msg || (to_clean->si_state != SI_NORMAL)) {
		poll(to_clean);
		schedule_timeout_uninterruptible(1);
	}
3926
	disable_si_irq(to_clean, false);
C
Corey Minyard 已提交
3927
	while (to_clean->curr_msg || (to_clean->si_state != SI_NORMAL)) {
L
Linus Torvalds 已提交
3928
		poll(to_clean);
3929
		schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
3930 3931
	}

3932 3933
	if (to_clean->handlers)
		to_clean->handlers->cleanup(to_clean->si_sm);
L
Linus Torvalds 已提交
3934 3935 3936

	kfree(to_clean->si_sm);

3937 3938
	if (to_clean->addr_source_cleanup)
		to_clean->addr_source_cleanup(to_clean);
P
Paolo Galtieri 已提交
3939 3940
	if (to_clean->io_cleanup)
		to_clean->io_cleanup(to_clean);
3941 3942 3943 3944 3945

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

	kfree(to_clean);
L
Linus Torvalds 已提交
3946 3947
}

3948
static void cleanup_ipmi_si(void)
L
Linus Torvalds 已提交
3949
{
3950
	struct smi_info *e, *tmp_e;
L
Linus Torvalds 已提交
3951

3952
	if (!initialized)
L
Linus Torvalds 已提交
3953 3954
		return;

3955
#ifdef CONFIG_PCI
3956 3957
	if (pci_registered)
		pci_unregister_driver(&ipmi_pci_driver);
3958
#endif
3959 3960 3961 3962
#ifdef CONFIG_PARISC
	if (parisc_registered)
		unregister_parisc_driver(&ipmi_parisc_driver);
#endif
3963

3964
	platform_driver_unregister(&ipmi_driver);
3965

3966
	mutex_lock(&smi_infos_lock);
3967 3968
	list_for_each_entry_safe(e, tmp_e, &smi_infos, link)
		cleanup_one_si(e);
3969
	mutex_unlock(&smi_infos_lock);
L
Linus Torvalds 已提交
3970 3971 3972 3973
}
module_exit(cleanup_ipmi_si);

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