ipmi_msghandler.c 135.0 KB
Newer Older
1
// SPDX-License-Identifier: GPL-2.0+
L
Linus Torvalds 已提交
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
/*
 * ipmi_msghandler.c
 *
 * Incoming and outgoing message routing for an IPMI interface.
 *
 * Author: MontaVista Software, Inc.
 *         Corey Minyard <minyard@mvista.com>
 *         source@mvista.com
 *
 * Copyright 2002 MontaVista Software Inc.
 */

#include <linux/module.h>
#include <linux/errno.h>
#include <linux/poll.h>
17
#include <linux/sched.h>
18
#include <linux/seq_file.h>
L
Linus Torvalds 已提交
19
#include <linux/spinlock.h>
20
#include <linux/mutex.h>
L
Linus Torvalds 已提交
21 22 23 24 25 26
#include <linux/slab.h>
#include <linux/ipmi.h>
#include <linux/ipmi_smi.h>
#include <linux/notifier.h>
#include <linux/init.h>
#include <linux/proc_fs.h>
27
#include <linux/rcupdate.h>
28
#include <linux/interrupt.h>
29
#include <linux/moduleparam.h>
30
#include <linux/workqueue.h>
31
#include <linux/uuid.h>
L
Linus Torvalds 已提交
32 33

#define PFX "IPMI message handler: "
34

C
Corey Minyard 已提交
35
#define IPMI_DRIVER_VERSION "39.2"
L
Linus Torvalds 已提交
36 37 38

static struct ipmi_recv_msg *ipmi_alloc_recv_msg(void);
static int ipmi_init_msghandler(void);
39
static void smi_recv_tasklet(unsigned long);
40 41 42
static void handle_new_recv_msgs(struct ipmi_smi *intf);
static void need_waiter(struct ipmi_smi *intf);
static int handle_one_recv_msg(struct ipmi_smi *intf,
43
			       struct ipmi_smi_msg *msg);
L
Linus Torvalds 已提交
44

C
Corey Minyard 已提交
45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
#ifdef DEBUG
static void ipmi_debug_msg(const char *title, unsigned char *data,
			   unsigned int len)
{
	int i, pos;
	char buf[100];

	pos = snprintf(buf, sizeof(buf), "%s: ", title);
	for (i = 0; i < len; i++)
		pos += snprintf(buf + pos, sizeof(buf) - pos,
				" %2.2x", data[i]);
	pr_debug("%s\n", buf);
}
#else
static void ipmi_debug_msg(const char *title, unsigned char *data,
			   unsigned int len)
{ }
#endif

R
Randy Dunlap 已提交
64
static int initialized;
L
Linus Torvalds 已提交
65

66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85
enum ipmi_panic_event_op {
	IPMI_SEND_PANIC_EVENT_NONE,
	IPMI_SEND_PANIC_EVENT,
	IPMI_SEND_PANIC_EVENT_STRING
};
#ifdef CONFIG_IPMI_PANIC_STRING
#define IPMI_PANIC_DEFAULT IPMI_SEND_PANIC_EVENT_STRING
#elif defined(CONFIG_IPMI_PANIC_EVENT)
#define IPMI_PANIC_DEFAULT IPMI_SEND_PANIC_EVENT
#else
#define IPMI_PANIC_DEFAULT IPMI_SEND_PANIC_EVENT_NONE
#endif
static enum ipmi_panic_event_op ipmi_send_panic_event = IPMI_PANIC_DEFAULT;

static int panic_op_write_handler(const char *val,
				  const struct kernel_param *kp)
{
	char valcp[16];
	char *s;

X
Xiongfeng Wang 已提交
86
	strncpy(valcp, val, 15);
87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133
	valcp[15] = '\0';

	s = strstrip(valcp);

	if (strcmp(s, "none") == 0)
		ipmi_send_panic_event = IPMI_SEND_PANIC_EVENT_NONE;
	else if (strcmp(s, "event") == 0)
		ipmi_send_panic_event = IPMI_SEND_PANIC_EVENT;
	else if (strcmp(s, "string") == 0)
		ipmi_send_panic_event = IPMI_SEND_PANIC_EVENT_STRING;
	else
		return -EINVAL;

	return 0;
}

static int panic_op_read_handler(char *buffer, const struct kernel_param *kp)
{
	switch (ipmi_send_panic_event) {
	case IPMI_SEND_PANIC_EVENT_NONE:
		strcpy(buffer, "none");
		break;

	case IPMI_SEND_PANIC_EVENT:
		strcpy(buffer, "event");
		break;

	case IPMI_SEND_PANIC_EVENT_STRING:
		strcpy(buffer, "string");
		break;

	default:
		strcpy(buffer, "???");
		break;
	}

	return strlen(buffer);
}

static const struct kernel_param_ops panic_op_ops = {
	.set = panic_op_write_handler,
	.get = panic_op_read_handler
};
module_param_cb(panic_op, &panic_op_ops, NULL, 0600);
MODULE_PARM_DESC(panic_op, "Sets if the IPMI driver will attempt to store panic information in the event log in the event of a panic.  Set to 'none' for no, 'event' for a single event, or 'string' for a generic event and the panic string in IPMI OEM events.");


134
#ifdef CONFIG_IPMI_PROC_INTERFACE
R
Randy Dunlap 已提交
135
static struct proc_dir_entry *proc_ipmi_root;
136
#endif /* CONFIG_IPMI_PROC_INTERFACE */
L
Linus Torvalds 已提交
137 138 139

#define MAX_EVENTS_IN_QUEUE	25

140 141 142 143 144 145
/* Remain in auto-maintenance mode for this amount of time (in ms). */
static unsigned long maintenance_mode_timeout_ms = 30000;
module_param(maintenance_mode_timeout_ms, ulong, 0644);
MODULE_PARM_DESC(maintenance_mode_timeout_ms,
		 "The time (milliseconds) after the last maintenance message that the connection stays in maintenance mode.");

146 147 148 149
/*
 * Don't let a message sit in a queue forever, always time it with at lest
 * the max message timer.  This is in milliseconds.
 */
L
Linus Torvalds 已提交
150 151
#define MAX_MSG_TIMEOUT		60000

152 153 154 155 156 157 158 159 160 161 162 163 164
/*
 * Timeout times below are in milliseconds, and are done off a 1
 * second timer.  So setting the value to 1000 would mean anything
 * between 0 and 1000ms.  So really the only reasonable minimum
 * setting it 2000ms, which is between 1 and 2 seconds.
 */

/* The default timeout for message retries. */
static unsigned long default_retry_ms = 2000;
module_param(default_retry_ms, ulong, 0644);
MODULE_PARM_DESC(default_retry_ms,
		 "The time (milliseconds) between retry sends");

165 166 167 168 169 170
/* The default timeout for maintenance mode message retries. */
static unsigned long default_maintenance_retry_ms = 3000;
module_param(default_maintenance_retry_ms, ulong, 0644);
MODULE_PARM_DESC(default_maintenance_retry_ms,
		 "The time (milliseconds) between retry sends in maintenance mode");

171 172 173 174 175 176
/* The default maximum number of retries */
static unsigned int default_max_retries = 4;
module_param(default_max_retries, uint, 0644);
MODULE_PARM_DESC(default_max_retries,
		 "The time (milliseconds) between retry sends in maintenance mode");

177 178 179 180 181 182 183 184 185 186 187 188 189 190
/* Call every ~1000 ms. */
#define IPMI_TIMEOUT_TIME	1000

/* How many jiffies does it take to get to the timeout time. */
#define IPMI_TIMEOUT_JIFFIES	((IPMI_TIMEOUT_TIME * HZ) / 1000)

/*
 * Request events from the queue every second (this is the number of
 * IPMI_TIMEOUT_TIMES between event requests).  Hopefully, in the
 * future, IPMI will add a way to know immediately if an event is in
 * the queue and this silliness can go away.
 */
#define IPMI_REQUEST_EV_TIME	(1000 / (IPMI_TIMEOUT_TIME))

191 192 193
/* How long should we cache dynamic device IDs? */
#define IPMI_DYN_DEV_ID_EXPIRY	(10 * HZ)

194 195 196
/*
 * The main "user" data structure.
 */
197
struct ipmi_user {
L
Linus Torvalds 已提交
198 199
	struct list_head link;

200 201 202 203 204 205
	/*
	 * Set to NULL when the user is destroyed, a pointer to myself
	 * so srcu_dereference can be used on it.
	 */
	struct ipmi_user *self;
	struct srcu_struct release_barrier;
206 207 208

	struct kref refcount;

L
Linus Torvalds 已提交
209
	/* The upper layer that handles receive messages. */
C
Corey Minyard 已提交
210
	const struct ipmi_user_hndl *handler;
L
Linus Torvalds 已提交
211 212 213
	void             *handler_data;

	/* The interface this user is bound to. */
214
	struct ipmi_smi *intf;
L
Linus Torvalds 已提交
215 216

	/* Does this interface receive IPMI events? */
217
	bool gets_events;
L
Linus Torvalds 已提交
218 219
};

220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236
static struct ipmi_user *acquire_ipmi_user(struct ipmi_user *user, int *index)
	__acquires(user->release_barrier)
{
	struct ipmi_user *ruser;

	*index = srcu_read_lock(&user->release_barrier);
	ruser = srcu_dereference(user->self, &user->release_barrier);
	if (!ruser)
		srcu_read_unlock(&user->release_barrier, *index);
	return ruser;
}

static void release_ipmi_user(struct ipmi_user *user, int index)
{
	srcu_read_unlock(&user->release_barrier, index);
}

237
struct cmd_rcvr {
L
Linus Torvalds 已提交
238 239
	struct list_head link;

240
	struct ipmi_user *user;
L
Linus Torvalds 已提交
241 242
	unsigned char netfn;
	unsigned char cmd;
243
	unsigned int  chans;
244 245 246 247 248 249 250

	/*
	 * This is used to form a linked lised during mass deletion.
	 * Since this is in an RCU list, we cannot use the link above
	 * or change any data until the RCU period completes.  So we
	 * use this next variable during mass deletion so we can have
	 * a list and don't have to wait and restart the search on
251 252
	 * every individual deletion of a command.
	 */
253
	struct cmd_rcvr *next;
L
Linus Torvalds 已提交
254 255
};

256
struct seq_table {
L
Linus Torvalds 已提交
257 258 259 260 261 262 263
	unsigned int         inuse : 1;
	unsigned int         broadcast : 1;

	unsigned long        timeout;
	unsigned long        orig_timeout;
	unsigned int         retries_left;

264 265 266 267 268
	/*
	 * To verify on an incoming send message response that this is
	 * the message that the response is for, we keep a sequence id
	 * and increment it every time we send a message.
	 */
L
Linus Torvalds 已提交
269 270
	long                 seqid;

271 272 273 274 275
	/*
	 * This is held so we can properly respond to the message on a
	 * timeout, and it is used to hold the temporary data for
	 * retransmission, too.
	 */
L
Linus Torvalds 已提交
276 277 278
	struct ipmi_recv_msg *recv_msg;
};

279 280 281 282
/*
 * Store the information in a msgid (long) to allow us to find a
 * sequence table entry from the msgid.
 */
C
Corey Minyard 已提交
283 284
#define STORE_SEQ_IN_MSGID(seq, seqid) \
	((((seq) & 0x3f) << 26) | ((seqid) & 0x3ffffff))
L
Linus Torvalds 已提交
285 286 287

#define GET_SEQ_FROM_MSGID(msgid, seq, seqid) \
	do {								\
C
Corey Minyard 已提交
288 289
		seq = (((msgid) >> 26) & 0x3f);				\
		seqid = ((msgid) & 0x3ffffff);				\
290
	} while (0)
L
Linus Torvalds 已提交
291

C
Corey Minyard 已提交
292
#define NEXT_SEQID(seqid) (((seqid) + 1) & 0x3ffffff)
L
Linus Torvalds 已提交
293

294
#define IPMI_MAX_CHANNELS       16
295
struct ipmi_channel {
L
Linus Torvalds 已提交
296 297
	unsigned char medium;
	unsigned char protocol;
298
};
299

300 301 302 303
struct ipmi_channel_set {
	struct ipmi_channel c[IPMI_MAX_CHANNELS];
};

304
struct ipmi_my_addrinfo {
305 306 307 308
	/*
	 * My slave address.  This is initialized to IPMI_BMC_SLAVE_ADDR,
	 * but may be changed by the user.
	 */
309 310
	unsigned char address;

311 312 313 314
	/*
	 * My LUN.  This should generally stay the SMS LUN, but just in
	 * case...
	 */
315
	unsigned char lun;
L
Linus Torvalds 已提交
316 317
};

318
#ifdef CONFIG_IPMI_PROC_INTERFACE
319
struct ipmi_proc_entry {
L
Linus Torvalds 已提交
320 321 322
	char                   *name;
	struct ipmi_proc_entry *next;
};
323
#endif
L
Linus Torvalds 已提交
324

325 326 327 328 329
/*
 * Note that the product id, manufacturer id, guid, and device id are
 * immutable in this structure, so dyn_mutex is not required for
 * accessing those.  If those change on a BMC, a new BMC is allocated.
 */
330
struct bmc_device {
331
	struct platform_device pdev;
332
	struct list_head       intfs; /* Interfaces on this BMC. */
333 334 335 336
	struct ipmi_device_id  id;
	struct ipmi_device_id  fetch_id;
	int                    dyn_id_set;
	unsigned long          dyn_id_expiry;
337
	struct mutex           dyn_mutex; /* Protects id, intfs, & dyn* */
338 339
	guid_t                 guid;
	guid_t                 fetch_guid;
340
	int                    dyn_guid_set;
341
	struct kref	       usecount;
342
	struct work_struct     remove_work;
343
};
344
#define to_bmc_device(x) container_of((x), struct bmc_device, pdev.dev)
345

346
static int bmc_get_device_id(struct ipmi_smi *intf, struct bmc_device *bmc,
347
			     struct ipmi_device_id *id,
348
			     bool *guid_set, guid_t *guid);
349

350 351 352 353
/*
 * Various statistics for IPMI, these index stats[] in the ipmi_smi
 * structure.
 */
354 355 356
enum ipmi_stat_indexes {
	/* Commands we got from the user that were invalid. */
	IPMI_STAT_sent_invalid_commands = 0,
357

358 359
	/* Commands we sent to the MC. */
	IPMI_STAT_sent_local_commands,
360

361 362
	/* Responses from the MC that were delivered to a user. */
	IPMI_STAT_handled_local_responses,
363

364 365
	/* Responses from the MC that were not delivered to a user. */
	IPMI_STAT_unhandled_local_responses,
366

367 368
	/* Commands we sent out to the IPMB bus. */
	IPMI_STAT_sent_ipmb_commands,
369

370 371
	/* Commands sent on the IPMB that had errors on the SEND CMD */
	IPMI_STAT_sent_ipmb_command_errs,
372

373 374
	/* Each retransmit increments this count. */
	IPMI_STAT_retransmitted_ipmb_commands,
375

376 377 378 379 380
	/*
	 * When a message times out (runs out of retransmits) this is
	 * incremented.
	 */
	IPMI_STAT_timed_out_ipmb_commands,
381

382 383 384 385 386 387
	/*
	 * This is like above, but for broadcasts.  Broadcasts are
	 * *not* included in the above count (they are expected to
	 * time out).
	 */
	IPMI_STAT_timed_out_ipmb_broadcasts,
388

389 390
	/* Responses I have sent to the IPMB bus. */
	IPMI_STAT_sent_ipmb_responses,
391

392 393
	/* The response was delivered to the user. */
	IPMI_STAT_handled_ipmb_responses,
394

395 396
	/* The response had invalid data in it. */
	IPMI_STAT_invalid_ipmb_responses,
397

398 399
	/* The response didn't have anyone waiting for it. */
	IPMI_STAT_unhandled_ipmb_responses,
400

401 402
	/* Commands we sent out to the IPMB bus. */
	IPMI_STAT_sent_lan_commands,
403

404 405
	/* Commands sent on the IPMB that had errors on the SEND CMD */
	IPMI_STAT_sent_lan_command_errs,
406

407 408
	/* Each retransmit increments this count. */
	IPMI_STAT_retransmitted_lan_commands,
409

410 411 412 413 414 415 416 417
	/*
	 * When a message times out (runs out of retransmits) this is
	 * incremented.
	 */
	IPMI_STAT_timed_out_lan_commands,

	/* Responses I have sent to the IPMB bus. */
	IPMI_STAT_sent_lan_responses,
418

419 420
	/* The response was delivered to the user. */
	IPMI_STAT_handled_lan_responses,
421

422 423
	/* The response had invalid data in it. */
	IPMI_STAT_invalid_lan_responses,
424

425 426
	/* The response didn't have anyone waiting for it. */
	IPMI_STAT_unhandled_lan_responses,
427

428 429
	/* The command was delivered to the user. */
	IPMI_STAT_handled_commands,
430

431 432
	/* The command had invalid data in it. */
	IPMI_STAT_invalid_commands,
433

434 435
	/* The command didn't have anyone waiting for it. */
	IPMI_STAT_unhandled_commands,
436

437 438
	/* Invalid data in an event. */
	IPMI_STAT_invalid_events,
439

440 441
	/* Events that were received with the proper format. */
	IPMI_STAT_events,
442

443 444 445 446 447
	/* Retransmissions on IPMB that failed. */
	IPMI_STAT_dropped_rexmit_ipmb_commands,

	/* Retransmissions on LAN that failed. */
	IPMI_STAT_dropped_rexmit_lan_commands,
448

449 450 451
	/* This *must* remain last, add new values above this. */
	IPMI_NUM_STATS
};
452 453


L
Linus Torvalds 已提交
454
#define IPMI_IPMB_NUM_SEQ	64
455
struct ipmi_smi {
L
Linus Torvalds 已提交
456 457 458
	/* What interface number are we? */
	int intf_num;

459 460
	struct kref refcount;

461 462 463
	/* Set when the interface is being unregistered. */
	bool in_shutdown;

464 465 466
	/* Used for a list of interfaces. */
	struct list_head link;

467
	/*
468 469
	 * The list of upper layers that are using me.  seq_lock write
	 * protects this.  Read protection is with srcu.
470
	 */
471
	struct list_head users;
472
	struct srcu_struct users_srcu;
L
Linus Torvalds 已提交
473 474 475 476

	/* Used for wake ups at startup. */
	wait_queue_head_t waitq;

477 478 479 480 481 482 483
	/*
	 * Prevents the interface from being unregistered when the
	 * interface is used by being looked up through the BMC
	 * structure.
	 */
	struct mutex bmc_reg_mutex;

484
	struct bmc_device tmp_bmc;
485
	struct bmc_device *bmc;
C
Corey Minyard 已提交
486
	bool bmc_registered;
487
	struct list_head bmc_link;
488
	char *my_dev_name;
489
	bool in_bmc_register;  /* Handle recursive situations.  Yuck. */
490
	struct work_struct bmc_reg_work;
L
Linus Torvalds 已提交
491

492
	const struct ipmi_smi_handlers *handlers;
L
Linus Torvalds 已提交
493 494
	void                     *send_info;

495
#ifdef CONFIG_IPMI_PROC_INTERFACE
C
Corey Minyard 已提交
496 497
	/* A list of proc entries for this interface. */
	struct mutex           proc_entry_lock;
L
Linus Torvalds 已提交
498
	struct ipmi_proc_entry *proc_entries;
499 500 501

	struct proc_dir_entry *proc_dir;
	char                  proc_dir_name[10];
502
#endif
L
Linus Torvalds 已提交
503

504 505 506
	/* Driver-model device for the system interface. */
	struct device          *si_dev;

507 508 509 510 511 512
	/*
	 * A table of sequence numbers for this interface.  We use the
	 * sequence numbers for IPMB messages that go out of the
	 * interface to match them up with their responses.  A routine
	 * is called periodically to time the items in this list.
	 */
L
Linus Torvalds 已提交
513 514 515 516
	spinlock_t       seq_lock;
	struct seq_table seq_table[IPMI_IPMB_NUM_SEQ];
	int curr_seq;

517
	/*
518 519 520 521
	 * Messages queued for delivery.  If delivery fails (out of memory
	 * for instance), They will stay in here to be processed later in a
	 * periodic timer interrupt.  The tasklet is for handling received
	 * messages directly from the handler.
522
	 */
523 524
	spinlock_t       waiting_rcv_msgs_lock;
	struct list_head waiting_rcv_msgs;
525 526
	atomic_t	 watchdog_pretimeouts_to_deliver;
	struct tasklet_struct recv_tasklet;
L
Linus Torvalds 已提交
527

528 529 530 531 532
	spinlock_t             xmit_msgs_lock;
	struct list_head       xmit_msgs;
	struct ipmi_smi_msg    *curr_msg;
	struct list_head       hp_xmit_msgs;

533 534 535 536
	/*
	 * The list of command receivers that are registered for commands
	 * on this interface.
	 */
537
	struct mutex     cmd_rcvrs_mutex;
L
Linus Torvalds 已提交
538 539
	struct list_head cmd_rcvrs;

540 541 542 543
	/*
	 * Events that were queues because no one was there to receive
	 * them.
	 */
L
Linus Torvalds 已提交
544 545 546
	spinlock_t       events_lock; /* For dealing with event stuff. */
	struct list_head waiting_events;
	unsigned int     waiting_events_count; /* How many events in queue? */
547 548
	char             delivering_events;
	char             event_msg_printed;
549 550 551
	atomic_t         event_waiters;
	unsigned int     ticks_to_req_ev;
	int              last_needs_timer;
L
Linus Torvalds 已提交
552

553 554 555 556
	/*
	 * The event receiver for my BMC, only really used at panic
	 * shutdown as a place to store this.
	 */
L
Linus Torvalds 已提交
557 558 559 560 561
	unsigned char event_receiver;
	unsigned char event_receiver_lun;
	unsigned char local_sel_device;
	unsigned char local_event_generator;

C
Corey Minyard 已提交
562 563
	/* For handling of maintenance mode. */
	int maintenance_mode;
C
Corey Minyard 已提交
564
	bool maintenance_mode_enable;
C
Corey Minyard 已提交
565 566 567
	int auto_maintenance_timeout;
	spinlock_t maintenance_mode_lock; /* Used in a timer... */

568 569 570 571 572 573 574
	/*
	 * If we are doing maintenance on something on IPMB, extend
	 * the timeout time to avoid timeouts writing firmware and
	 * such.
	 */
	int ipmb_maintenance_mode_timeout;

575 576 577 578 579
	/*
	 * A cheap hack, if this is non-null and a message to an
	 * interface comes in with a NULL user, call this routine with
	 * it.  Note that the message will still be freed by the
	 * caller.  This only works on the system interface.
580
	 *
581
	 * Protected by bmc_reg_mutex.
582
	 */
583 584
	void (*null_user_handler)(struct ipmi_smi *intf,
				  struct ipmi_recv_msg *msg);
L
Linus Torvalds 已提交
585

586 587 588 589
	/*
	 * When we are scanning the channels for an SMI, this will
	 * tell which channel we are scanning.
	 */
L
Linus Torvalds 已提交
590 591 592
	int curr_channel;

	/* Channel information */
593 594 595
	struct ipmi_channel_set *channel_list;
	unsigned int curr_working_cset; /* First index into the following. */
	struct ipmi_channel_set wchannels[2];
596
	struct ipmi_my_addrinfo addrinfo[IPMI_MAX_CHANNELS];
597
	bool channels_ready;
L
Linus Torvalds 已提交
598

599
	atomic_t stats[IPMI_NUM_STATS];
600 601 602 603 604 605 606

	/*
	 * run_to_completion duplicate of smb_info, smi_info
	 * and ipmi_serial_info structures. Used to decrease numbers of
	 * parameters passed by "low" level IPMI code.
	 */
	int run_to_completion;
L
Linus Torvalds 已提交
607
};
608
#define to_si_intf_from_dev(device) container_of(device, struct ipmi_smi, dev)
L
Linus Torvalds 已提交
609

610 611 612
static void __get_guid(struct ipmi_smi *intf);
static void __ipmi_bmc_unregister(struct ipmi_smi *intf);
static int __ipmi_bmc_register(struct ipmi_smi *intf,
613
			       struct ipmi_device_id *id,
614
			       bool guid_set, guid_t *guid, int intf_num);
615
static int __scan_channels(struct ipmi_smi *intf, struct ipmi_device_id *id);
616

617

618 619 620
/**
 * The driver model view of the IPMI messaging driver.
 */
621 622 623 624 625
static struct platform_driver ipmidriver = {
	.driver = {
		.name = "ipmi",
		.bus = &platform_bus_type
	}
626
};
627
/*
628
 * This mutex keeps us from adding the same BMC twice.
629
 */
630 631
static DEFINE_MUTEX(ipmidriver_mutex);

632
static LIST_HEAD(ipmi_interfaces);
633
static DEFINE_MUTEX(ipmi_interfaces_mutex);
634
DEFINE_STATIC_SRCU(ipmi_interfaces_srcu);
L
Linus Torvalds 已提交
635

636 637 638
/*
 * List of watchers that want to know when smi's are added and deleted.
 */
639
static LIST_HEAD(smi_watchers);
640
static DEFINE_MUTEX(smi_watchers_mutex);
L
Linus Torvalds 已提交
641

642 643 644 645 646
#define ipmi_inc_stat(intf, stat) \
	atomic_inc(&(intf)->stats[IPMI_STAT_ ## stat])
#define ipmi_get_stat(intf, stat) \
	((unsigned int) atomic_read(&(intf)->stats[IPMI_STAT_ ## stat]))

647 648
static const char * const addr_src_to_str[] = {
	"invalid", "hotmod", "hardcoded", "SPMI", "ACPI", "SMBIOS", "PCI",
649
	"device-tree", "platform"
650
};
651 652 653

const char *ipmi_addr_src_to_str(enum ipmi_addr_src src)
{
654
	if (src >= SI_LAST)
655 656 657 658 659
		src = 0; /* Invalid */
	return addr_src_to_str[src];
}
EXPORT_SYMBOL(ipmi_addr_src_to_str);

660 661 662 663 664 665 666 667 668 669 670 671 672 673
static int is_lan_addr(struct ipmi_addr *addr)
{
	return addr->addr_type == IPMI_LAN_ADDR_TYPE;
}

static int is_ipmb_addr(struct ipmi_addr *addr)
{
	return addr->addr_type == IPMI_IPMB_ADDR_TYPE;
}

static int is_ipmb_bcast_addr(struct ipmi_addr *addr)
{
	return addr->addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE;
}
674

675 676 677 678 679 680 681 682 683 684
static void free_recv_msg_list(struct list_head *q)
{
	struct ipmi_recv_msg *msg, *msg2;

	list_for_each_entry_safe(msg, msg2, q, link) {
		list_del(&msg->link);
		ipmi_free_recv_msg(msg);
	}
}

685 686 687 688 689 690 691 692 693 694
static void free_smi_msg_list(struct list_head *q)
{
	struct ipmi_smi_msg *msg, *msg2;

	list_for_each_entry_safe(msg, msg2, q, link) {
		list_del(&msg->link);
		ipmi_free_smi_msg(msg);
	}
}

695
static void clean_up_interface_data(struct ipmi_smi *intf)
696 697 698 699 700
{
	int              i;
	struct cmd_rcvr  *rcvr, *rcvr2;
	struct list_head list;

701 702
	tasklet_kill(&intf->recv_tasklet);

703
	free_smi_msg_list(&intf->waiting_rcv_msgs);
704 705
	free_recv_msg_list(&intf->waiting_events);

706 707 708 709
	/*
	 * Wholesale remove all the entries from the list in the
	 * interface and wait for RCU to know that none are in use.
	 */
710
	mutex_lock(&intf->cmd_rcvrs_mutex);
711 712
	INIT_LIST_HEAD(&list);
	list_splice_init_rcu(&intf->cmd_rcvrs, &list, synchronize_rcu);
713
	mutex_unlock(&intf->cmd_rcvrs_mutex);
714 715 716 717 718 719

	list_for_each_entry_safe(rcvr, rcvr2, &list, link)
		kfree(rcvr);

	for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++) {
		if ((intf->seq_table[i].inuse)
720
					&& (intf->seq_table[i].recv_msg))
721 722 723 724 725 726
			ipmi_free_recv_msg(intf->seq_table[i].recv_msg);
	}
}

static void intf_free(struct kref *ref)
{
727
	struct ipmi_smi *intf = container_of(ref, struct ipmi_smi, refcount);
728 729 730 731 732

	clean_up_interface_data(intf);
	kfree(intf);
}

733
struct watcher_entry {
734
	int              intf_num;
735
	struct ipmi_smi  *intf;
736 737 738
	struct list_head link;
};

L
Linus Torvalds 已提交
739 740
int ipmi_smi_watcher_register(struct ipmi_smi_watcher *watcher)
{
741
	struct ipmi_smi *intf;
742
	int index;
743

744 745 746
	mutex_lock(&smi_watchers_mutex);

	list_add(&watcher->link, &smi_watchers);
747

748 749 750
	index = srcu_read_lock(&ipmi_interfaces_srcu);
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
		int intf_num = READ_ONCE(intf->intf_num);
751

752 753 754
		if (intf_num == -1)
			continue;
		watcher->new_smi(intf_num, intf->si_dev);
L
Linus Torvalds 已提交
755
	}
756
	srcu_read_unlock(&ipmi_interfaces_srcu, index);
757

758
	mutex_unlock(&smi_watchers_mutex);
759

L
Linus Torvalds 已提交
760 761
	return 0;
}
762
EXPORT_SYMBOL(ipmi_smi_watcher_register);
L
Linus Torvalds 已提交
763 764 765

int ipmi_smi_watcher_unregister(struct ipmi_smi_watcher *watcher)
{
766
	mutex_lock(&smi_watchers_mutex);
767
	list_del(&watcher->link);
768
	mutex_unlock(&smi_watchers_mutex);
L
Linus Torvalds 已提交
769 770
	return 0;
}
771
EXPORT_SYMBOL(ipmi_smi_watcher_unregister);
L
Linus Torvalds 已提交
772

773 774 775
/*
 * Must be called with smi_watchers_mutex held.
 */
L
Linus Torvalds 已提交
776
static void
777
call_smi_watchers(int i, struct device *dev)
L
Linus Torvalds 已提交
778 779 780
{
	struct ipmi_smi_watcher *w;

781
	mutex_lock(&smi_watchers_mutex);
L
Linus Torvalds 已提交
782 783
	list_for_each_entry(w, &smi_watchers, link) {
		if (try_module_get(w->owner)) {
784
			w->new_smi(i, dev);
L
Linus Torvalds 已提交
785 786 787
			module_put(w->owner);
		}
	}
788
	mutex_unlock(&smi_watchers_mutex);
L
Linus Torvalds 已提交
789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807
}

static int
ipmi_addr_equal(struct ipmi_addr *addr1, struct ipmi_addr *addr2)
{
	if (addr1->addr_type != addr2->addr_type)
		return 0;

	if (addr1->channel != addr2->channel)
		return 0;

	if (addr1->addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE) {
		struct ipmi_system_interface_addr *smi_addr1
		    = (struct ipmi_system_interface_addr *) addr1;
		struct ipmi_system_interface_addr *smi_addr2
		    = (struct ipmi_system_interface_addr *) addr2;
		return (smi_addr1->lun == smi_addr2->lun);
	}

808
	if (is_ipmb_addr(addr1) || is_ipmb_bcast_addr(addr1)) {
L
Linus Torvalds 已提交
809 810 811 812 813 814 815 816 817
		struct ipmi_ipmb_addr *ipmb_addr1
		    = (struct ipmi_ipmb_addr *) addr1;
		struct ipmi_ipmb_addr *ipmb_addr2
		    = (struct ipmi_ipmb_addr *) addr2;

		return ((ipmb_addr1->slave_addr == ipmb_addr2->slave_addr)
			&& (ipmb_addr1->lun == ipmb_addr2->lun));
	}

818
	if (is_lan_addr(addr1)) {
L
Linus Torvalds 已提交
819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835
		struct ipmi_lan_addr *lan_addr1
			= (struct ipmi_lan_addr *) addr1;
		struct ipmi_lan_addr *lan_addr2
		    = (struct ipmi_lan_addr *) addr2;

		return ((lan_addr1->remote_SWID == lan_addr2->remote_SWID)
			&& (lan_addr1->local_SWID == lan_addr2->local_SWID)
			&& (lan_addr1->session_handle
			    == lan_addr2->session_handle)
			&& (lan_addr1->lun == lan_addr2->lun));
	}

	return 1;
}

int ipmi_validate_addr(struct ipmi_addr *addr, int len)
{
836
	if (len < sizeof(struct ipmi_system_interface_addr))
L
Linus Torvalds 已提交
837 838 839 840 841 842 843 844 845
		return -EINVAL;

	if (addr->addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE) {
		if (addr->channel != IPMI_BMC_CHANNEL)
			return -EINVAL;
		return 0;
	}

	if ((addr->channel == IPMI_BMC_CHANNEL)
846
	    || (addr->channel >= IPMI_MAX_CHANNELS)
L
Linus Torvalds 已提交
847 848 849
	    || (addr->channel < 0))
		return -EINVAL;

850
	if (is_ipmb_addr(addr) || is_ipmb_bcast_addr(addr)) {
851
		if (len < sizeof(struct ipmi_ipmb_addr))
L
Linus Torvalds 已提交
852 853 854 855
			return -EINVAL;
		return 0;
	}

856
	if (is_lan_addr(addr)) {
857
		if (len < sizeof(struct ipmi_lan_addr))
L
Linus Torvalds 已提交
858 859 860 861 862 863
			return -EINVAL;
		return 0;
	}

	return -EINVAL;
}
864
EXPORT_SYMBOL(ipmi_validate_addr);
L
Linus Torvalds 已提交
865 866 867 868 869 870 871

unsigned int ipmi_addr_length(int addr_type)
{
	if (addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
		return sizeof(struct ipmi_system_interface_addr);

	if ((addr_type == IPMI_IPMB_ADDR_TYPE)
872
			|| (addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE))
L
Linus Torvalds 已提交
873 874 875 876 877 878 879
		return sizeof(struct ipmi_ipmb_addr);

	if (addr_type == IPMI_LAN_ADDR_TYPE)
		return sizeof(struct ipmi_lan_addr);

	return 0;
}
880
EXPORT_SYMBOL(ipmi_addr_length);
L
Linus Torvalds 已提交
881

C
Corey Minyard 已提交
882
static int deliver_response(struct ipmi_smi *intf, struct ipmi_recv_msg *msg)
L
Linus Torvalds 已提交
883
{
C
Corey Minyard 已提交
884
	int rv = 0;
885

C
Corey Minyard 已提交
886
	if (!msg->user) {
887 888 889 890 891
		/* Special handling for NULL users. */
		if (intf->null_user_handler) {
			intf->null_user_handler(intf, msg);
		} else {
			/* No handler, so give up. */
C
Corey Minyard 已提交
892
			rv = -EINVAL;
893 894
		}
		ipmi_free_recv_msg(msg);
895 896 897 898 899 900
	} else if (!oops_in_progress) {
		/*
		 * If we are running in the panic context, calling the
		 * receive handler doesn't much meaning and has a deadlock
		 * risk.  At this moment, simply skip it in that case.
		 */
901 902
		int index;
		struct ipmi_user *user = acquire_ipmi_user(msg->user, &index);
903

904 905 906 907 908 909 910 911
		if (user) {
			user->handler->ipmi_recv_hndl(msg, user->handler_data);
			release_ipmi_user(msg->user, index);
		} else {
			/* User went away, give up. */
			ipmi_free_recv_msg(msg);
			rv = -EINVAL;
		}
912
	}
C
Corey Minyard 已提交
913 914

	return rv;
L
Linus Torvalds 已提交
915 916
}

C
Corey Minyard 已提交
917 918 919 920 921 922 923 924 925 926 927
static void deliver_local_response(struct ipmi_smi *intf,
				   struct ipmi_recv_msg *msg)
{
	if (deliver_response(intf, msg))
		ipmi_inc_stat(intf, unhandled_local_responses);
	else
		ipmi_inc_stat(intf, handled_local_responses);
}

static void deliver_err_response(struct ipmi_smi *intf,
				 struct ipmi_recv_msg *msg, int err)
928 929 930 931 932 933
{
	msg->recv_type = IPMI_RESPONSE_RECV_TYPE;
	msg->msg_data[0] = err;
	msg->msg.netfn |= 1; /* Convert to a response. */
	msg->msg.data_len = 1;
	msg->msg.data = msg->msg_data;
C
Corey Minyard 已提交
934
	deliver_local_response(intf, msg);
935 936
}

937 938 939 940 941
/*
 * Find the next sequence number not being used and add the given
 * message with the given timeout to the sequence table.  This must be
 * called with the interface's seq_lock held.
 */
942
static int intf_next_seq(struct ipmi_smi      *intf,
L
Linus Torvalds 已提交
943 944 945 946 947 948 949 950 951 952
			 struct ipmi_recv_msg *recv_msg,
			 unsigned long        timeout,
			 int                  retries,
			 int                  broadcast,
			 unsigned char        *seq,
			 long                 *seqid)
{
	int          rv = 0;
	unsigned int i;

953 954 955 956 957
	if (timeout == 0)
		timeout = default_retry_ms;
	if (retries < 0)
		retries = default_max_retries;

958 959
	for (i = intf->curr_seq; (i+1)%IPMI_IPMB_NUM_SEQ != intf->curr_seq;
					i = (i+1)%IPMI_IPMB_NUM_SEQ) {
960
		if (!intf->seq_table[i].inuse)
L
Linus Torvalds 已提交
961 962 963
			break;
	}

964
	if (!intf->seq_table[i].inuse) {
L
Linus Torvalds 已提交
965 966
		intf->seq_table[i].recv_msg = recv_msg;

967 968 969 970
		/*
		 * Start with the maximum timeout, when the send response
		 * comes in we will start the real timer.
		 */
L
Linus Torvalds 已提交
971 972 973 974 975 976 977 978 979
		intf->seq_table[i].timeout = MAX_MSG_TIMEOUT;
		intf->seq_table[i].orig_timeout = timeout;
		intf->seq_table[i].retries_left = retries;
		intf->seq_table[i].broadcast = broadcast;
		intf->seq_table[i].inuse = 1;
		intf->seq_table[i].seqid = NEXT_SEQID(intf->seq_table[i].seqid);
		*seq = i;
		*seqid = intf->seq_table[i].seqid;
		intf->curr_seq = (i+1)%IPMI_IPMB_NUM_SEQ;
980
		need_waiter(intf);
L
Linus Torvalds 已提交
981 982 983
	} else {
		rv = -EAGAIN;
	}
984

L
Linus Torvalds 已提交
985 986 987
	return rv;
}

988 989 990 991 992 993 994
/*
 * Return the receive message for the given sequence number and
 * release the sequence number so it can be reused.  Some other data
 * is passed in to be sure the message matches up correctly (to help
 * guard against message coming in after their timeout and the
 * sequence number being reused).
 */
995
static int intf_find_seq(struct ipmi_smi      *intf,
L
Linus Torvalds 已提交
996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008
			 unsigned char        seq,
			 short                channel,
			 unsigned char        cmd,
			 unsigned char        netfn,
			 struct ipmi_addr     *addr,
			 struct ipmi_recv_msg **recv_msg)
{
	int           rv = -ENODEV;
	unsigned long flags;

	if (seq >= IPMI_IPMB_NUM_SEQ)
		return -EINVAL;

1009
	spin_lock_irqsave(&intf->seq_lock, flags);
L
Linus Torvalds 已提交
1010 1011 1012
	if (intf->seq_table[seq].inuse) {
		struct ipmi_recv_msg *msg = intf->seq_table[seq].recv_msg;

1013 1014
		if ((msg->addr.channel == channel) && (msg->msg.cmd == cmd)
				&& (msg->msg.netfn == netfn)
1015
				&& (ipmi_addr_equal(addr, &msg->addr))) {
L
Linus Torvalds 已提交
1016 1017 1018 1019 1020
			*recv_msg = msg;
			intf->seq_table[seq].inuse = 0;
			rv = 0;
		}
	}
1021
	spin_unlock_irqrestore(&intf->seq_lock, flags);
L
Linus Torvalds 已提交
1022 1023 1024 1025 1026 1027

	return rv;
}


/* Start the timer for a specific sequence table entry. */
1028
static int intf_start_seq_timer(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
1029 1030 1031 1032 1033 1034 1035 1036 1037 1038
				long       msgid)
{
	int           rv = -ENODEV;
	unsigned long flags;
	unsigned char seq;
	unsigned long seqid;


	GET_SEQ_FROM_MSGID(msgid, seq, seqid);

1039
	spin_lock_irqsave(&intf->seq_lock, flags);
1040 1041 1042 1043
	/*
	 * We do this verification because the user can be deleted
	 * while a message is outstanding.
	 */
L
Linus Torvalds 已提交
1044
	if ((intf->seq_table[seq].inuse)
1045
				&& (intf->seq_table[seq].seqid == seqid)) {
1046
		struct seq_table *ent = &intf->seq_table[seq];
L
Linus Torvalds 已提交
1047 1048 1049
		ent->timeout = ent->orig_timeout;
		rv = 0;
	}
1050
	spin_unlock_irqrestore(&intf->seq_lock, flags);
L
Linus Torvalds 已提交
1051 1052 1053 1054 1055

	return rv;
}

/* Got an error for the send message for a specific sequence number. */
1056
static int intf_err_seq(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068
			long         msgid,
			unsigned int err)
{
	int                  rv = -ENODEV;
	unsigned long        flags;
	unsigned char        seq;
	unsigned long        seqid;
	struct ipmi_recv_msg *msg = NULL;


	GET_SEQ_FROM_MSGID(msgid, seq, seqid);

1069
	spin_lock_irqsave(&intf->seq_lock, flags);
1070 1071 1072 1073
	/*
	 * We do this verification because the user can be deleted
	 * while a message is outstanding.
	 */
L
Linus Torvalds 已提交
1074
	if ((intf->seq_table[seq].inuse)
1075
				&& (intf->seq_table[seq].seqid == seqid)) {
1076
		struct seq_table *ent = &intf->seq_table[seq];
L
Linus Torvalds 已提交
1077 1078 1079 1080 1081

		ent->inuse = 0;
		msg = ent->recv_msg;
		rv = 0;
	}
1082
	spin_unlock_irqrestore(&intf->seq_lock, flags);
L
Linus Torvalds 已提交
1083

1084
	if (msg)
C
Corey Minyard 已提交
1085
		deliver_err_response(intf, msg, err);
L
Linus Torvalds 已提交
1086 1087 1088 1089 1090 1091

	return rv;
}


int ipmi_create_user(unsigned int          if_num,
C
Corey Minyard 已提交
1092
		     const struct ipmi_user_hndl *handler,
L
Linus Torvalds 已提交
1093
		     void                  *handler_data,
1094
		     struct ipmi_user      **user)
L
Linus Torvalds 已提交
1095 1096
{
	unsigned long flags;
1097
	struct ipmi_user *new_user;
1098
	int           rv = 0, index;
1099
	struct ipmi_smi *intf;
L
Linus Torvalds 已提交
1100

1101 1102 1103 1104 1105 1106 1107
	/*
	 * There is no module usecount here, because it's not
	 * required.  Since this can only be used by and called from
	 * other modules, they will implicitly use this module, and
	 * thus this can't be removed unless the other modules are
	 * removed.
	 */
L
Linus Torvalds 已提交
1108 1109 1110 1111

	if (handler == NULL)
		return -EINVAL;

1112 1113 1114 1115
	/*
	 * Make sure the driver is actually initialized, this handles
	 * problems with initialization order.
	 */
L
Linus Torvalds 已提交
1116 1117 1118 1119 1120
	if (!initialized) {
		rv = ipmi_init_msghandler();
		if (rv)
			return rv;

1121 1122 1123 1124
		/*
		 * The init code doesn't return an error if it was turned
		 * off, but it won't initialize.  Check that.
		 */
L
Linus Torvalds 已提交
1125 1126 1127 1128 1129
		if (!initialized)
			return -ENODEV;
	}

	new_user = kmalloc(sizeof(*new_user), GFP_KERNEL);
1130
	if (!new_user)
L
Linus Torvalds 已提交
1131 1132
		return -ENOMEM;

1133
	index = srcu_read_lock(&ipmi_interfaces_srcu);
1134 1135 1136
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
		if (intf->intf_num == if_num)
			goto found;
L
Linus Torvalds 已提交
1137
	}
1138
	/* Not found, return an error */
1139 1140
	rv = -EINVAL;
	goto out_kfree;
L
Linus Torvalds 已提交
1141

1142
 found:
1143 1144 1145 1146
	rv = init_srcu_struct(&new_user->release_barrier);
	if (rv)
		goto out_kfree;

1147 1148
	/* Note that each existing user holds a refcount to the interface. */
	kref_get(&intf->refcount);
L
Linus Torvalds 已提交
1149

1150
	kref_init(&new_user->refcount);
L
Linus Torvalds 已提交
1151 1152 1153
	new_user->handler = handler;
	new_user->handler_data = handler_data;
	new_user->intf = intf;
1154
	new_user->gets_events = false;
L
Linus Torvalds 已提交
1155

1156
	rcu_assign_pointer(new_user->self, new_user);
1157 1158 1159
	spin_lock_irqsave(&intf->seq_lock, flags);
	list_add_rcu(&new_user->link, &intf->users);
	spin_unlock_irqrestore(&intf->seq_lock, flags);
1160 1161 1162 1163 1164
	if (handler->ipmi_watchdog_pretimeout) {
		/* User wants pretimeouts, so make sure to watch for them. */
		if (atomic_inc_return(&intf->event_waiters) == 1)
			need_waiter(intf);
	}
1165
	srcu_read_unlock(&ipmi_interfaces_srcu, index);
1166 1167
	*user = new_user;
	return 0;
L
Linus Torvalds 已提交
1168

1169
out_kfree:
1170
	srcu_read_unlock(&ipmi_interfaces_srcu, index);
1171
	kfree(new_user);
L
Linus Torvalds 已提交
1172 1173
	return rv;
}
1174
EXPORT_SYMBOL(ipmi_create_user);
L
Linus Torvalds 已提交
1175

1176 1177
int ipmi_get_smi_info(int if_num, struct ipmi_smi_info *data)
{
1178
	int rv, index;
1179
	struct ipmi_smi *intf;
1180

1181
	index = srcu_read_lock(&ipmi_interfaces_srcu);
1182 1183 1184 1185
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
		if (intf->intf_num == if_num)
			goto found;
	}
1186 1187
	srcu_read_unlock(&ipmi_interfaces_srcu, index);

1188
	/* Not found, return an error */
1189
	return -EINVAL;
1190 1191

found:
1192 1193 1194 1195 1196
	if (!intf->handlers->get_smi_info)
		rv = -ENOTTY;
	else
		rv = intf->handlers->get_smi_info(intf->send_info, data);
	srcu_read_unlock(&ipmi_interfaces_srcu, index);
1197 1198 1199 1200 1201

	return rv;
}
EXPORT_SYMBOL(ipmi_get_smi_info);

1202 1203
static void free_user(struct kref *ref)
{
1204
	struct ipmi_user *user = container_of(ref, struct ipmi_user, refcount);
1205 1206 1207
	kfree(user);
}

1208
static void _ipmi_destroy_user(struct ipmi_user *user)
L
Linus Torvalds 已提交
1209
{
1210
	struct ipmi_smi  *intf = user->intf;
L
Linus Torvalds 已提交
1211 1212
	int              i;
	unsigned long    flags;
1213 1214
	struct cmd_rcvr  *rcvr;
	struct cmd_rcvr  *rcvrs = NULL;
L
Linus Torvalds 已提交
1215

1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228 1229 1230 1231
	if (!acquire_ipmi_user(user, &i)) {
		/*
		 * The user has already been cleaned up, just make sure
		 * nothing is using it and return.
		 */
		synchronize_srcu(&user->release_barrier);
		return;
	}

	rcu_assign_pointer(user->self, NULL);
	release_ipmi_user(user, i);

	synchronize_srcu(&user->release_barrier);

	if (user->handler->shutdown)
		user->handler->shutdown(user->handler_data);
L
Linus Torvalds 已提交
1232

1233 1234 1235 1236 1237 1238
	if (user->handler->ipmi_watchdog_pretimeout)
		atomic_dec(&intf->event_waiters);

	if (user->gets_events)
		atomic_dec(&intf->event_waiters);

1239 1240 1241
	/* Remove the user from the interface's sequence table. */
	spin_lock_irqsave(&intf->seq_lock, flags);
	list_del_rcu(&user->link);
L
Linus Torvalds 已提交
1242

C
Corey Minyard 已提交
1243
	for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++) {
1244
		if (intf->seq_table[i].inuse
1245
		    && (intf->seq_table[i].recv_msg->user == user)) {
1246
			intf->seq_table[i].inuse = 0;
1247
			ipmi_free_recv_msg(intf->seq_table[i].recv_msg);
L
Linus Torvalds 已提交
1248 1249
		}
	}
1250 1251 1252 1253 1254 1255
	spin_unlock_irqrestore(&intf->seq_lock, flags);

	/*
	 * Remove the user from the command receiver's table.  First
	 * we build a list of everything (not using the standard link,
	 * since other things may be using it till we do
1256
	 * synchronize_srcu()) then free everything in that list.
1257
	 */
1258
	mutex_lock(&intf->cmd_rcvrs_mutex);
1259
	list_for_each_entry_rcu(rcvr, &intf->cmd_rcvrs, link) {
L
Linus Torvalds 已提交
1260
		if (rcvr->user == user) {
1261 1262 1263
			list_del_rcu(&rcvr->link);
			rcvr->next = rcvrs;
			rcvrs = rcvr;
L
Linus Torvalds 已提交
1264 1265
		}
	}
1266
	mutex_unlock(&intf->cmd_rcvrs_mutex);
1267 1268 1269 1270 1271 1272
	synchronize_rcu();
	while (rcvrs) {
		rcvr = rcvrs;
		rcvrs = rcvr->next;
		kfree(rcvr);
	}
L
Linus Torvalds 已提交
1273

1274
	kref_put(&intf->refcount, intf_free);
1275 1276 1277 1278 1279
}

int ipmi_destroy_user(struct ipmi_user *user)
{
	_ipmi_destroy_user(user);
L
Linus Torvalds 已提交
1280

1281
	cleanup_srcu_struct(&user->release_barrier);
1282
	kref_put(&user->refcount, free_user);
L
Linus Torvalds 已提交
1283

1284
	return 0;
L
Linus Torvalds 已提交
1285
}
1286
EXPORT_SYMBOL(ipmi_destroy_user);
L
Linus Torvalds 已提交
1287

1288
int ipmi_get_version(struct ipmi_user *user,
1289 1290
		     unsigned char *major,
		     unsigned char *minor)
L
Linus Torvalds 已提交
1291
{
1292
	struct ipmi_device_id id;
1293
	int rv, index;
1294

1295 1296 1297
	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;
1298

1299 1300 1301 1302 1303 1304
	rv = bmc_get_device_id(user->intf, NULL, &id, NULL, NULL);
	if (!rv) {
		*major = ipmi_version_major(&id);
		*minor = ipmi_version_minor(&id);
	}
	release_ipmi_user(user, index);
1305

1306
	return rv;
L
Linus Torvalds 已提交
1307
}
1308
EXPORT_SYMBOL(ipmi_get_version);
L
Linus Torvalds 已提交
1309

1310
int ipmi_set_my_address(struct ipmi_user *user,
1311 1312
			unsigned int  channel,
			unsigned char address)
L
Linus Torvalds 已提交
1313
{
1314 1315 1316 1317 1318 1319
	int index;

	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;

1320 1321
	if (channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
1322
	user->intf->addrinfo[channel].address = address;
1323 1324
	release_ipmi_user(user, index);

1325
	return 0;
L
Linus Torvalds 已提交
1326
}
1327
EXPORT_SYMBOL(ipmi_set_my_address);
L
Linus Torvalds 已提交
1328

1329
int ipmi_get_my_address(struct ipmi_user *user,
1330 1331
			unsigned int  channel,
			unsigned char *address)
L
Linus Torvalds 已提交
1332
{
1333 1334 1335 1336 1337 1338
	int index;

	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;

1339 1340
	if (channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
1341
	*address = user->intf->addrinfo[channel].address;
1342 1343
	release_ipmi_user(user, index);

1344
	return 0;
L
Linus Torvalds 已提交
1345
}
1346
EXPORT_SYMBOL(ipmi_get_my_address);
L
Linus Torvalds 已提交
1347

1348
int ipmi_set_my_LUN(struct ipmi_user *user,
1349 1350
		    unsigned int  channel,
		    unsigned char LUN)
L
Linus Torvalds 已提交
1351
{
1352 1353 1354 1355 1356 1357
	int index;

	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;

1358 1359
	if (channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
1360
	user->intf->addrinfo[channel].lun = LUN & 0x3;
1361 1362
	release_ipmi_user(user, index);

1363
	return 0;
L
Linus Torvalds 已提交
1364
}
1365
EXPORT_SYMBOL(ipmi_set_my_LUN);
L
Linus Torvalds 已提交
1366

1367
int ipmi_get_my_LUN(struct ipmi_user *user,
1368 1369
		    unsigned int  channel,
		    unsigned char *address)
L
Linus Torvalds 已提交
1370
{
1371 1372 1373 1374 1375 1376
	int index;

	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;

1377 1378
	if (channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
1379
	*address = user->intf->addrinfo[channel].lun;
1380 1381
	release_ipmi_user(user, index);

1382
	return 0;
L
Linus Torvalds 已提交
1383
}
1384
EXPORT_SYMBOL(ipmi_get_my_LUN);
L
Linus Torvalds 已提交
1385

1386
int ipmi_get_maintenance_mode(struct ipmi_user *user)
C
Corey Minyard 已提交
1387
{
1388
	int mode, index;
C
Corey Minyard 已提交
1389 1390
	unsigned long flags;

1391 1392 1393 1394
	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;

C
Corey Minyard 已提交
1395 1396 1397
	spin_lock_irqsave(&user->intf->maintenance_mode_lock, flags);
	mode = user->intf->maintenance_mode;
	spin_unlock_irqrestore(&user->intf->maintenance_mode_lock, flags);
1398
	release_ipmi_user(user, index);
C
Corey Minyard 已提交
1399 1400 1401 1402 1403

	return mode;
}
EXPORT_SYMBOL(ipmi_get_maintenance_mode);

1404
static void maintenance_mode_update(struct ipmi_smi *intf)
C
Corey Minyard 已提交
1405 1406 1407 1408 1409 1410
{
	if (intf->handlers->set_maintenance_mode)
		intf->handlers->set_maintenance_mode(
			intf->send_info, intf->maintenance_mode_enable);
}

1411
int ipmi_set_maintenance_mode(struct ipmi_user *user, int mode)
C
Corey Minyard 已提交
1412
{
1413
	int rv = 0, index;
C
Corey Minyard 已提交
1414
	unsigned long flags;
1415
	struct ipmi_smi *intf = user->intf;
C
Corey Minyard 已提交
1416

1417 1418 1419 1420
	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;

C
Corey Minyard 已提交
1421 1422 1423 1424 1425 1426 1427 1428 1429
	spin_lock_irqsave(&intf->maintenance_mode_lock, flags);
	if (intf->maintenance_mode != mode) {
		switch (mode) {
		case IPMI_MAINTENANCE_MODE_AUTO:
			intf->maintenance_mode_enable
				= (intf->auto_maintenance_timeout > 0);
			break;

		case IPMI_MAINTENANCE_MODE_OFF:
C
Corey Minyard 已提交
1430
			intf->maintenance_mode_enable = false;
C
Corey Minyard 已提交
1431 1432 1433
			break;

		case IPMI_MAINTENANCE_MODE_ON:
C
Corey Minyard 已提交
1434
			intf->maintenance_mode_enable = true;
C
Corey Minyard 已提交
1435 1436 1437 1438 1439 1440
			break;

		default:
			rv = -EINVAL;
			goto out_unlock;
		}
C
Corey Minyard 已提交
1441
		intf->maintenance_mode = mode;
C
Corey Minyard 已提交
1442 1443 1444 1445 1446

		maintenance_mode_update(intf);
	}
 out_unlock:
	spin_unlock_irqrestore(&intf->maintenance_mode_lock, flags);
1447
	release_ipmi_user(user, index);
C
Corey Minyard 已提交
1448 1449 1450 1451 1452

	return rv;
}
EXPORT_SYMBOL(ipmi_set_maintenance_mode);

1453
int ipmi_set_gets_events(struct ipmi_user *user, bool val)
L
Linus Torvalds 已提交
1454
{
1455
	unsigned long        flags;
1456
	struct ipmi_smi      *intf = user->intf;
1457 1458
	struct ipmi_recv_msg *msg, *msg2;
	struct list_head     msgs;
1459 1460 1461 1462 1463
	int index;

	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;
L
Linus Torvalds 已提交
1464

1465 1466 1467
	INIT_LIST_HEAD(&msgs);

	spin_lock_irqsave(&intf->events_lock, flags);
1468 1469 1470
	if (user->gets_events == val)
		goto out;

L
Linus Torvalds 已提交
1471 1472
	user->gets_events = val;

1473 1474 1475 1476 1477 1478 1479
	if (val) {
		if (atomic_inc_return(&intf->event_waiters) == 1)
			need_waiter(intf);
	} else {
		atomic_dec(&intf->event_waiters);
	}

1480 1481 1482 1483 1484 1485 1486 1487 1488
	if (intf->delivering_events)
		/*
		 * Another thread is delivering events for this, so
		 * let it handle any new events.
		 */
		goto out;

	/* Deliver any queued events. */
	while (user->gets_events && !list_empty(&intf->waiting_events)) {
A
Akinobu Mita 已提交
1489 1490
		list_for_each_entry_safe(msg, msg2, &intf->waiting_events, link)
			list_move_tail(&msg->link, &msgs);
1491
		intf->waiting_events_count = 0;
1492
		if (intf->event_msg_printed) {
1493 1494
			dev_warn(intf->si_dev,
				 PFX "Event queue no longer full\n");
1495 1496
			intf->event_msg_printed = 0;
		}
1497

1498 1499 1500 1501 1502 1503
		intf->delivering_events = 1;
		spin_unlock_irqrestore(&intf->events_lock, flags);

		list_for_each_entry_safe(msg, msg2, &msgs, link) {
			msg->user = user;
			kref_get(&user->refcount);
C
Corey Minyard 已提交
1504
			deliver_local_response(intf, msg);
1505 1506 1507 1508
		}

		spin_lock_irqsave(&intf->events_lock, flags);
		intf->delivering_events = 0;
1509 1510
	}

1511
 out:
1512
	spin_unlock_irqrestore(&intf->events_lock, flags);
1513
	release_ipmi_user(user, index);
L
Linus Torvalds 已提交
1514 1515 1516

	return 0;
}
1517
EXPORT_SYMBOL(ipmi_set_gets_events);
L
Linus Torvalds 已提交
1518

1519
static struct cmd_rcvr *find_cmd_rcvr(struct ipmi_smi *intf,
1520
				      unsigned char netfn,
1521 1522
				      unsigned char cmd,
				      unsigned char chan)
1523 1524 1525 1526
{
	struct cmd_rcvr *rcvr;

	list_for_each_entry_rcu(rcvr, &intf->cmd_rcvrs, link) {
1527 1528
		if ((rcvr->netfn == netfn) && (rcvr->cmd == cmd)
					&& (rcvr->chans & (1 << chan)))
1529 1530 1531 1532 1533
			return rcvr;
	}
	return NULL;
}

1534
static int is_cmd_rcvr_exclusive(struct ipmi_smi *intf,
1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548
				 unsigned char netfn,
				 unsigned char cmd,
				 unsigned int  chans)
{
	struct cmd_rcvr *rcvr;

	list_for_each_entry_rcu(rcvr, &intf->cmd_rcvrs, link) {
		if ((rcvr->netfn == netfn) && (rcvr->cmd == cmd)
					&& (rcvr->chans & chans))
			return 0;
	}
	return 1;
}

1549
int ipmi_register_for_cmd(struct ipmi_user *user,
L
Linus Torvalds 已提交
1550
			  unsigned char netfn,
1551 1552
			  unsigned char cmd,
			  unsigned int  chans)
L
Linus Torvalds 已提交
1553
{
1554
	struct ipmi_smi *intf = user->intf;
1555
	struct cmd_rcvr *rcvr;
1556
	int rv = 0, index;
L
Linus Torvalds 已提交
1557

1558 1559 1560
	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;
L
Linus Torvalds 已提交
1561 1562

	rcvr = kmalloc(sizeof(*rcvr), GFP_KERNEL);
1563
	if (!rcvr)
L
Linus Torvalds 已提交
1564
		return -ENOMEM;
1565 1566
	rcvr->cmd = cmd;
	rcvr->netfn = netfn;
1567
	rcvr->chans = chans;
1568
	rcvr->user = user;
L
Linus Torvalds 已提交
1569

1570
	mutex_lock(&intf->cmd_rcvrs_mutex);
L
Linus Torvalds 已提交
1571
	/* Make sure the command/netfn is not already registered. */
1572
	if (!is_cmd_rcvr_exclusive(intf, netfn, cmd, chans)) {
1573 1574
		rv = -EBUSY;
		goto out_unlock;
L
Linus Torvalds 已提交
1575
	}
1576

1577 1578 1579
	if (atomic_inc_return(&intf->event_waiters) == 1)
		need_waiter(intf);

1580
	list_add_rcu(&rcvr->link, &intf->cmd_rcvrs);
L
Linus Torvalds 已提交
1581

1582
 out_unlock:
1583
	mutex_unlock(&intf->cmd_rcvrs_mutex);
L
Linus Torvalds 已提交
1584 1585
	if (rv)
		kfree(rcvr);
1586
	release_ipmi_user(user, index);
L
Linus Torvalds 已提交
1587 1588 1589

	return rv;
}
1590
EXPORT_SYMBOL(ipmi_register_for_cmd);
L
Linus Torvalds 已提交
1591

1592
int ipmi_unregister_for_cmd(struct ipmi_user *user,
L
Linus Torvalds 已提交
1593
			    unsigned char netfn,
1594 1595
			    unsigned char cmd,
			    unsigned int  chans)
L
Linus Torvalds 已提交
1596
{
1597
	struct ipmi_smi *intf = user->intf;
1598
	struct cmd_rcvr *rcvr;
1599
	struct cmd_rcvr *rcvrs = NULL;
1600 1601 1602 1603 1604
	int i, rv = -ENOENT, index;

	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;
L
Linus Torvalds 已提交
1605

1606
	mutex_lock(&intf->cmd_rcvrs_mutex);
1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624
	for (i = 0; i < IPMI_NUM_CHANNELS; i++) {
		if (((1 << i) & chans) == 0)
			continue;
		rcvr = find_cmd_rcvr(intf, netfn, cmd, i);
		if (rcvr == NULL)
			continue;
		if (rcvr->user == user) {
			rv = 0;
			rcvr->chans &= ~chans;
			if (rcvr->chans == 0) {
				list_del_rcu(&rcvr->link);
				rcvr->next = rcvrs;
				rcvrs = rcvr;
			}
		}
	}
	mutex_unlock(&intf->cmd_rcvrs_mutex);
	synchronize_rcu();
1625
	release_ipmi_user(user, index);
1626
	while (rcvrs) {
1627
		atomic_dec(&intf->event_waiters);
1628 1629
		rcvr = rcvrs;
		rcvrs = rcvr->next;
1630
		kfree(rcvr);
L
Linus Torvalds 已提交
1631
	}
1632

1633
	return rv;
L
Linus Torvalds 已提交
1634
}
1635
EXPORT_SYMBOL(ipmi_unregister_for_cmd);
L
Linus Torvalds 已提交
1636 1637 1638 1639 1640

static unsigned char
ipmb_checksum(unsigned char *data, int size)
{
	unsigned char csum = 0;
1641

L
Linus Torvalds 已提交
1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666
	for (; size > 0; size--, data++)
		csum += *data;

	return -csum;
}

static inline void format_ipmb_msg(struct ipmi_smi_msg   *smi_msg,
				   struct kernel_ipmi_msg *msg,
				   struct ipmi_ipmb_addr *ipmb_addr,
				   long                  msgid,
				   unsigned char         ipmb_seq,
				   int                   broadcast,
				   unsigned char         source_address,
				   unsigned char         source_lun)
{
	int i = broadcast;

	/* Format the IPMB header data. */
	smi_msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
	smi_msg->data[1] = IPMI_SEND_MSG_CMD;
	smi_msg->data[2] = ipmb_addr->channel;
	if (broadcast)
		smi_msg->data[3] = 0;
	smi_msg->data[i+3] = ipmb_addr->slave_addr;
	smi_msg->data[i+4] = (msg->netfn << 2) | (ipmb_addr->lun & 0x3);
1667
	smi_msg->data[i+5] = ipmb_checksum(&smi_msg->data[i + 3], 2);
L
Linus Torvalds 已提交
1668 1669 1670 1671 1672 1673
	smi_msg->data[i+6] = source_address;
	smi_msg->data[i+7] = (ipmb_seq << 2) | source_lun;
	smi_msg->data[i+8] = msg->cmd;

	/* Now tack on the data to the message. */
	if (msg->data_len > 0)
1674
		memcpy(&smi_msg->data[i + 9], msg->data, msg->data_len);
L
Linus Torvalds 已提交
1675 1676 1677 1678
	smi_msg->data_size = msg->data_len + 9;

	/* Now calculate the checksum and tack it on. */
	smi_msg->data[i+smi_msg->data_size]
1679
		= ipmb_checksum(&smi_msg->data[i + 6], smi_msg->data_size - 6);
L
Linus Torvalds 已提交
1680

1681 1682 1683 1684
	/*
	 * Add on the checksum size and the offset from the
	 * broadcast.
	 */
L
Linus Torvalds 已提交
1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703
	smi_msg->data_size += 1 + i;

	smi_msg->msgid = msgid;
}

static inline void format_lan_msg(struct ipmi_smi_msg   *smi_msg,
				  struct kernel_ipmi_msg *msg,
				  struct ipmi_lan_addr  *lan_addr,
				  long                  msgid,
				  unsigned char         ipmb_seq,
				  unsigned char         source_lun)
{
	/* Format the IPMB header data. */
	smi_msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
	smi_msg->data[1] = IPMI_SEND_MSG_CMD;
	smi_msg->data[2] = lan_addr->channel;
	smi_msg->data[3] = lan_addr->session_handle;
	smi_msg->data[4] = lan_addr->remote_SWID;
	smi_msg->data[5] = (msg->netfn << 2) | (lan_addr->lun & 0x3);
1704
	smi_msg->data[6] = ipmb_checksum(&smi_msg->data[4], 2);
L
Linus Torvalds 已提交
1705 1706 1707 1708 1709 1710
	smi_msg->data[7] = lan_addr->local_SWID;
	smi_msg->data[8] = (ipmb_seq << 2) | source_lun;
	smi_msg->data[9] = msg->cmd;

	/* Now tack on the data to the message. */
	if (msg->data_len > 0)
1711
		memcpy(&smi_msg->data[10], msg->data, msg->data_len);
L
Linus Torvalds 已提交
1712 1713 1714 1715
	smi_msg->data_size = msg->data_len + 10;

	/* Now calculate the checksum and tack it on. */
	smi_msg->data[smi_msg->data_size]
1716
		= ipmb_checksum(&smi_msg->data[7], smi_msg->data_size - 7);
L
Linus Torvalds 已提交
1717

1718 1719 1720 1721
	/*
	 * Add on the checksum size and the offset from the
	 * broadcast.
	 */
L
Linus Torvalds 已提交
1722 1723 1724 1725 1726
	smi_msg->data_size += 1;

	smi_msg->msgid = msgid;
}

1727
static struct ipmi_smi_msg *smi_add_send_msg(struct ipmi_smi *intf,
A
Arnd Bergmann 已提交
1728 1729
					     struct ipmi_smi_msg *smi_msg,
					     int priority)
1730
{
1731 1732 1733 1734 1735 1736 1737 1738 1739
	if (intf->curr_msg) {
		if (priority > 0)
			list_add_tail(&smi_msg->link, &intf->hp_xmit_msgs);
		else
			list_add_tail(&smi_msg->link, &intf->xmit_msgs);
		smi_msg = NULL;
	} else {
		intf->curr_msg = smi_msg;
	}
A
Arnd Bergmann 已提交
1740 1741 1742 1743 1744

	return smi_msg;
}


1745 1746
static void smi_send(struct ipmi_smi *intf,
		     const struct ipmi_smi_handlers *handlers,
A
Arnd Bergmann 已提交
1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757
		     struct ipmi_smi_msg *smi_msg, int priority)
{
	int run_to_completion = intf->run_to_completion;

	if (run_to_completion) {
		smi_msg = smi_add_send_msg(intf, smi_msg, priority);
	} else {
		unsigned long flags;

		spin_lock_irqsave(&intf->xmit_msgs_lock, flags);
		smi_msg = smi_add_send_msg(intf, smi_msg, priority);
1758
		spin_unlock_irqrestore(&intf->xmit_msgs_lock, flags);
A
Arnd Bergmann 已提交
1759
	}
1760 1761

	if (smi_msg)
1762
		handlers->sender(intf->send_info, smi_msg);
1763 1764
}

1765 1766 1767 1768 1769 1770 1771 1772
static bool is_maintenance_mode_cmd(struct kernel_ipmi_msg *msg)
{
	return (((msg->netfn == IPMI_NETFN_APP_REQUEST)
		 && ((msg->cmd == IPMI_COLD_RESET_CMD)
		     || (msg->cmd == IPMI_WARM_RESET_CMD)))
		|| (msg->netfn == IPMI_NETFN_FIRMWARE_REQUEST));
}

1773
static int i_ipmi_req_sysintf(struct ipmi_smi        *intf,
C
Corey Minyard 已提交
1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839
			      struct ipmi_addr       *addr,
			      long                   msgid,
			      struct kernel_ipmi_msg *msg,
			      struct ipmi_smi_msg    *smi_msg,
			      struct ipmi_recv_msg   *recv_msg,
			      int                    retries,
			      unsigned int           retry_time_ms)
{
	struct ipmi_system_interface_addr *smi_addr;

	if (msg->netfn & 1)
		/* Responses are not allowed to the SMI. */
		return -EINVAL;

	smi_addr = (struct ipmi_system_interface_addr *) addr;
	if (smi_addr->lun > 3) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EINVAL;
	}

	memcpy(&recv_msg->addr, smi_addr, sizeof(*smi_addr));

	if ((msg->netfn == IPMI_NETFN_APP_REQUEST)
	    && ((msg->cmd == IPMI_SEND_MSG_CMD)
		|| (msg->cmd == IPMI_GET_MSG_CMD)
		|| (msg->cmd == IPMI_READ_EVENT_MSG_BUFFER_CMD))) {
		/*
		 * We don't let the user do these, since we manage
		 * the sequence numbers.
		 */
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EINVAL;
	}

	if (is_maintenance_mode_cmd(msg)) {
		unsigned long flags;

		spin_lock_irqsave(&intf->maintenance_mode_lock, flags);
		intf->auto_maintenance_timeout
			= maintenance_mode_timeout_ms;
		if (!intf->maintenance_mode
		    && !intf->maintenance_mode_enable) {
			intf->maintenance_mode_enable = true;
			maintenance_mode_update(intf);
		}
		spin_unlock_irqrestore(&intf->maintenance_mode_lock,
				       flags);
	}

	if (msg->data_len + 2 > IPMI_MAX_MSG_LENGTH) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EMSGSIZE;
	}

	smi_msg->data[0] = (msg->netfn << 2) | (smi_addr->lun & 0x3);
	smi_msg->data[1] = msg->cmd;
	smi_msg->msgid = msgid;
	smi_msg->user_data = recv_msg;
	if (msg->data_len > 0)
		memcpy(&smi_msg->data[2], msg->data, msg->data_len);
	smi_msg->data_size = msg->data_len + 2;
	ipmi_inc_stat(intf, sent_local_commands);

	return 0;
}

1840
static int i_ipmi_req_ipmb(struct ipmi_smi        *intf,
C
Corey Minyard 已提交
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 1876 1877 1878 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 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980
			   struct ipmi_addr       *addr,
			   long                   msgid,
			   struct kernel_ipmi_msg *msg,
			   struct ipmi_smi_msg    *smi_msg,
			   struct ipmi_recv_msg   *recv_msg,
			   unsigned char          source_address,
			   unsigned char          source_lun,
			   int                    retries,
			   unsigned int           retry_time_ms)
{
	struct ipmi_ipmb_addr *ipmb_addr;
	unsigned char ipmb_seq;
	long seqid;
	int broadcast = 0;
	struct ipmi_channel *chans;
	int rv = 0;

	if (addr->channel >= IPMI_MAX_CHANNELS) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EINVAL;
	}

	chans = READ_ONCE(intf->channel_list)->c;

	if (chans[addr->channel].medium != IPMI_CHANNEL_MEDIUM_IPMB) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EINVAL;
	}

	if (addr->addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE) {
		/*
		 * Broadcasts add a zero at the beginning of the
		 * message, but otherwise is the same as an IPMB
		 * address.
		 */
		addr->addr_type = IPMI_IPMB_ADDR_TYPE;
		broadcast = 1;
		retries = 0; /* Don't retry broadcasts. */
	}

	/*
	 * 9 for the header and 1 for the checksum, plus
	 * possibly one for the broadcast.
	 */
	if ((msg->data_len + 10 + broadcast) > IPMI_MAX_MSG_LENGTH) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EMSGSIZE;
	}

	ipmb_addr = (struct ipmi_ipmb_addr *) addr;
	if (ipmb_addr->lun > 3) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EINVAL;
	}

	memcpy(&recv_msg->addr, ipmb_addr, sizeof(*ipmb_addr));

	if (recv_msg->msg.netfn & 0x1) {
		/*
		 * It's a response, so use the user's sequence
		 * from msgid.
		 */
		ipmi_inc_stat(intf, sent_ipmb_responses);
		format_ipmb_msg(smi_msg, msg, ipmb_addr, msgid,
				msgid, broadcast,
				source_address, source_lun);

		/*
		 * Save the receive message so we can use it
		 * to deliver the response.
		 */
		smi_msg->user_data = recv_msg;
	} else {
		/* It's a command, so get a sequence for it. */
		unsigned long flags;

		spin_lock_irqsave(&intf->seq_lock, flags);

		if (is_maintenance_mode_cmd(msg))
			intf->ipmb_maintenance_mode_timeout =
				maintenance_mode_timeout_ms;

		if (intf->ipmb_maintenance_mode_timeout && retry_time_ms == 0)
			/* Different default in maintenance mode */
			retry_time_ms = default_maintenance_retry_ms;

		/*
		 * Create a sequence number with a 1 second
		 * timeout and 4 retries.
		 */
		rv = intf_next_seq(intf,
				   recv_msg,
				   retry_time_ms,
				   retries,
				   broadcast,
				   &ipmb_seq,
				   &seqid);
		if (rv)
			/*
			 * We have used up all the sequence numbers,
			 * probably, so abort.
			 */
			goto out_err;

		ipmi_inc_stat(intf, sent_ipmb_commands);

		/*
		 * Store the sequence number in the message,
		 * so that when the send message response
		 * comes back we can start the timer.
		 */
		format_ipmb_msg(smi_msg, msg, ipmb_addr,
				STORE_SEQ_IN_MSGID(ipmb_seq, seqid),
				ipmb_seq, broadcast,
				source_address, source_lun);

		/*
		 * Copy the message into the recv message data, so we
		 * can retransmit it later if necessary.
		 */
		memcpy(recv_msg->msg_data, smi_msg->data,
		       smi_msg->data_size);
		recv_msg->msg.data = recv_msg->msg_data;
		recv_msg->msg.data_len = smi_msg->data_size;

		/*
		 * We don't unlock until here, because we need
		 * to copy the completed message into the
		 * recv_msg before we release the lock.
		 * Otherwise, race conditions may bite us.  I
		 * know that's pretty paranoid, but I prefer
		 * to be correct.
		 */
out_err:
		spin_unlock_irqrestore(&intf->seq_lock, flags);
	}

	return rv;
}

1981
static int i_ipmi_req_lan(struct ipmi_smi        *intf,
C
Corey Minyard 已提交
1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098
			  struct ipmi_addr       *addr,
			  long                   msgid,
			  struct kernel_ipmi_msg *msg,
			  struct ipmi_smi_msg    *smi_msg,
			  struct ipmi_recv_msg   *recv_msg,
			  unsigned char          source_lun,
			  int                    retries,
			  unsigned int           retry_time_ms)
{
	struct ipmi_lan_addr  *lan_addr;
	unsigned char ipmb_seq;
	long seqid;
	struct ipmi_channel *chans;
	int rv = 0;

	if (addr->channel >= IPMI_MAX_CHANNELS) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EINVAL;
	}

	chans = READ_ONCE(intf->channel_list)->c;

	if ((chans[addr->channel].medium
				!= IPMI_CHANNEL_MEDIUM_8023LAN)
			&& (chans[addr->channel].medium
			    != IPMI_CHANNEL_MEDIUM_ASYNC)) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EINVAL;
	}

	/* 11 for the header and 1 for the checksum. */
	if ((msg->data_len + 12) > IPMI_MAX_MSG_LENGTH) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EMSGSIZE;
	}

	lan_addr = (struct ipmi_lan_addr *) addr;
	if (lan_addr->lun > 3) {
		ipmi_inc_stat(intf, sent_invalid_commands);
		return -EINVAL;
	}

	memcpy(&recv_msg->addr, lan_addr, sizeof(*lan_addr));

	if (recv_msg->msg.netfn & 0x1) {
		/*
		 * It's a response, so use the user's sequence
		 * from msgid.
		 */
		ipmi_inc_stat(intf, sent_lan_responses);
		format_lan_msg(smi_msg, msg, lan_addr, msgid,
			       msgid, source_lun);

		/*
		 * Save the receive message so we can use it
		 * to deliver the response.
		 */
		smi_msg->user_data = recv_msg;
	} else {
		/* It's a command, so get a sequence for it. */
		unsigned long flags;

		spin_lock_irqsave(&intf->seq_lock, flags);

		/*
		 * Create a sequence number with a 1 second
		 * timeout and 4 retries.
		 */
		rv = intf_next_seq(intf,
				   recv_msg,
				   retry_time_ms,
				   retries,
				   0,
				   &ipmb_seq,
				   &seqid);
		if (rv)
			/*
			 * We have used up all the sequence numbers,
			 * probably, so abort.
			 */
			goto out_err;

		ipmi_inc_stat(intf, sent_lan_commands);

		/*
		 * Store the sequence number in the message,
		 * so that when the send message response
		 * comes back we can start the timer.
		 */
		format_lan_msg(smi_msg, msg, lan_addr,
			       STORE_SEQ_IN_MSGID(ipmb_seq, seqid),
			       ipmb_seq, source_lun);

		/*
		 * Copy the message into the recv message data, so we
		 * can retransmit it later if necessary.
		 */
		memcpy(recv_msg->msg_data, smi_msg->data,
		       smi_msg->data_size);
		recv_msg->msg.data = recv_msg->msg_data;
		recv_msg->msg.data_len = smi_msg->data_size;

		/*
		 * We don't unlock until here, because we need
		 * to copy the completed message into the
		 * recv_msg before we release the lock.
		 * Otherwise, race conditions may bite us.  I
		 * know that's pretty paranoid, but I prefer
		 * to be correct.
		 */
out_err:
		spin_unlock_irqrestore(&intf->seq_lock, flags);
	}

	return rv;
}

2099 2100 2101 2102 2103 2104
/*
 * Separate from ipmi_request so that the user does not have to be
 * supplied in certain circumstances (mainly at panic time).  If
 * messages are supplied, they will be freed, even if an error
 * occurs.
 */
2105
static int i_ipmi_request(struct ipmi_user     *user,
2106
			  struct ipmi_smi      *intf,
2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117
			  struct ipmi_addr     *addr,
			  long                 msgid,
			  struct kernel_ipmi_msg *msg,
			  void                 *user_msg_data,
			  void                 *supplied_smi,
			  struct ipmi_recv_msg *supplied_recv,
			  int                  priority,
			  unsigned char        source_address,
			  unsigned char        source_lun,
			  int                  retries,
			  unsigned int         retry_time_ms)
L
Linus Torvalds 已提交
2118
{
C
Corey Minyard 已提交
2119 2120 2121
	struct ipmi_smi_msg *smi_msg;
	struct ipmi_recv_msg *recv_msg;
	int rv = 0;
L
Linus Torvalds 已提交
2122

2123
	if (supplied_recv)
L
Linus Torvalds 已提交
2124
		recv_msg = supplied_recv;
2125
	else {
L
Linus Torvalds 已提交
2126
		recv_msg = ipmi_alloc_recv_msg();
2127 2128 2129 2130
		if (recv_msg == NULL) {
			rv = -ENOMEM;
			goto out;
		}
L
Linus Torvalds 已提交
2131 2132 2133
	}
	recv_msg->user_msg_data = user_msg_data;

2134
	if (supplied_smi)
L
Linus Torvalds 已提交
2135
		smi_msg = (struct ipmi_smi_msg *) supplied_smi;
2136
	else {
L
Linus Torvalds 已提交
2137 2138 2139
		smi_msg = ipmi_alloc_smi_msg();
		if (smi_msg == NULL) {
			ipmi_free_recv_msg(recv_msg);
2140 2141
			rv = -ENOMEM;
			goto out;
L
Linus Torvalds 已提交
2142 2143 2144
		}
	}

2145
	rcu_read_lock();
2146
	if (intf->in_shutdown) {
2147 2148 2149 2150
		rv = -ENODEV;
		goto out_err;
	}

L
Linus Torvalds 已提交
2151
	recv_msg->user = user;
2152
	if (user)
2153
		/* The put happens when the message is freed. */
2154
		kref_get(&user->refcount);
L
Linus Torvalds 已提交
2155
	recv_msg->msgid = msgid;
2156 2157 2158 2159
	/*
	 * Store the message to send in the receive message so timeout
	 * responses can get the proper response data.
	 */
L
Linus Torvalds 已提交
2160 2161 2162
	recv_msg->msg = *msg;

	if (addr->addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE) {
C
Corey Minyard 已提交
2163 2164
		rv = i_ipmi_req_sysintf(intf, addr, msgid, msg, smi_msg,
					recv_msg, retries, retry_time_ms);
2165
	} else if (is_ipmb_addr(addr) || is_ipmb_bcast_addr(addr)) {
C
Corey Minyard 已提交
2166 2167 2168
		rv = i_ipmi_req_ipmb(intf, addr, msgid, msg, smi_msg, recv_msg,
				     source_address, source_lun,
				     retries, retry_time_ms);
2169
	} else if (is_lan_addr(addr)) {
C
Corey Minyard 已提交
2170 2171
		rv = i_ipmi_req_lan(intf, addr, msgid, msg, smi_msg, recv_msg,
				    source_lun, retries, retry_time_ms);
L
Linus Torvalds 已提交
2172 2173
	} else {
	    /* Unknown address type. */
2174
		ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
2175 2176 2177
		rv = -EINVAL;
	}

C
Corey Minyard 已提交
2178 2179 2180 2181 2182 2183
	if (rv) {
out_err:
		ipmi_free_smi_msg(smi_msg);
		ipmi_free_recv_msg(recv_msg);
	} else {
		ipmi_debug_msg("Send", smi_msg->data, smi_msg->data_size);
2184

C
Corey Minyard 已提交
2185 2186
		smi_send(intf, intf->handlers, smi_msg, priority);
	}
2187
	rcu_read_unlock();
L
Linus Torvalds 已提交
2188

2189
out:
L
Linus Torvalds 已提交
2190 2191 2192
	return rv;
}

2193
static int check_addr(struct ipmi_smi  *intf,
2194 2195 2196 2197 2198 2199
		      struct ipmi_addr *addr,
		      unsigned char    *saddr,
		      unsigned char    *lun)
{
	if (addr->channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
2200 2201
	*lun = intf->addrinfo[addr->channel].lun;
	*saddr = intf->addrinfo[addr->channel].address;
2202 2203 2204
	return 0;
}

2205
int ipmi_request_settime(struct ipmi_user *user,
L
Linus Torvalds 已提交
2206 2207 2208 2209 2210 2211 2212 2213
			 struct ipmi_addr *addr,
			 long             msgid,
			 struct kernel_ipmi_msg  *msg,
			 void             *user_msg_data,
			 int              priority,
			 int              retries,
			 unsigned int     retry_time_ms)
{
2214
	unsigned char saddr = 0, lun = 0;
2215
	int rv, index;
2216

2217
	if (!user)
2218
		return -EINVAL;
2219 2220 2221 2222 2223

	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;

2224
	rv = check_addr(user->intf, addr, &saddr, &lun);
2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240
	if (!rv)
		rv = i_ipmi_request(user,
				    user->intf,
				    addr,
				    msgid,
				    msg,
				    user_msg_data,
				    NULL, NULL,
				    priority,
				    saddr,
				    lun,
				    retries,
				    retry_time_ms);

	release_ipmi_user(user, index);
	return rv;
L
Linus Torvalds 已提交
2241
}
2242
EXPORT_SYMBOL(ipmi_request_settime);
L
Linus Torvalds 已提交
2243

2244
int ipmi_request_supply_msgs(struct ipmi_user     *user,
L
Linus Torvalds 已提交
2245 2246 2247 2248 2249 2250 2251 2252
			     struct ipmi_addr     *addr,
			     long                 msgid,
			     struct kernel_ipmi_msg *msg,
			     void                 *user_msg_data,
			     void                 *supplied_smi,
			     struct ipmi_recv_msg *supplied_recv,
			     int                  priority)
{
2253
	unsigned char saddr = 0, lun = 0;
2254
	int rv, index;
2255

2256
	if (!user)
2257
		return -EINVAL;
2258 2259 2260 2261 2262

	user = acquire_ipmi_user(user, &index);
	if (!user)
		return -ENODEV;

2263
	rv = check_addr(user->intf, addr, &saddr, &lun);
2264 2265 2266 2267 2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279
	if (!rv)
		rv = i_ipmi_request(user,
				    user->intf,
				    addr,
				    msgid,
				    msg,
				    user_msg_data,
				    supplied_smi,
				    supplied_recv,
				    priority,
				    saddr,
				    lun,
				    -1, 0);

	release_ipmi_user(user, index);
	return rv;
L
Linus Torvalds 已提交
2280
}
2281
EXPORT_SYMBOL(ipmi_request_supply_msgs);
L
Linus Torvalds 已提交
2282

2283 2284
static void bmc_device_id_handler(struct ipmi_smi *intf,
				  struct ipmi_recv_msg *msg)
2285 2286 2287 2288 2289 2290
{
	int rv;

	if ((msg->addr.addr_type != IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
			|| (msg->msg.netfn != IPMI_NETFN_APP_RESPONSE)
			|| (msg->msg.cmd != IPMI_GET_DEVICE_ID_CMD)) {
2291 2292
		dev_warn(intf->si_dev,
			 PFX "invalid device_id msg: addr_type=%d netfn=%x cmd=%x\n",
2293 2294 2295 2296 2297 2298 2299
			msg->addr.addr_type, msg->msg.netfn, msg->msg.cmd);
		return;
	}

	rv = ipmi_demangle_device_id(msg->msg.netfn, msg->msg.cmd,
			msg->msg.data, msg->msg.data_len, &intf->bmc->fetch_id);
	if (rv) {
2300 2301
		dev_warn(intf->si_dev,
			 PFX "device id demangle failed: %d\n", rv);
2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315
		intf->bmc->dyn_id_set = 0;
	} else {
		/*
		 * Make sure the id data is available before setting
		 * dyn_id_set.
		 */
		smp_wmb();
		intf->bmc->dyn_id_set = 1;
	}

	wake_up(&intf->waitq);
}

static int
2316
send_get_device_id_cmd(struct ipmi_smi *intf)
2317 2318 2319 2320 2321 2322 2323 2324 2325 2326 2327 2328 2329 2330 2331 2332 2333 2334 2335 2336 2337 2338
{
	struct ipmi_system_interface_addr si;
	struct kernel_ipmi_msg msg;

	si.addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
	si.channel = IPMI_BMC_CHANNEL;
	si.lun = 0;

	msg.netfn = IPMI_NETFN_APP_REQUEST;
	msg.cmd = IPMI_GET_DEVICE_ID_CMD;
	msg.data = NULL;
	msg.data_len = 0;

	return i_ipmi_request(NULL,
			      intf,
			      (struct ipmi_addr *) &si,
			      0,
			      &msg,
			      intf,
			      NULL,
			      NULL,
			      0,
2339 2340
			      intf->addrinfo[0].address,
			      intf->addrinfo[0].lun,
2341 2342 2343
			      -1, 0);
}

2344
static int __get_device_id(struct ipmi_smi *intf, struct bmc_device *bmc)
2345 2346 2347 2348 2349 2350 2351 2352 2353 2354 2355 2356 2357 2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377
{
	int rv;

	bmc->dyn_id_set = 2;

	intf->null_user_handler = bmc_device_id_handler;

	rv = send_get_device_id_cmd(intf);
	if (rv)
		return rv;

	wait_event(intf->waitq, bmc->dyn_id_set != 2);

	if (!bmc->dyn_id_set)
		rv = -EIO; /* Something went wrong in the fetch. */

	/* dyn_id_set makes the id data available. */
	smp_rmb();

	intf->null_user_handler = NULL;

	return rv;
}

/*
 * Fetch the device id for the bmc/interface.  You must pass in either
 * bmc or intf, this code will get the other one.  If the data has
 * been recently fetched, this will just use the cached data.  Otherwise
 * it will run a new fetch.
 *
 * Except for the first time this is called (in ipmi_register_smi()),
 * this will always return good data;
 */
2378
static int __bmc_get_device_id(struct ipmi_smi *intf, struct bmc_device *bmc,
2379
			       struct ipmi_device_id *id,
2380
			       bool *guid_set, guid_t *guid, int intf_num)
2381
{
2382
	int rv = 0;
2383
	int prev_dyn_id_set, prev_guid_set;
2384
	bool intf_set = intf != NULL;
2385 2386 2387 2388 2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406

	if (!intf) {
		mutex_lock(&bmc->dyn_mutex);
retry_bmc_lock:
		if (list_empty(&bmc->intfs)) {
			mutex_unlock(&bmc->dyn_mutex);
			return -ENOENT;
		}
		intf = list_first_entry(&bmc->intfs, struct ipmi_smi,
					bmc_link);
		kref_get(&intf->refcount);
		mutex_unlock(&bmc->dyn_mutex);
		mutex_lock(&intf->bmc_reg_mutex);
		mutex_lock(&bmc->dyn_mutex);
		if (intf != list_first_entry(&bmc->intfs, struct ipmi_smi,
					     bmc_link)) {
			mutex_unlock(&intf->bmc_reg_mutex);
			kref_put(&intf->refcount, intf_free);
			goto retry_bmc_lock;
		}
	} else {
		mutex_lock(&intf->bmc_reg_mutex);
2407
		bmc = intf->bmc;
2408 2409 2410
		mutex_lock(&bmc->dyn_mutex);
		kref_get(&intf->refcount);
	}
2411

2412
	/* If we have a valid and current ID, just return that. */
2413 2414 2415
	if (intf->in_bmc_register ||
	    (bmc->dyn_id_set && time_is_after_jiffies(bmc->dyn_id_expiry)))
		goto out_noprocessing;
2416

2417 2418 2419 2420
	prev_guid_set = bmc->dyn_guid_set;
	__get_guid(intf);

	prev_dyn_id_set = bmc->dyn_id_set;
2421 2422 2423 2424
	rv = __get_device_id(intf, bmc);
	if (rv)
		goto out;

2425 2426 2427 2428 2429 2430 2431 2432
	/*
	 * The guid, device id, manufacturer id, and product id should
	 * not change on a BMC.  If it does we have to do some dancing.
	 */
	if (!intf->bmc_registered
	    || (!prev_guid_set && bmc->dyn_guid_set)
	    || (!prev_dyn_id_set && bmc->dyn_id_set)
	    || (prev_guid_set && bmc->dyn_guid_set
2433
		&& !guid_equal(&bmc->guid, &bmc->fetch_guid))
2434 2435 2436 2437 2438
	    || bmc->id.device_id != bmc->fetch_id.device_id
	    || bmc->id.manufacturer_id != bmc->fetch_id.manufacturer_id
	    || bmc->id.product_id != bmc->fetch_id.product_id) {
		struct ipmi_device_id id = bmc->fetch_id;
		int guid_set = bmc->dyn_guid_set;
2439
		guid_t guid;
2440

2441
		guid = bmc->fetch_guid;
2442 2443 2444 2445 2446 2447
		mutex_unlock(&bmc->dyn_mutex);

		__ipmi_bmc_unregister(intf);
		/* Fill in the temporary BMC for good measure. */
		intf->bmc->id = id;
		intf->bmc->dyn_guid_set = guid_set;
2448 2449
		intf->bmc->guid = guid;
		if (__ipmi_bmc_register(intf, &id, guid_set, &guid, intf_num))
2450
			need_waiter(intf); /* Retry later on an error. */
2451 2452 2453
		else
			__scan_channels(intf, &id);

2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469

		if (!intf_set) {
			/*
			 * We weren't given the interface on the
			 * command line, so restart the operation on
			 * the next interface for the BMC.
			 */
			mutex_unlock(&intf->bmc_reg_mutex);
			mutex_lock(&bmc->dyn_mutex);
			goto retry_bmc_lock;
		}

		/* We have a new BMC, set it up. */
		bmc = intf->bmc;
		mutex_lock(&bmc->dyn_mutex);
		goto out_noprocessing;
2470 2471 2472
	} else if (memcmp(&bmc->fetch_id, &bmc->id, sizeof(bmc->id)))
		/* Version info changes, scan the channels again. */
		__scan_channels(intf, &bmc->fetch_id);
2473 2474 2475 2476 2477 2478 2479 2480

	bmc->dyn_id_expiry = jiffies + IPMI_DYN_DEV_ID_EXPIRY;

out:
	if (rv && prev_dyn_id_set) {
		rv = 0; /* Ignore failures if we have previous data. */
		bmc->dyn_id_set = prev_dyn_id_set;
	}
2481 2482 2483
	if (!rv) {
		bmc->id = bmc->fetch_id;
		if (bmc->dyn_guid_set)
2484
			bmc->guid = bmc->fetch_guid;
2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495
		else if (prev_guid_set)
			/*
			 * The guid used to be valid and it failed to fetch,
			 * just use the cached value.
			 */
			bmc->dyn_guid_set = prev_guid_set;
	}
out_noprocessing:
	if (!rv) {
		if (id)
			*id = bmc->id;
2496

2497 2498
		if (guid_set)
			*guid_set = bmc->dyn_guid_set;
2499

2500
		if (guid && bmc->dyn_guid_set)
2501
			*guid =  bmc->guid;
2502
	}
2503

2504 2505 2506 2507 2508
	mutex_unlock(&bmc->dyn_mutex);
	mutex_unlock(&intf->bmc_reg_mutex);

	kref_put(&intf->refcount, intf_free);
	return rv;
2509 2510
}

2511
static int bmc_get_device_id(struct ipmi_smi *intf, struct bmc_device *bmc,
2512
			     struct ipmi_device_id *id,
2513
			     bool *guid_set, guid_t *guid)
2514 2515 2516 2517
{
	return __bmc_get_device_id(intf, bmc, id, guid_set, guid, -1);
}

2518
#ifdef CONFIG_IPMI_PROC_INTERFACE
2519
static int smi_ipmb_proc_show(struct seq_file *m, void *v)
L
Linus Torvalds 已提交
2520
{
2521
	struct ipmi_smi *intf = m->private;
2522
	int        i;
L
Linus Torvalds 已提交
2523

2524
	seq_printf(m, "%x", intf->addrinfo[0].address);
2525
	for (i = 1; i < IPMI_MAX_CHANNELS; i++)
2526
		seq_printf(m, " %x", intf->addrinfo[i].address);
2527 2528
	seq_putc(m, '\n');

2529
	return 0;
L
Linus Torvalds 已提交
2530 2531
}

2532
static int smi_ipmb_proc_open(struct inode *inode, struct file *file)
L
Linus Torvalds 已提交
2533
{
A
Al Viro 已提交
2534
	return single_open(file, smi_ipmb_proc_show, PDE_DATA(inode));
2535
}
L
Linus Torvalds 已提交
2536

2537 2538 2539 2540 2541 2542 2543 2544 2545
static const struct file_operations smi_ipmb_proc_ops = {
	.open		= smi_ipmb_proc_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

static int smi_version_proc_show(struct seq_file *m, void *v)
{
2546
	struct ipmi_smi *intf = m->private;
2547 2548 2549
	struct ipmi_device_id id;
	int rv;

2550
	rv = bmc_get_device_id(intf, NULL, &id, NULL, NULL);
2551 2552
	if (rv)
		return rv;
2553

2554
	seq_printf(m, "%u.%u\n",
2555 2556
		   ipmi_version_major(&id),
		   ipmi_version_minor(&id));
2557

2558
	return 0;
L
Linus Torvalds 已提交
2559 2560
}

2561
static int smi_version_proc_open(struct inode *inode, struct file *file)
L
Linus Torvalds 已提交
2562
{
A
Al Viro 已提交
2563
	return single_open(file, smi_version_proc_show, PDE_DATA(inode));
2564 2565 2566 2567 2568 2569 2570 2571
}

static const struct file_operations smi_version_proc_ops = {
	.open		= smi_version_proc_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};
L
Linus Torvalds 已提交
2572

2573 2574
static int smi_stats_proc_show(struct seq_file *m, void *v)
{
2575
	struct ipmi_smi *intf = m->private;
2576 2577

	seq_printf(m, "sent_invalid_commands:       %u\n",
2578
		       ipmi_get_stat(intf, sent_invalid_commands));
2579
	seq_printf(m, "sent_local_commands:         %u\n",
2580
		       ipmi_get_stat(intf, sent_local_commands));
2581
	seq_printf(m, "handled_local_responses:     %u\n",
2582
		       ipmi_get_stat(intf, handled_local_responses));
2583
	seq_printf(m, "unhandled_local_responses:   %u\n",
2584
		       ipmi_get_stat(intf, unhandled_local_responses));
2585
	seq_printf(m, "sent_ipmb_commands:          %u\n",
2586
		       ipmi_get_stat(intf, sent_ipmb_commands));
2587
	seq_printf(m, "sent_ipmb_command_errs:      %u\n",
2588
		       ipmi_get_stat(intf, sent_ipmb_command_errs));
2589
	seq_printf(m, "retransmitted_ipmb_commands: %u\n",
2590
		       ipmi_get_stat(intf, retransmitted_ipmb_commands));
2591
	seq_printf(m, "timed_out_ipmb_commands:     %u\n",
2592
		       ipmi_get_stat(intf, timed_out_ipmb_commands));
2593
	seq_printf(m, "timed_out_ipmb_broadcasts:   %u\n",
2594
		       ipmi_get_stat(intf, timed_out_ipmb_broadcasts));
2595
	seq_printf(m, "sent_ipmb_responses:         %u\n",
2596
		       ipmi_get_stat(intf, sent_ipmb_responses));
2597
	seq_printf(m, "handled_ipmb_responses:      %u\n",
2598
		       ipmi_get_stat(intf, handled_ipmb_responses));
2599
	seq_printf(m, "invalid_ipmb_responses:      %u\n",
2600
		       ipmi_get_stat(intf, invalid_ipmb_responses));
2601
	seq_printf(m, "unhandled_ipmb_responses:    %u\n",
2602
		       ipmi_get_stat(intf, unhandled_ipmb_responses));
2603
	seq_printf(m, "sent_lan_commands:           %u\n",
2604
		       ipmi_get_stat(intf, sent_lan_commands));
2605
	seq_printf(m, "sent_lan_command_errs:       %u\n",
2606
		       ipmi_get_stat(intf, sent_lan_command_errs));
2607
	seq_printf(m, "retransmitted_lan_commands:  %u\n",
2608
		       ipmi_get_stat(intf, retransmitted_lan_commands));
2609
	seq_printf(m, "timed_out_lan_commands:      %u\n",
2610
		       ipmi_get_stat(intf, timed_out_lan_commands));
2611
	seq_printf(m, "sent_lan_responses:          %u\n",
2612
		       ipmi_get_stat(intf, sent_lan_responses));
2613
	seq_printf(m, "handled_lan_responses:       %u\n",
2614
		       ipmi_get_stat(intf, handled_lan_responses));
2615
	seq_printf(m, "invalid_lan_responses:       %u\n",
2616
		       ipmi_get_stat(intf, invalid_lan_responses));
2617
	seq_printf(m, "unhandled_lan_responses:     %u\n",
2618
		       ipmi_get_stat(intf, unhandled_lan_responses));
2619
	seq_printf(m, "handled_commands:            %u\n",
2620
		       ipmi_get_stat(intf, handled_commands));
2621
	seq_printf(m, "invalid_commands:            %u\n",
2622
		       ipmi_get_stat(intf, invalid_commands));
2623
	seq_printf(m, "unhandled_commands:          %u\n",
2624
		       ipmi_get_stat(intf, unhandled_commands));
2625
	seq_printf(m, "invalid_events:              %u\n",
2626
		       ipmi_get_stat(intf, invalid_events));
2627
	seq_printf(m, "events:                      %u\n",
2628
		       ipmi_get_stat(intf, events));
2629
	seq_printf(m, "failed rexmit LAN msgs:      %u\n",
2630
		       ipmi_get_stat(intf, dropped_rexmit_lan_commands));
2631
	seq_printf(m, "failed rexmit IPMB msgs:     %u\n",
2632
		       ipmi_get_stat(intf, dropped_rexmit_ipmb_commands));
2633 2634
	return 0;
}
L
Linus Torvalds 已提交
2635

2636 2637
static int smi_stats_proc_open(struct inode *inode, struct file *file)
{
A
Al Viro 已提交
2638
	return single_open(file, smi_stats_proc_show, PDE_DATA(inode));
L
Linus Torvalds 已提交
2639
}
2640 2641 2642 2643 2644 2645 2646

static const struct file_operations smi_stats_proc_ops = {
	.open		= smi_stats_proc_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};
L
Linus Torvalds 已提交
2647

2648
int ipmi_smi_add_proc_entry(struct ipmi_smi *smi, char *name,
2649
			    const struct file_operations *proc_ops,
2650
			    void *data)
L
Linus Torvalds 已提交
2651 2652
{
	int                    rv = 0;
2653
	struct proc_dir_entry  *file;
L
Linus Torvalds 已提交
2654 2655 2656 2657 2658 2659
	struct ipmi_proc_entry *entry;

	/* Create a list element. */
	entry = kmalloc(sizeof(*entry), GFP_KERNEL);
	if (!entry)
		return -ENOMEM;
2660
	entry->name = kstrdup(name, GFP_KERNEL);
L
Linus Torvalds 已提交
2661 2662 2663 2664 2665
	if (!entry->name) {
		kfree(entry);
		return -ENOMEM;
	}

2666
	file = proc_create_data(name, 0, smi->proc_dir, proc_ops, data);
L
Linus Torvalds 已提交
2667 2668 2669 2670 2671
	if (!file) {
		kfree(entry->name);
		kfree(entry);
		rv = -ENOMEM;
	} else {
C
Corey Minyard 已提交
2672
		mutex_lock(&smi->proc_entry_lock);
L
Linus Torvalds 已提交
2673 2674 2675
		/* Stick it on the list. */
		entry->next = smi->proc_entries;
		smi->proc_entries = entry;
C
Corey Minyard 已提交
2676
		mutex_unlock(&smi->proc_entry_lock);
L
Linus Torvalds 已提交
2677 2678 2679 2680
	}

	return rv;
}
2681
EXPORT_SYMBOL(ipmi_smi_add_proc_entry);
L
Linus Torvalds 已提交
2682

2683
static int add_proc_entries(struct ipmi_smi *smi, int num)
L
Linus Torvalds 已提交
2684 2685 2686 2687 2688 2689 2690 2691 2692 2693
{
	int rv = 0;

	sprintf(smi->proc_dir_name, "%d", num);
	smi->proc_dir = proc_mkdir(smi->proc_dir_name, proc_ipmi_root);
	if (!smi->proc_dir)
		rv = -ENOMEM;

	if (rv == 0)
		rv = ipmi_smi_add_proc_entry(smi, "stats",
2694
					     &smi_stats_proc_ops,
2695
					     smi);
L
Linus Torvalds 已提交
2696 2697 2698

	if (rv == 0)
		rv = ipmi_smi_add_proc_entry(smi, "ipmb",
2699
					     &smi_ipmb_proc_ops,
2700
					     smi);
L
Linus Torvalds 已提交
2701 2702 2703

	if (rv == 0)
		rv = ipmi_smi_add_proc_entry(smi, "version",
2704
					     &smi_version_proc_ops,
2705
					     smi);
L
Linus Torvalds 已提交
2706 2707 2708 2709

	return rv;
}

2710
static void remove_proc_entries(struct ipmi_smi *smi)
L
Linus Torvalds 已提交
2711 2712 2713
{
	struct ipmi_proc_entry *entry;

C
Corey Minyard 已提交
2714
	mutex_lock(&smi->proc_entry_lock);
L
Linus Torvalds 已提交
2715 2716 2717 2718 2719 2720 2721 2722
	while (smi->proc_entries) {
		entry = smi->proc_entries;
		smi->proc_entries = entry->next;

		remove_proc_entry(entry->name, smi->proc_dir);
		kfree(entry->name);
		kfree(entry);
	}
C
Corey Minyard 已提交
2723
	mutex_unlock(&smi->proc_entry_lock);
L
Linus Torvalds 已提交
2724 2725
	remove_proc_entry(smi->proc_dir_name, proc_ipmi_root);
}
2726
#endif /* CONFIG_IPMI_PROC_INTERFACE */
L
Linus Torvalds 已提交
2727

2728 2729 2730 2731
static ssize_t device_id_show(struct device *dev,
			      struct device_attribute *attr,
			      char *buf)
{
2732
	struct bmc_device *bmc = to_bmc_device(dev);
2733 2734 2735
	struct ipmi_device_id id;
	int rv;

2736
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2737 2738
	if (rv)
		return rv;
2739

2740
	return snprintf(buf, 10, "%u\n", id.device_id);
2741
}
J
Joe Perches 已提交
2742
static DEVICE_ATTR_RO(device_id);
2743

2744 2745 2746
static ssize_t provides_device_sdrs_show(struct device *dev,
					 struct device_attribute *attr,
					 char *buf)
2747
{
2748
	struct bmc_device *bmc = to_bmc_device(dev);
2749 2750
	struct ipmi_device_id id;
	int rv;
2751

2752
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2753 2754 2755 2756
	if (rv)
		return rv;

	return snprintf(buf, 10, "%u\n", (id.device_revision & 0x80) >> 7);
2757
}
J
Joe Perches 已提交
2758
static DEVICE_ATTR_RO(provides_device_sdrs);
2759 2760 2761 2762

static ssize_t revision_show(struct device *dev, struct device_attribute *attr,
			     char *buf)
{
2763
	struct bmc_device *bmc = to_bmc_device(dev);
2764 2765
	struct ipmi_device_id id;
	int rv;
2766

2767
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2768 2769 2770 2771
	if (rv)
		return rv;

	return snprintf(buf, 20, "%u\n", id.device_revision & 0x0F);
2772
}
J
Joe Perches 已提交
2773
static DEVICE_ATTR_RO(revision);
2774

2775 2776 2777
static ssize_t firmware_revision_show(struct device *dev,
				      struct device_attribute *attr,
				      char *buf)
2778
{
2779
	struct bmc_device *bmc = to_bmc_device(dev);
2780 2781
	struct ipmi_device_id id;
	int rv;
2782

2783
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2784 2785 2786 2787 2788
	if (rv)
		return rv;

	return snprintf(buf, 20, "%u.%x\n", id.firmware_revision_1,
			id.firmware_revision_2);
2789
}
J
Joe Perches 已提交
2790
static DEVICE_ATTR_RO(firmware_revision);
2791 2792 2793 2794 2795

static ssize_t ipmi_version_show(struct device *dev,
				 struct device_attribute *attr,
				 char *buf)
{
2796
	struct bmc_device *bmc = to_bmc_device(dev);
2797 2798 2799
	struct ipmi_device_id id;
	int rv;

2800
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2801 2802
	if (rv)
		return rv;
2803 2804

	return snprintf(buf, 20, "%u.%u\n",
2805 2806
			ipmi_version_major(&id),
			ipmi_version_minor(&id));
2807
}
J
Joe Perches 已提交
2808
static DEVICE_ATTR_RO(ipmi_version);
2809 2810 2811 2812 2813

static ssize_t add_dev_support_show(struct device *dev,
				    struct device_attribute *attr,
				    char *buf)
{
2814
	struct bmc_device *bmc = to_bmc_device(dev);
2815 2816
	struct ipmi_device_id id;
	int rv;
2817

2818
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2819 2820 2821 2822
	if (rv)
		return rv;

	return snprintf(buf, 10, "0x%02x\n", id.additional_device_support);
2823
}
2824 2825
static DEVICE_ATTR(additional_device_support, S_IRUGO, add_dev_support_show,
		   NULL);
2826 2827 2828 2829 2830

static ssize_t manufacturer_id_show(struct device *dev,
				    struct device_attribute *attr,
				    char *buf)
{
2831
	struct bmc_device *bmc = to_bmc_device(dev);
2832 2833 2834
	struct ipmi_device_id id;
	int rv;

2835
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2836 2837
	if (rv)
		return rv;
2838

2839
	return snprintf(buf, 20, "0x%6.6x\n", id.manufacturer_id);
2840
}
J
Joe Perches 已提交
2841
static DEVICE_ATTR_RO(manufacturer_id);
2842 2843 2844 2845 2846

static ssize_t product_id_show(struct device *dev,
			       struct device_attribute *attr,
			       char *buf)
{
2847
	struct bmc_device *bmc = to_bmc_device(dev);
2848 2849 2850
	struct ipmi_device_id id;
	int rv;

2851
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2852 2853
	if (rv)
		return rv;
2854

2855
	return snprintf(buf, 10, "0x%4.4x\n", id.product_id);
2856
}
J
Joe Perches 已提交
2857
static DEVICE_ATTR_RO(product_id);
2858 2859 2860 2861 2862

static ssize_t aux_firmware_rev_show(struct device *dev,
				     struct device_attribute *attr,
				     char *buf)
{
2863
	struct bmc_device *bmc = to_bmc_device(dev);
2864 2865 2866
	struct ipmi_device_id id;
	int rv;

2867
	rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2868 2869
	if (rv)
		return rv;
2870 2871

	return snprintf(buf, 21, "0x%02x 0x%02x 0x%02x 0x%02x\n",
2872 2873 2874 2875
			id.aux_firmware_revision[3],
			id.aux_firmware_revision[2],
			id.aux_firmware_revision[1],
			id.aux_firmware_revision[0]);
2876
}
2877
static DEVICE_ATTR(aux_firmware_revision, S_IRUGO, aux_firmware_rev_show, NULL);
2878 2879 2880 2881

static ssize_t guid_show(struct device *dev, struct device_attribute *attr,
			 char *buf)
{
2882
	struct bmc_device *bmc = to_bmc_device(dev);
2883
	bool guid_set;
2884
	guid_t guid;
2885 2886
	int rv;

2887
	rv = bmc_get_device_id(NULL, bmc, NULL, &guid_set, &guid);
2888 2889 2890 2891
	if (rv)
		return rv;
	if (!guid_set)
		return -ENOENT;
2892

2893
	return snprintf(buf, 38, "%pUl\n", guid.b);
2894
}
J
Joe Perches 已提交
2895
static DEVICE_ATTR_RO(guid);
2896 2897 2898 2899 2900 2901 2902 2903 2904 2905

static struct attribute *bmc_dev_attrs[] = {
	&dev_attr_device_id.attr,
	&dev_attr_provides_device_sdrs.attr,
	&dev_attr_revision.attr,
	&dev_attr_firmware_revision.attr,
	&dev_attr_ipmi_version.attr,
	&dev_attr_additional_device_support.attr,
	&dev_attr_manufacturer_id.attr,
	&dev_attr_product_id.attr,
2906 2907
	&dev_attr_aux_firmware_revision.attr,
	&dev_attr_guid.attr,
2908 2909
	NULL
};
2910

2911 2912 2913 2914 2915 2916
static umode_t bmc_dev_attr_is_visible(struct kobject *kobj,
				       struct attribute *attr, int idx)
{
	struct device *dev = kobj_to_dev(kobj);
	struct bmc_device *bmc = to_bmc_device(dev);
	umode_t mode = attr->mode;
2917
	int rv;
2918

2919
	if (attr == &dev_attr_aux_firmware_revision.attr) {
2920 2921 2922
		struct ipmi_device_id id;

		rv = bmc_get_device_id(NULL, bmc, &id, NULL, NULL);
2923 2924
		return (!rv && id.aux_firmware_revision_set) ? mode : 0;
	}
2925 2926 2927 2928 2929 2930
	if (attr == &dev_attr_guid.attr) {
		bool guid_set;

		rv = bmc_get_device_id(NULL, bmc, NULL, &guid_set, NULL);
		return (!rv && guid_set) ? mode : 0;
	}
2931 2932 2933
	return mode;
}

2934
static const struct attribute_group bmc_dev_attr_group = {
2935
	.attrs		= bmc_dev_attrs,
2936
	.is_visible	= bmc_dev_attr_is_visible,
2937
};
J
Jeff Garzik 已提交
2938

2939 2940 2941 2942 2943
static const struct attribute_group *bmc_dev_attr_groups[] = {
	&bmc_dev_attr_group,
	NULL
};

2944
static const struct device_type bmc_device_type = {
2945 2946 2947
	.groups		= bmc_dev_attr_groups,
};

2948 2949
static int __find_bmc_guid(struct device *dev, void *data)
{
2950
	guid_t *guid = data;
2951 2952
	struct bmc_device *bmc;
	int rv;
2953

2954 2955 2956
	if (dev->type != &bmc_device_type)
		return 0;

2957
	bmc = to_bmc_device(dev);
2958
	rv = bmc->dyn_guid_set && guid_equal(&bmc->guid, guid);
2959 2960 2961
	if (rv)
		rv = kref_get_unless_zero(&bmc->usecount);
	return rv;
2962 2963
}

2964
/*
2965
 * Returns with the bmc's usecount incremented, if it is non-NULL.
2966
 */
2967
static struct bmc_device *ipmi_find_bmc_guid(struct device_driver *drv,
2968
					     guid_t *guid)
2969 2970
{
	struct device *dev;
2971
	struct bmc_device *bmc = NULL;
2972 2973

	dev = driver_find_device(drv, NULL, guid, __find_bmc_guid);
2974 2975 2976 2977 2978
	if (dev) {
		bmc = to_bmc_device(dev);
		put_device(dev);
	}
	return bmc;
2979 2980 2981 2982 2983 2984 2985 2986 2987
}

struct prod_dev_id {
	unsigned int  product_id;
	unsigned char device_id;
};

static int __find_bmc_prod_dev_id(struct device *dev, void *data)
{
2988
	struct prod_dev_id *cid = data;
2989
	struct bmc_device *bmc;
2990
	int rv;
2991 2992 2993

	if (dev->type != &bmc_device_type)
		return 0;
2994

2995
	bmc = to_bmc_device(dev);
2996 2997
	rv = (bmc->id.product_id == cid->product_id
	      && bmc->id.device_id == cid->device_id);
2998
	if (rv)
2999 3000
		rv = kref_get_unless_zero(&bmc->usecount);
	return rv;
3001 3002
}

3003
/*
3004
 * Returns with the bmc's usecount incremented, if it is non-NULL.
3005
 */
3006 3007 3008 3009 3010 3011 3012 3013 3014
static struct bmc_device *ipmi_find_bmc_prod_dev_id(
	struct device_driver *drv,
	unsigned int product_id, unsigned char device_id)
{
	struct prod_dev_id id = {
		.product_id = product_id,
		.device_id = device_id,
	};
	struct device *dev;
3015
	struct bmc_device *bmc = NULL;
3016 3017

	dev = driver_find_device(drv, NULL, &id, __find_bmc_prod_dev_id);
3018 3019 3020 3021 3022
	if (dev) {
		bmc = to_bmc_device(dev);
		put_device(dev);
	}
	return bmc;
3023 3024
}

3025 3026
static DEFINE_IDA(ipmi_bmc_ida);

3027 3028 3029 3030
static void
release_bmc_device(struct device *dev)
{
	kfree(to_bmc_device(dev));
J
Jeff Garzik 已提交
3031 3032
}

3033
static void cleanup_bmc_work(struct work_struct *work)
J
Jeff Garzik 已提交
3034
{
3035 3036
	struct bmc_device *bmc = container_of(work, struct bmc_device,
					      remove_work);
3037
	int id = bmc->pdev.id; /* Unregister overwrites id */
J
Jeff Garzik 已提交
3038

3039
	platform_device_unregister(&bmc->pdev);
3040
	ida_simple_remove(&ipmi_bmc_ida, id);
3041 3042
}

3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058
static void
cleanup_bmc_device(struct kref *ref)
{
	struct bmc_device *bmc = container_of(ref, struct bmc_device, usecount);

	/*
	 * Remove the platform device in a work queue to avoid issues
	 * with removing the device attributes while reading a device
	 * attribute.
	 */
	schedule_work(&bmc->remove_work);
}

/*
 * Must be called with intf->bmc_reg_mutex held.
 */
3059
static void __ipmi_bmc_unregister(struct ipmi_smi *intf)
3060 3061 3062
{
	struct bmc_device *bmc = intf->bmc;

C
Corey Minyard 已提交
3063 3064 3065
	if (!intf->bmc_registered)
		return;

3066
	sysfs_remove_link(&intf->si_dev->kobj, "bmc");
C
Corey Minyard 已提交
3067 3068 3069
	sysfs_remove_link(&bmc->pdev.dev.kobj, intf->my_dev_name);
	kfree(intf->my_dev_name);
	intf->my_dev_name = NULL;
3070

3071
	mutex_lock(&bmc->dyn_mutex);
3072
	list_del(&intf->bmc_link);
3073
	mutex_unlock(&bmc->dyn_mutex);
3074
	intf->bmc = &intf->tmp_bmc;
3075
	kref_put(&bmc->usecount, cleanup_bmc_device);
C
Corey Minyard 已提交
3076
	intf->bmc_registered = false;
3077
}
3078

3079
static void ipmi_bmc_unregister(struct ipmi_smi *intf)
3080 3081 3082
{
	mutex_lock(&intf->bmc_reg_mutex);
	__ipmi_bmc_unregister(intf);
3083
	mutex_unlock(&intf->bmc_reg_mutex);
3084 3085
}

3086 3087 3088
/*
 * Must be called with intf->bmc_reg_mutex held.
 */
3089
static int __ipmi_bmc_register(struct ipmi_smi *intf,
3090
			       struct ipmi_device_id *id,
3091
			       bool guid_set, guid_t *guid, int intf_num)
3092 3093
{
	int               rv;
3094
	struct bmc_device *bmc;
3095 3096
	struct bmc_device *old_bmc;

3097 3098 3099 3100 3101 3102 3103 3104 3105
	/*
	 * platform_device_register() can cause bmc_reg_mutex to
	 * be claimed because of the is_visible functions of
	 * the attributes.  Eliminate possible recursion and
	 * release the lock.
	 */
	intf->in_bmc_register = true;
	mutex_unlock(&intf->bmc_reg_mutex);

3106 3107 3108 3109
	/*
	 * Try to find if there is an bmc_device struct
	 * representing the interfaced BMC already
	 */
3110
	mutex_lock(&ipmidriver_mutex);
3111 3112
	if (guid_set)
		old_bmc = ipmi_find_bmc_guid(&ipmidriver.driver, guid);
3113
	else
3114
		old_bmc = ipmi_find_bmc_prod_dev_id(&ipmidriver.driver,
3115 3116
						    id->product_id,
						    id->device_id);
3117 3118 3119 3120 3121 3122

	/*
	 * If there is already an bmc_device, free the new one,
	 * otherwise register the new BMC device
	 */
	if (old_bmc) {
3123
		bmc = old_bmc;
3124 3125 3126 3127
		/*
		 * Note: old_bmc already has usecount incremented by
		 * the BMC find functions.
		 */
3128
		intf->bmc = old_bmc;
3129
		mutex_lock(&bmc->dyn_mutex);
3130
		list_add_tail(&intf->bmc_link, &bmc->intfs);
3131
		mutex_unlock(&bmc->dyn_mutex);
3132

3133 3134 3135 3136 3137 3138
		dev_info(intf->si_dev,
			 "ipmi: interfacing existing BMC (man_id: 0x%6.6x,"
			 " prod_id: 0x%4.4x, dev_id: 0x%2.2x)\n",
			 bmc->id.manufacturer_id,
			 bmc->id.product_id,
			 bmc->id.device_id);
3139
	} else {
3140 3141 3142 3143 3144 3145 3146
		bmc = kzalloc(sizeof(*bmc), GFP_KERNEL);
		if (!bmc) {
			rv = -ENOMEM;
			goto out;
		}
		INIT_LIST_HEAD(&bmc->intfs);
		mutex_init(&bmc->dyn_mutex);
3147 3148 3149 3150 3151
		INIT_WORK(&bmc->remove_work, cleanup_bmc_work);

		bmc->id = *id;
		bmc->dyn_id_set = 1;
		bmc->dyn_guid_set = guid_set;
3152
		bmc->guid = *guid;
3153
		bmc->dyn_id_expiry = jiffies + IPMI_DYN_DEV_ID_EXPIRY;
3154

3155
		bmc->pdev.name = "ipmi_bmc";
3156

3157 3158 3159
		rv = ida_simple_get(&ipmi_bmc_ida, 0, 0, GFP_KERNEL);
		if (rv < 0)
			goto out;
3160
		bmc->pdev.dev.driver = &ipmidriver.driver;
3161
		bmc->pdev.id = rv;
3162 3163
		bmc->pdev.dev.release = release_bmc_device;
		bmc->pdev.dev.type = &bmc_device_type;
3164
		kref_init(&bmc->usecount);
3165

3166 3167
		intf->bmc = bmc;
		mutex_lock(&bmc->dyn_mutex);
3168
		list_add_tail(&intf->bmc_link, &bmc->intfs);
3169 3170 3171
		mutex_unlock(&bmc->dyn_mutex);

		rv = platform_device_register(&bmc->pdev);
3172
		if (rv) {
3173 3174 3175
			dev_err(intf->si_dev,
				PFX " Unable to register bmc device: %d\n",
				rv);
C
Corey Minyard 已提交
3176
			goto out_list_del;
3177 3178
		}

3179 3180
		dev_info(intf->si_dev,
			 "Found new BMC (man_id: 0x%6.6x, prod_id: 0x%4.4x, dev_id: 0x%2.2x)\n",
3181 3182 3183
			 bmc->id.manufacturer_id,
			 bmc->id.product_id,
			 bmc->id.device_id);
3184 3185 3186 3187 3188 3189
	}

	/*
	 * create symlink from system interface device to bmc device
	 * and back.
	 */
3190
	rv = sysfs_create_link(&intf->si_dev->kobj, &bmc->pdev.dev.kobj, "bmc");
3191
	if (rv) {
3192 3193
		dev_err(intf->si_dev,
			PFX "Unable to create bmc symlink: %d\n", rv);
C
Corey Minyard 已提交
3194
		goto out_put_bmc;
3195 3196
	}

3197 3198 3199
	if (intf_num == -1)
		intf_num = intf->intf_num;
	intf->my_dev_name = kasprintf(GFP_KERNEL, "ipmi%d", intf_num);
3200 3201
	if (!intf->my_dev_name) {
		rv = -ENOMEM;
3202 3203
		dev_err(intf->si_dev,
			PFX "Unable to allocate link from BMC: %d\n", rv);
C
Corey Minyard 已提交
3204
		goto out_unlink1;
3205 3206
	}

3207
	rv = sysfs_create_link(&bmc->pdev.dev.kobj, &intf->si_dev->kobj,
3208 3209 3210 3211
			       intf->my_dev_name);
	if (rv) {
		kfree(intf->my_dev_name);
		intf->my_dev_name = NULL;
3212 3213
		dev_err(intf->si_dev,
			PFX "Unable to create symlink to bmc: %d\n", rv);
C
Corey Minyard 已提交
3214
		goto out_free_my_dev_name;
3215 3216
	}

C
Corey Minyard 已提交
3217
	intf->bmc_registered = true;
3218

C
Corey Minyard 已提交
3219
out:
3220 3221 3222
	mutex_unlock(&ipmidriver_mutex);
	mutex_lock(&intf->bmc_reg_mutex);
	intf->in_bmc_register = false;
3223
	return rv;
C
Corey Minyard 已提交
3224 3225 3226 3227 3228 3229 3230 3231 3232 3233


out_free_my_dev_name:
	kfree(intf->my_dev_name);
	intf->my_dev_name = NULL;

out_unlink1:
	sysfs_remove_link(&intf->si_dev->kobj, "bmc");

out_put_bmc:
3234
	mutex_lock(&bmc->dyn_mutex);
3235
	list_del(&intf->bmc_link);
3236
	mutex_unlock(&bmc->dyn_mutex);
3237
	intf->bmc = &intf->tmp_bmc;
C
Corey Minyard 已提交
3238 3239 3240 3241
	kref_put(&bmc->usecount, cleanup_bmc_device);
	goto out;

out_list_del:
3242
	mutex_lock(&bmc->dyn_mutex);
3243
	list_del(&intf->bmc_link);
3244
	mutex_unlock(&bmc->dyn_mutex);
3245
	intf->bmc = &intf->tmp_bmc;
C
Corey Minyard 已提交
3246 3247
	put_device(&bmc->pdev.dev);
	goto out;
3248 3249 3250
}

static int
3251
send_guid_cmd(struct ipmi_smi *intf, int chan)
3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271 3272
{
	struct kernel_ipmi_msg            msg;
	struct ipmi_system_interface_addr si;

	si.addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
	si.channel = IPMI_BMC_CHANNEL;
	si.lun = 0;

	msg.netfn = IPMI_NETFN_APP_REQUEST;
	msg.cmd = IPMI_GET_DEVICE_GUID_CMD;
	msg.data = NULL;
	msg.data_len = 0;
	return i_ipmi_request(NULL,
			      intf,
			      (struct ipmi_addr *) &si,
			      0,
			      &msg,
			      intf,
			      NULL,
			      NULL,
			      0,
3273 3274
			      intf->addrinfo[0].address,
			      intf->addrinfo[0].lun,
3275 3276 3277
			      -1, 0);
}

3278
static void guid_handler(struct ipmi_smi *intf, struct ipmi_recv_msg *msg)
3279
{
3280 3281
	struct bmc_device *bmc = intf->bmc;

3282 3283 3284 3285 3286 3287 3288 3289
	if ((msg->addr.addr_type != IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
	    || (msg->msg.netfn != IPMI_NETFN_APP_RESPONSE)
	    || (msg->msg.cmd != IPMI_GET_DEVICE_GUID_CMD))
		/* Not for me */
		return;

	if (msg->msg.data[0] != 0) {
		/* Error from getting the GUID, the BMC doesn't have one. */
3290
		bmc->dyn_guid_set = 0;
3291 3292 3293 3294
		goto out;
	}

	if (msg->msg.data_len < 17) {
3295
		bmc->dyn_guid_set = 0;
3296 3297 3298
		dev_warn(intf->si_dev,
			 PFX "The GUID response from the BMC was too short, it was %d but should have been 17.  Assuming GUID is not available.\n",
			 msg->msg.data_len);
3299 3300 3301
		goto out;
	}

3302
	memcpy(bmc->fetch_guid.b, msg->msg.data + 1, 16);
3303 3304 3305 3306 3307 3308
	/*
	 * Make sure the guid data is available before setting
	 * dyn_guid_set.
	 */
	smp_wmb();
	bmc->dyn_guid_set = 1;
3309 3310 3311 3312
 out:
	wake_up(&intf->waitq);
}

3313
static void __get_guid(struct ipmi_smi *intf)
3314 3315
{
	int rv;
3316
	struct bmc_device *bmc = intf->bmc;
3317

3318
	bmc->dyn_guid_set = 2;
3319 3320 3321 3322
	intf->null_user_handler = guid_handler;
	rv = send_guid_cmd(intf, 0);
	if (rv)
		/* Send failed, no GUID available. */
3323 3324 3325 3326 3327 3328 3329
		bmc->dyn_guid_set = 0;

	wait_event(intf->waitq, bmc->dyn_guid_set != 2);

	/* dyn_guid_set makes the guid data available. */
	smp_rmb();

3330 3331 3332
	intf->null_user_handler = NULL;
}

L
Linus Torvalds 已提交
3333
static int
3334
send_channel_info_cmd(struct ipmi_smi *intf, int chan)
L
Linus Torvalds 已提交
3335 3336 3337 3338 3339 3340 3341 3342 3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353
{
	struct kernel_ipmi_msg            msg;
	unsigned char                     data[1];
	struct ipmi_system_interface_addr si;

	si.addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
	si.channel = IPMI_BMC_CHANNEL;
	si.lun = 0;

	msg.netfn = IPMI_NETFN_APP_REQUEST;
	msg.cmd = IPMI_GET_CHANNEL_INFO_CMD;
	msg.data = data;
	msg.data_len = 1;
	data[0] = chan;
	return i_ipmi_request(NULL,
			      intf,
			      (struct ipmi_addr *) &si,
			      0,
			      &msg,
3354
			      intf,
L
Linus Torvalds 已提交
3355 3356 3357
			      NULL,
			      NULL,
			      0,
3358 3359
			      intf->addrinfo[0].address,
			      intf->addrinfo[0].lun,
L
Linus Torvalds 已提交
3360 3361 3362 3363
			      -1, 0);
}

static void
3364
channel_handler(struct ipmi_smi *intf, struct ipmi_recv_msg *msg)
L
Linus Torvalds 已提交
3365 3366
{
	int rv = 0;
3367 3368 3369
	int ch;
	unsigned int set = intf->curr_working_cset;
	struct ipmi_channel *chans;
L
Linus Torvalds 已提交
3370

3371 3372
	if ((msg->addr.addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
	    && (msg->msg.netfn == IPMI_NETFN_APP_RESPONSE)
3373
	    && (msg->msg.cmd == IPMI_GET_CHANNEL_INFO_CMD)) {
L
Linus Torvalds 已提交
3374
		/* It's the one we want */
3375
		if (msg->msg.data[0] != 0) {
L
Linus Torvalds 已提交
3376 3377
			/* Got an error from the channel, just go on. */

3378
			if (msg->msg.data[0] == IPMI_INVALID_COMMAND_ERR) {
3379 3380 3381 3382 3383 3384
				/*
				 * If the MC does not support this
				 * command, that is legal.  We just
				 * assume it has one IPMB at channel
				 * zero.
				 */
3385
				intf->wchannels[set].c[0].medium
L
Linus Torvalds 已提交
3386
					= IPMI_CHANNEL_MEDIUM_IPMB;
3387
				intf->wchannels[set].c[0].protocol
L
Linus Torvalds 已提交
3388 3389
					= IPMI_CHANNEL_PROTOCOL_IPMB;

3390 3391
				intf->channel_list = intf->wchannels + set;
				intf->channels_ready = true;
L
Linus Torvalds 已提交
3392 3393 3394 3395 3396
				wake_up(&intf->waitq);
				goto out;
			}
			goto next_channel;
		}
3397
		if (msg->msg.data_len < 4) {
L
Linus Torvalds 已提交
3398 3399 3400
			/* Message not big enough, just go on. */
			goto next_channel;
		}
3401 3402 3403 3404
		ch = intf->curr_channel;
		chans = intf->wchannels[set].c;
		chans[ch].medium = msg->msg.data[2] & 0x7f;
		chans[ch].protocol = msg->msg.data[3] & 0x1f;
L
Linus Torvalds 已提交
3405

3406
 next_channel:
L
Linus Torvalds 已提交
3407
		intf->curr_channel++;
3408 3409 3410
		if (intf->curr_channel >= IPMI_MAX_CHANNELS) {
			intf->channel_list = intf->wchannels + set;
			intf->channels_ready = true;
L
Linus Torvalds 已提交
3411
			wake_up(&intf->waitq);
3412 3413 3414
		} else {
			intf->channel_list = intf->wchannels + set;
			intf->channels_ready = true;
L
Linus Torvalds 已提交
3415
			rv = send_channel_info_cmd(intf, intf->curr_channel);
3416
		}
L
Linus Torvalds 已提交
3417 3418 3419

		if (rv) {
			/* Got an error somehow, just give up. */
3420 3421 3422
			dev_warn(intf->si_dev,
				 PFX "Error sending channel information for channel %d: %d\n",
				 intf->curr_channel, rv);
3423

3424 3425
			intf->channel_list = intf->wchannels + set;
			intf->channels_ready = true;
L
Linus Torvalds 已提交
3426 3427 3428 3429 3430 3431 3432
			wake_up(&intf->waitq);
		}
	}
 out:
	return;
}

3433 3434 3435
/*
 * Must be holding intf->bmc_reg_mutex to call this.
 */
3436
static int __scan_channels(struct ipmi_smi *intf, struct ipmi_device_id *id)
3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450 3451 3452 3453 3454 3455 3456 3457 3458 3459 3460 3461 3462 3463 3464 3465 3466 3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479
{
	int rv;

	if (ipmi_version_major(id) > 1
			|| (ipmi_version_major(id) == 1
			    && ipmi_version_minor(id) >= 5)) {
		unsigned int set;

		/*
		 * Start scanning the channels to see what is
		 * available.
		 */
		set = !intf->curr_working_cset;
		intf->curr_working_cset = set;
		memset(&intf->wchannels[set], 0,
		       sizeof(struct ipmi_channel_set));

		intf->null_user_handler = channel_handler;
		intf->curr_channel = 0;
		rv = send_channel_info_cmd(intf, 0);
		if (rv) {
			dev_warn(intf->si_dev,
				 "Error sending channel information for channel 0, %d\n",
				 rv);
			return -EIO;
		}

		/* Wait for the channel info to be read. */
		wait_event(intf->waitq, intf->channels_ready);
		intf->null_user_handler = NULL;
	} else {
		unsigned int set = intf->curr_working_cset;

		/* Assume a single IPMB channel at zero. */
		intf->wchannels[set].c[0].medium = IPMI_CHANNEL_MEDIUM_IPMB;
		intf->wchannels[set].c[0].protocol = IPMI_CHANNEL_PROTOCOL_IPMB;
		intf->channel_list = intf->wchannels + set;
		intf->channels_ready = true;
	}

	return 0;
}

3480
static void ipmi_poll(struct ipmi_smi *intf)
C
Corey Minyard 已提交
3481 3482 3483
{
	if (intf->handlers->poll)
		intf->handlers->poll(intf->send_info);
3484 3485
	/* In case something came in */
	handle_new_recv_msgs(intf);
C
Corey Minyard 已提交
3486
}
3487

3488
void ipmi_poll_interface(struct ipmi_user *user)
3489 3490
{
	ipmi_poll(user->intf);
C
Corey Minyard 已提交
3491
}
3492
EXPORT_SYMBOL(ipmi_poll_interface);
C
Corey Minyard 已提交
3493

3494 3495
static void redo_bmc_reg(struct work_struct *work)
{
3496 3497
	struct ipmi_smi *intf = container_of(work, struct ipmi_smi,
					     bmc_reg_work);
3498 3499 3500 3501 3502 3503 3504

	if (!intf->in_shutdown)
		bmc_get_device_id(intf, NULL, NULL, NULL, NULL);

	kref_put(&intf->refcount, intf_free);
}

3505
int ipmi_register_smi(const struct ipmi_smi_handlers *handlers,
L
Linus Torvalds 已提交
3506
		      void		       *send_info,
3507
		      struct device            *si_dev,
3508
		      unsigned char            slave_addr)
L
Linus Torvalds 已提交
3509 3510 3511
{
	int              i, j;
	int              rv;
3512
	struct ipmi_smi *intf, *tintf;
3513
	struct list_head *link;
3514
	struct ipmi_device_id id;
L
Linus Torvalds 已提交
3515

3516 3517 3518 3519
	/*
	 * Make sure the driver is actually initialized, this handles
	 * problems with initialization order.
	 */
L
Linus Torvalds 已提交
3520 3521 3522 3523
	if (!initialized) {
		rv = ipmi_init_msghandler();
		if (rv)
			return rv;
3524 3525 3526 3527
		/*
		 * The init code doesn't return an error if it was turned
		 * off, but it won't initialize.  Check that.
		 */
L
Linus Torvalds 已提交
3528 3529 3530 3531
		if (!initialized)
			return -ENODEV;
	}

3532
	intf = kzalloc(sizeof(*intf), GFP_KERNEL);
3533
	if (!intf)
L
Linus Torvalds 已提交
3534
		return -ENOMEM;
3535

3536 3537 3538 3539 3540 3541 3542
	rv = init_srcu_struct(&intf->users_srcu);
	if (rv) {
		kfree(intf);
		return rv;
	}


3543
	intf->bmc = &intf->tmp_bmc;
3544
	INIT_LIST_HEAD(&intf->bmc->intfs);
3545 3546 3547
	mutex_init(&intf->bmc->dyn_mutex);
	INIT_LIST_HEAD(&intf->bmc_link);
	mutex_init(&intf->bmc_reg_mutex);
3548
	intf->intf_num = -1; /* Mark it invalid for now. */
3549
	kref_init(&intf->refcount);
3550
	INIT_WORK(&intf->bmc_reg_work, redo_bmc_reg);
3551
	intf->si_dev = si_dev;
3552
	for (j = 0; j < IPMI_MAX_CHANNELS; j++) {
3553 3554
		intf->addrinfo[j].address = IPMI_BMC_SLAVE_ADDR;
		intf->addrinfo[j].lun = 2;
3555 3556
	}
	if (slave_addr != 0)
3557
		intf->addrinfo[0].address = slave_addr;
3558 3559 3560 3561 3562 3563 3564 3565 3566
	INIT_LIST_HEAD(&intf->users);
	intf->handlers = handlers;
	intf->send_info = send_info;
	spin_lock_init(&intf->seq_lock);
	for (j = 0; j < IPMI_IPMB_NUM_SEQ; j++) {
		intf->seq_table[j].inuse = 0;
		intf->seq_table[j].seqid = 0;
	}
	intf->curr_seq = 0;
3567
#ifdef CONFIG_IPMI_PROC_INTERFACE
C
Corey Minyard 已提交
3568
	mutex_init(&intf->proc_entry_lock);
3569
#endif
3570 3571
	spin_lock_init(&intf->waiting_rcv_msgs_lock);
	INIT_LIST_HEAD(&intf->waiting_rcv_msgs);
3572 3573 3574 3575
	tasklet_init(&intf->recv_tasklet,
		     smi_recv_tasklet,
		     (unsigned long) intf);
	atomic_set(&intf->watchdog_pretimeouts_to_deliver, 0);
3576 3577 3578
	spin_lock_init(&intf->xmit_msgs_lock);
	INIT_LIST_HEAD(&intf->xmit_msgs);
	INIT_LIST_HEAD(&intf->hp_xmit_msgs);
3579
	spin_lock_init(&intf->events_lock);
3580 3581
	atomic_set(&intf->event_waiters, 0);
	intf->ticks_to_req_ev = IPMI_REQUEST_EV_TIME;
3582 3583
	INIT_LIST_HEAD(&intf->waiting_events);
	intf->waiting_events_count = 0;
3584
	mutex_init(&intf->cmd_rcvrs_mutex);
C
Corey Minyard 已提交
3585
	spin_lock_init(&intf->maintenance_mode_lock);
3586 3587
	INIT_LIST_HEAD(&intf->cmd_rcvrs);
	init_waitqueue_head(&intf->waitq);
3588 3589
	for (i = 0; i < IPMI_NUM_STATS; i++)
		atomic_set(&intf->stats[i], 0);
3590

3591
#ifdef CONFIG_IPMI_PROC_INTERFACE
3592
	intf->proc_dir = NULL;
3593
#endif
L
Linus Torvalds 已提交
3594

3595 3596 3597 3598 3599 3600 3601
	mutex_lock(&ipmi_interfaces_mutex);
	/* Look for a hole in the numbers. */
	i = 0;
	link = &ipmi_interfaces;
	list_for_each_entry_rcu(tintf, &ipmi_interfaces, link) {
		if (tintf->intf_num != i) {
			link = &tintf->link;
L
Linus Torvalds 已提交
3602 3603
			break;
		}
3604
		i++;
L
Linus Torvalds 已提交
3605
	}
3606 3607 3608 3609 3610
	/* Add the new interface in numeric order. */
	if (i == 0)
		list_add_rcu(&intf->link, &ipmi_interfaces);
	else
		list_add_tail_rcu(&intf->link, link);
L
Linus Torvalds 已提交
3611

3612 3613 3614
	rv = handlers->start_processing(send_info, intf);
	if (rv)
		goto out;
L
Linus Torvalds 已提交
3615

3616
	rv = __bmc_get_device_id(intf, NULL, &id, NULL, NULL, i);
3617 3618 3619 3620 3621
	if (rv) {
		dev_err(si_dev, "Unable to get the device id: %d\n", rv);
		goto out;
	}

3622 3623 3624 3625 3626
	mutex_lock(&intf->bmc_reg_mutex);
	rv = __scan_channels(intf, &id);
	mutex_unlock(&intf->bmc_reg_mutex);
	if (rv)
		goto out;
L
Linus Torvalds 已提交
3627

3628
#ifdef CONFIG_IPMI_PROC_INTERFACE
C
Corey Minyard 已提交
3629
	rv = add_proc_entries(intf, i);
3630
#endif
L
Linus Torvalds 已提交
3631

3632
 out:
L
Linus Torvalds 已提交
3633
	if (rv) {
C
Corey Minyard 已提交
3634
		ipmi_bmc_unregister(intf);
3635
#ifdef CONFIG_IPMI_PROC_INTERFACE
3636 3637
		if (intf->proc_dir)
			remove_proc_entries(intf);
3638
#endif
3639 3640
		list_del_rcu(&intf->link);
		mutex_unlock(&ipmi_interfaces_mutex);
3641 3642
		synchronize_srcu(&ipmi_interfaces_srcu);
		cleanup_srcu_struct(&intf->users_srcu);
3643 3644
		kref_put(&intf->refcount, intf_free);
	} else {
3645 3646 3647 3648 3649 3650
		/*
		 * Keep memory order straight for RCU readers.  Make
		 * sure everything else is committed to memory before
		 * setting intf_num to mark the interface valid.
		 */
		smp_wmb();
3651 3652
		intf->intf_num = i;
		mutex_unlock(&ipmi_interfaces_mutex);
3653

3654
		/* After this point the interface is legal to use. */
3655
		call_smi_watchers(i, intf->si_dev);
L
Linus Torvalds 已提交
3656 3657 3658 3659
	}

	return rv;
}
3660
EXPORT_SYMBOL(ipmi_register_smi);
L
Linus Torvalds 已提交
3661

3662
static void deliver_smi_err_response(struct ipmi_smi *intf,
3663 3664 3665 3666 3667 3668 3669 3670 3671 3672 3673
				     struct ipmi_smi_msg *msg,
				     unsigned char err)
{
	msg->rsp[0] = msg->data[0] | 4;
	msg->rsp[1] = msg->data[1];
	msg->rsp[2] = err;
	msg->rsp_size = 3;
	/* It's an error, so it will never requeue, no need to check return. */
	handle_one_recv_msg(intf, msg);
}

3674
static void cleanup_smi_msgs(struct ipmi_smi *intf)
3675 3676 3677
{
	int              i;
	struct seq_table *ent;
3678 3679 3680 3681 3682 3683 3684 3685 3686 3687 3688 3689 3690 3691
	struct ipmi_smi_msg *msg;
	struct list_head *entry;
	struct list_head tmplist;

	/* Clear out our transmit queues and hold the messages. */
	INIT_LIST_HEAD(&tmplist);
	list_splice_tail(&intf->hp_xmit_msgs, &tmplist);
	list_splice_tail(&intf->xmit_msgs, &tmplist);

	/* Current message first, to preserve order */
	while (intf->curr_msg && !list_empty(&intf->waiting_rcv_msgs)) {
		/* Wait for the message to clear out. */
		schedule_timeout(1);
	}
3692 3693

	/* No need for locks, the interface is down. */
3694 3695 3696 3697 3698 3699 3700 3701 3702 3703 3704 3705

	/*
	 * Return errors for all pending messages in queue and in the
	 * tables waiting for remote responses.
	 */
	while (!list_empty(&tmplist)) {
		entry = tmplist.next;
		list_del(entry);
		msg = list_entry(entry, struct ipmi_smi_msg, link);
		deliver_smi_err_response(intf, msg, IPMI_ERR_UNSPECIFIED);
	}

3706
	for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++) {
3707
		ent = &intf->seq_table[i];
3708 3709
		if (!ent->inuse)
			continue;
C
Corey Minyard 已提交
3710
		deliver_err_response(intf, ent->recv_msg, IPMI_ERR_UNSPECIFIED);
3711 3712 3713
	}
}

3714
int ipmi_unregister_smi(struct ipmi_smi *intf)
L
Linus Torvalds 已提交
3715 3716
{
	struct ipmi_smi_watcher *w;
3717
	int intf_num = intf->intf_num, index;
L
Linus Torvalds 已提交
3718

3719
	mutex_lock(&ipmi_interfaces_mutex);
3720
	intf->intf_num = -1;
3721
	intf->in_shutdown = true;
3722 3723
	list_del_rcu(&intf->link);
	mutex_unlock(&ipmi_interfaces_mutex);
3724
	synchronize_srcu(&ipmi_interfaces_srcu);
3725

3726
	/* At this point no users can be added to the interface. */
L
Linus Torvalds 已提交
3727

3728 3729
	/*
	 * Call all the watcher interfaces to tell them that
3730
	 * an interface is going away.
3731
	 */
3732
	mutex_lock(&smi_watchers_mutex);
3733
	list_for_each_entry(w, &smi_watchers, link)
3734 3735
		w->smi_gone(intf_num);
	mutex_unlock(&smi_watchers_mutex);
3736

3737 3738 3739 3740 3741 3742 3743 3744 3745 3746 3747 3748 3749 3750 3751 3752 3753 3754 3755 3756 3757
	index = srcu_read_lock(&intf->users_srcu);
	while (!list_empty(&intf->users)) {
		struct ipmi_user *user =
			container_of(list_next_rcu(&intf->users),
				     struct ipmi_user, link);

		_ipmi_destroy_user(user);
	}
	srcu_read_unlock(&intf->users_srcu, index);

	if (intf->handlers->shutdown)
		intf->handlers->shutdown(intf->send_info);

	cleanup_smi_msgs(intf);

#ifdef CONFIG_IPMI_PROC_INTERFACE
	remove_proc_entries(intf);
#endif
	ipmi_bmc_unregister(intf);

	cleanup_srcu_struct(&intf->users_srcu);
3758
	kref_put(&intf->refcount, intf_free);
3759

L
Linus Torvalds 已提交
3760 3761
	return 0;
}
3762
EXPORT_SYMBOL(ipmi_unregister_smi);
L
Linus Torvalds 已提交
3763

3764
static int handle_ipmb_get_msg_rsp(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
3765 3766 3767 3768 3769
				   struct ipmi_smi_msg *msg)
{
	struct ipmi_ipmb_addr ipmb_addr;
	struct ipmi_recv_msg  *recv_msg;

3770 3771 3772 3773
	/*
	 * This is 11, not 10, because the response must contain a
	 * completion code.
	 */
L
Linus Torvalds 已提交
3774 3775
	if (msg->rsp_size < 11) {
		/* Message not big enough, just ignore it. */
3776
		ipmi_inc_stat(intf, invalid_ipmb_responses);
L
Linus Torvalds 已提交
3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789
		return 0;
	}

	if (msg->rsp[2] != 0) {
		/* An error getting the response, just ignore it. */
		return 0;
	}

	ipmb_addr.addr_type = IPMI_IPMB_ADDR_TYPE;
	ipmb_addr.slave_addr = msg->rsp[6];
	ipmb_addr.channel = msg->rsp[3] & 0x0f;
	ipmb_addr.lun = msg->rsp[7] & 3;

3790 3791 3792 3793
	/*
	 * It's a response from a remote entity.  Look up the sequence
	 * number and handle the response.
	 */
L
Linus Torvalds 已提交
3794 3795 3796 3797 3798
	if (intf_find_seq(intf,
			  msg->rsp[7] >> 2,
			  msg->rsp[3] & 0x0f,
			  msg->rsp[8],
			  (msg->rsp[4] >> 2) & (~1),
3799
			  (struct ipmi_addr *) &ipmb_addr,
3800 3801 3802 3803 3804
			  &recv_msg)) {
		/*
		 * We were unable to find the sequence number,
		 * so just nuke the message.
		 */
3805
		ipmi_inc_stat(intf, unhandled_ipmb_responses);
L
Linus Torvalds 已提交
3806 3807 3808
		return 0;
	}

3809
	memcpy(recv_msg->msg_data, &msg->rsp[9], msg->rsp_size - 9);
3810 3811 3812 3813 3814
	/*
	 * The other fields matched, so no need to set them, except
	 * for netfn, which needs to be the response that was
	 * returned, not the request value.
	 */
L
Linus Torvalds 已提交
3815 3816 3817 3818
	recv_msg->msg.netfn = msg->rsp[4] >> 2;
	recv_msg->msg.data = recv_msg->msg_data;
	recv_msg->msg.data_len = msg->rsp_size - 10;
	recv_msg->recv_type = IPMI_RESPONSE_RECV_TYPE;
C
Corey Minyard 已提交
3819 3820 3821 3822
	if (deliver_response(intf, recv_msg))
		ipmi_inc_stat(intf, unhandled_ipmb_responses);
	else
		ipmi_inc_stat(intf, handled_ipmb_responses);
L
Linus Torvalds 已提交
3823 3824 3825 3826

	return 0;
}

3827
static int handle_ipmb_get_msg_cmd(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
3828 3829
				   struct ipmi_smi_msg *msg)
{
3830 3831 3832 3833
	struct cmd_rcvr          *rcvr;
	int                      rv = 0;
	unsigned char            netfn;
	unsigned char            cmd;
3834
	unsigned char            chan;
3835
	struct ipmi_user         *user = NULL;
3836 3837
	struct ipmi_ipmb_addr    *ipmb_addr;
	struct ipmi_recv_msg     *recv_msg;
L
Linus Torvalds 已提交
3838 3839 3840

	if (msg->rsp_size < 10) {
		/* Message not big enough, just ignore it. */
3841
		ipmi_inc_stat(intf, invalid_commands);
L
Linus Torvalds 已提交
3842 3843 3844 3845 3846 3847 3848 3849 3850 3851
		return 0;
	}

	if (msg->rsp[2] != 0) {
		/* An error getting the response, just ignore it. */
		return 0;
	}

	netfn = msg->rsp[4] >> 2;
	cmd = msg->rsp[8];
3852
	chan = msg->rsp[3] & 0xf;
L
Linus Torvalds 已提交
3853

3854
	rcu_read_lock();
3855
	rcvr = find_cmd_rcvr(intf, netfn, cmd, chan);
3856 3857 3858 3859 3860
	if (rcvr) {
		user = rcvr->user;
		kref_get(&user->refcount);
	} else
		user = NULL;
3861
	rcu_read_unlock();
L
Linus Torvalds 已提交
3862 3863 3864

	if (user == NULL) {
		/* We didn't find a user, deliver an error response. */
3865
		ipmi_inc_stat(intf, unhandled_commands);
L
Linus Torvalds 已提交
3866 3867 3868 3869 3870

		msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
		msg->data[1] = IPMI_SEND_MSG_CMD;
		msg->data[2] = msg->rsp[3];
		msg->data[3] = msg->rsp[6];
3871
		msg->data[4] = ((netfn + 1) << 2) | (msg->rsp[7] & 0x3);
3872
		msg->data[5] = ipmb_checksum(&msg->data[3], 2);
3873
		msg->data[6] = intf->addrinfo[msg->rsp[3] & 0xf].address;
3874 3875
		/* rqseq/lun */
		msg->data[7] = (msg->rsp[7] & 0xfc) | (msg->rsp[4] & 0x3);
L
Linus Torvalds 已提交
3876 3877
		msg->data[8] = msg->rsp[8]; /* cmd */
		msg->data[9] = IPMI_INVALID_CMD_COMPLETION_CODE;
3878
		msg->data[10] = ipmb_checksum(&msg->data[6], 4);
L
Linus Torvalds 已提交
3879 3880
		msg->data_size = 11;

C
Corey Minyard 已提交
3881 3882
		ipmi_debug_msg("Invalid command:", msg->data, msg->data_size);

3883
		rcu_read_lock();
3884 3885
		if (!intf->in_shutdown) {
			smi_send(intf, intf->handlers, msg, 0);
3886 3887 3888 3889 3890
			/*
			 * We used the message, so return the value
			 * that causes it to not be freed or
			 * queued.
			 */
3891 3892 3893
			rv = -1;
		}
		rcu_read_unlock();
L
Linus Torvalds 已提交
3894 3895
	} else {
		recv_msg = ipmi_alloc_recv_msg();
3896
		if (!recv_msg) {
3897 3898 3899 3900 3901
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling
			 * later.
			 */
L
Linus Torvalds 已提交
3902
			rv = 1;
3903
			kref_put(&user->refcount, free_user);
L
Linus Torvalds 已提交
3904 3905 3906 3907 3908 3909 3910 3911
		} else {
			/* Extract the source address from the data. */
			ipmb_addr = (struct ipmi_ipmb_addr *) &recv_msg->addr;
			ipmb_addr->addr_type = IPMI_IPMB_ADDR_TYPE;
			ipmb_addr->slave_addr = msg->rsp[6];
			ipmb_addr->lun = msg->rsp[7] & 3;
			ipmb_addr->channel = msg->rsp[3] & 0xf;

3912 3913 3914 3915
			/*
			 * Extract the rest of the message information
			 * from the IPMB header.
			 */
L
Linus Torvalds 已提交
3916 3917 3918 3919 3920 3921 3922
			recv_msg->user = user;
			recv_msg->recv_type = IPMI_CMD_RECV_TYPE;
			recv_msg->msgid = msg->rsp[7] >> 2;
			recv_msg->msg.netfn = msg->rsp[4] >> 2;
			recv_msg->msg.cmd = msg->rsp[8];
			recv_msg->msg.data = recv_msg->msg_data;

3923 3924 3925 3926
			/*
			 * We chop off 10, not 9 bytes because the checksum
			 * at the end also needs to be removed.
			 */
L
Linus Torvalds 已提交
3927
			recv_msg->msg.data_len = msg->rsp_size - 10;
3928
			memcpy(recv_msg->msg_data, &msg->rsp[9],
L
Linus Torvalds 已提交
3929
			       msg->rsp_size - 10);
C
Corey Minyard 已提交
3930 3931 3932 3933
			if (deliver_response(intf, recv_msg))
				ipmi_inc_stat(intf, unhandled_commands);
			else
				ipmi_inc_stat(intf, handled_commands);
L
Linus Torvalds 已提交
3934 3935 3936 3937 3938 3939
		}
	}

	return rv;
}

3940
static int handle_lan_get_msg_rsp(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
3941 3942 3943 3944 3945 3946
				  struct ipmi_smi_msg *msg)
{
	struct ipmi_lan_addr  lan_addr;
	struct ipmi_recv_msg  *recv_msg;


3947 3948 3949 3950
	/*
	 * This is 13, not 12, because the response must contain a
	 * completion code.
	 */
L
Linus Torvalds 已提交
3951 3952
	if (msg->rsp_size < 13) {
		/* Message not big enough, just ignore it. */
3953
		ipmi_inc_stat(intf, invalid_lan_responses);
L
Linus Torvalds 已提交
3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964 3965 3966 3967 3968 3969
		return 0;
	}

	if (msg->rsp[2] != 0) {
		/* An error getting the response, just ignore it. */
		return 0;
	}

	lan_addr.addr_type = IPMI_LAN_ADDR_TYPE;
	lan_addr.session_handle = msg->rsp[4];
	lan_addr.remote_SWID = msg->rsp[8];
	lan_addr.local_SWID = msg->rsp[5];
	lan_addr.channel = msg->rsp[3] & 0x0f;
	lan_addr.privilege = msg->rsp[3] >> 4;
	lan_addr.lun = msg->rsp[9] & 3;

3970 3971 3972 3973
	/*
	 * It's a response from a remote entity.  Look up the sequence
	 * number and handle the response.
	 */
L
Linus Torvalds 已提交
3974 3975 3976 3977 3978
	if (intf_find_seq(intf,
			  msg->rsp[9] >> 2,
			  msg->rsp[3] & 0x0f,
			  msg->rsp[10],
			  (msg->rsp[6] >> 2) & (~1),
3979
			  (struct ipmi_addr *) &lan_addr,
3980 3981 3982 3983 3984
			  &recv_msg)) {
		/*
		 * We were unable to find the sequence number,
		 * so just nuke the message.
		 */
3985
		ipmi_inc_stat(intf, unhandled_lan_responses);
L
Linus Torvalds 已提交
3986 3987 3988
		return 0;
	}

3989
	memcpy(recv_msg->msg_data, &msg->rsp[11], msg->rsp_size - 11);
3990 3991 3992 3993 3994
	/*
	 * The other fields matched, so no need to set them, except
	 * for netfn, which needs to be the response that was
	 * returned, not the request value.
	 */
L
Linus Torvalds 已提交
3995 3996 3997 3998
	recv_msg->msg.netfn = msg->rsp[6] >> 2;
	recv_msg->msg.data = recv_msg->msg_data;
	recv_msg->msg.data_len = msg->rsp_size - 12;
	recv_msg->recv_type = IPMI_RESPONSE_RECV_TYPE;
C
Corey Minyard 已提交
3999 4000 4001 4002
	if (deliver_response(intf, recv_msg))
		ipmi_inc_stat(intf, unhandled_lan_responses);
	else
		ipmi_inc_stat(intf, handled_lan_responses);
L
Linus Torvalds 已提交
4003 4004 4005 4006

	return 0;
}

4007
static int handle_lan_get_msg_cmd(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
4008 4009
				  struct ipmi_smi_msg *msg)
{
4010 4011 4012 4013
	struct cmd_rcvr          *rcvr;
	int                      rv = 0;
	unsigned char            netfn;
	unsigned char            cmd;
4014
	unsigned char            chan;
4015
	struct ipmi_user         *user = NULL;
4016 4017
	struct ipmi_lan_addr     *lan_addr;
	struct ipmi_recv_msg     *recv_msg;
L
Linus Torvalds 已提交
4018 4019 4020

	if (msg->rsp_size < 12) {
		/* Message not big enough, just ignore it. */
4021
		ipmi_inc_stat(intf, invalid_commands);
L
Linus Torvalds 已提交
4022 4023 4024 4025 4026 4027 4028 4029 4030 4031
		return 0;
	}

	if (msg->rsp[2] != 0) {
		/* An error getting the response, just ignore it. */
		return 0;
	}

	netfn = msg->rsp[6] >> 2;
	cmd = msg->rsp[10];
4032
	chan = msg->rsp[3] & 0xf;
L
Linus Torvalds 已提交
4033

4034
	rcu_read_lock();
4035
	rcvr = find_cmd_rcvr(intf, netfn, cmd, chan);
4036 4037 4038 4039 4040
	if (rcvr) {
		user = rcvr->user;
		kref_get(&user->refcount);
	} else
		user = NULL;
4041
	rcu_read_unlock();
L
Linus Torvalds 已提交
4042 4043

	if (user == NULL) {
4044
		/* We didn't find a user, just give up. */
4045
		ipmi_inc_stat(intf, unhandled_commands);
L
Linus Torvalds 已提交
4046

4047 4048 4049 4050 4051
		/*
		 * Don't do anything with these messages, just allow
		 * them to be freed.
		 */
		rv = 0;
L
Linus Torvalds 已提交
4052 4053
	} else {
		recv_msg = ipmi_alloc_recv_msg();
4054
		if (!recv_msg) {
4055 4056 4057 4058
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling later.
			 */
L
Linus Torvalds 已提交
4059
			rv = 1;
4060
			kref_put(&user->refcount, free_user);
L
Linus Torvalds 已提交
4061 4062 4063 4064 4065 4066 4067 4068 4069 4070 4071
		} else {
			/* Extract the source address from the data. */
			lan_addr = (struct ipmi_lan_addr *) &recv_msg->addr;
			lan_addr->addr_type = IPMI_LAN_ADDR_TYPE;
			lan_addr->session_handle = msg->rsp[4];
			lan_addr->remote_SWID = msg->rsp[8];
			lan_addr->local_SWID = msg->rsp[5];
			lan_addr->lun = msg->rsp[9] & 3;
			lan_addr->channel = msg->rsp[3] & 0xf;
			lan_addr->privilege = msg->rsp[3] >> 4;

4072 4073 4074 4075
			/*
			 * Extract the rest of the message information
			 * from the IPMB header.
			 */
L
Linus Torvalds 已提交
4076 4077 4078 4079 4080 4081 4082
			recv_msg->user = user;
			recv_msg->recv_type = IPMI_CMD_RECV_TYPE;
			recv_msg->msgid = msg->rsp[9] >> 2;
			recv_msg->msg.netfn = msg->rsp[6] >> 2;
			recv_msg->msg.cmd = msg->rsp[10];
			recv_msg->msg.data = recv_msg->msg_data;

4083 4084 4085 4086
			/*
			 * We chop off 12, not 11 bytes because the checksum
			 * at the end also needs to be removed.
			 */
L
Linus Torvalds 已提交
4087
			recv_msg->msg.data_len = msg->rsp_size - 12;
4088
			memcpy(recv_msg->msg_data, &msg->rsp[11],
L
Linus Torvalds 已提交
4089
			       msg->rsp_size - 12);
C
Corey Minyard 已提交
4090 4091 4092 4093
			if (deliver_response(intf, recv_msg))
				ipmi_inc_stat(intf, unhandled_commands);
			else
				ipmi_inc_stat(intf, handled_commands);
L
Linus Torvalds 已提交
4094 4095 4096 4097 4098 4099
		}
	}

	return rv;
}

D
dann frazier 已提交
4100 4101 4102 4103 4104 4105
/*
 * This routine will handle "Get Message" command responses with
 * channels that use an OEM Medium. The message format belongs to
 * the OEM.  See IPMI 2.0 specification, Chapter 6 and
 * Chapter 22, sections 22.6 and 22.24 for more details.
 */
4106
static int handle_oem_get_msg_cmd(struct ipmi_smi *intf,
D
dann frazier 已提交
4107 4108 4109 4110 4111 4112 4113
				  struct ipmi_smi_msg *msg)
{
	struct cmd_rcvr       *rcvr;
	int                   rv = 0;
	unsigned char         netfn;
	unsigned char         cmd;
	unsigned char         chan;
4114
	struct ipmi_user *user = NULL;
D
dann frazier 已提交
4115 4116 4117 4118 4119 4120 4121 4122 4123 4124 4125 4126 4127 4128 4129 4130 4131 4132 4133 4134 4135 4136 4137 4138 4139 4140 4141 4142 4143 4144 4145 4146 4147 4148 4149 4150 4151 4152 4153 4154 4155 4156 4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167 4168 4169 4170 4171 4172 4173 4174 4175 4176 4177
	struct ipmi_system_interface_addr *smi_addr;
	struct ipmi_recv_msg  *recv_msg;

	/*
	 * We expect the OEM SW to perform error checking
	 * so we just do some basic sanity checks
	 */
	if (msg->rsp_size < 4) {
		/* Message not big enough, just ignore it. */
		ipmi_inc_stat(intf, invalid_commands);
		return 0;
	}

	if (msg->rsp[2] != 0) {
		/* An error getting the response, just ignore it. */
		return 0;
	}

	/*
	 * This is an OEM Message so the OEM needs to know how
	 * handle the message. We do no interpretation.
	 */
	netfn = msg->rsp[0] >> 2;
	cmd = msg->rsp[1];
	chan = msg->rsp[3] & 0xf;

	rcu_read_lock();
	rcvr = find_cmd_rcvr(intf, netfn, cmd, chan);
	if (rcvr) {
		user = rcvr->user;
		kref_get(&user->refcount);
	} else
		user = NULL;
	rcu_read_unlock();

	if (user == NULL) {
		/* We didn't find a user, just give up. */
		ipmi_inc_stat(intf, unhandled_commands);

		/*
		 * Don't do anything with these messages, just allow
		 * them to be freed.
		 */

		rv = 0;
	} else {
		recv_msg = ipmi_alloc_recv_msg();
		if (!recv_msg) {
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling
			 * later.
			 */
			rv = 1;
			kref_put(&user->refcount, free_user);
		} else {
			/*
			 * OEM Messages are expected to be delivered via
			 * the system interface to SMS software.  We might
			 * need to visit this again depending on OEM
			 * requirements
			 */
			smi_addr = ((struct ipmi_system_interface_addr *)
4178
				    &recv_msg->addr);
D
dann frazier 已提交
4179 4180 4181 4182 4183 4184 4185 4186 4187 4188 4189 4190 4191 4192 4193 4194
			smi_addr->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
			smi_addr->channel = IPMI_BMC_CHANNEL;
			smi_addr->lun = msg->rsp[0] & 3;

			recv_msg->user = user;
			recv_msg->user_msg_data = NULL;
			recv_msg->recv_type = IPMI_OEM_RECV_TYPE;
			recv_msg->msg.netfn = msg->rsp[0] >> 2;
			recv_msg->msg.cmd = msg->rsp[1];
			recv_msg->msg.data = recv_msg->msg_data;

			/*
			 * The message starts at byte 4 which follows the
			 * the Channel Byte in the "GET MESSAGE" command
			 */
			recv_msg->msg.data_len = msg->rsp_size - 4;
4195
			memcpy(recv_msg->msg_data, &msg->rsp[4],
D
dann frazier 已提交
4196
			       msg->rsp_size - 4);
C
Corey Minyard 已提交
4197 4198 4199 4200
			if (deliver_response(intf, recv_msg))
				ipmi_inc_stat(intf, unhandled_commands);
			else
				ipmi_inc_stat(intf, handled_commands);
D
dann frazier 已提交
4201 4202 4203 4204 4205 4206
		}
	}

	return rv;
}

L
Linus Torvalds 已提交
4207 4208 4209 4210
static void copy_event_into_recv_msg(struct ipmi_recv_msg *recv_msg,
				     struct ipmi_smi_msg  *msg)
{
	struct ipmi_system_interface_addr *smi_addr;
4211

L
Linus Torvalds 已提交
4212
	recv_msg->msgid = 0;
4213
	smi_addr = (struct ipmi_system_interface_addr *) &recv_msg->addr;
L
Linus Torvalds 已提交
4214 4215 4216 4217 4218 4219
	smi_addr->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
	smi_addr->channel = IPMI_BMC_CHANNEL;
	smi_addr->lun = msg->rsp[0] & 3;
	recv_msg->recv_type = IPMI_ASYNC_EVENT_RECV_TYPE;
	recv_msg->msg.netfn = msg->rsp[0] >> 2;
	recv_msg->msg.cmd = msg->rsp[1];
4220
	memcpy(recv_msg->msg_data, &msg->rsp[3], msg->rsp_size - 3);
L
Linus Torvalds 已提交
4221 4222 4223 4224
	recv_msg->msg.data = recv_msg->msg_data;
	recv_msg->msg.data_len = msg->rsp_size - 3;
}

4225
static int handle_read_event_rsp(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
4226 4227 4228 4229
				 struct ipmi_smi_msg *msg)
{
	struct ipmi_recv_msg *recv_msg, *recv_msg2;
	struct list_head     msgs;
4230
	struct ipmi_user     *user;
4231
	int rv = 0, deliver_count = 0, index;
L
Linus Torvalds 已提交
4232 4233 4234 4235
	unsigned long        flags;

	if (msg->rsp_size < 19) {
		/* Message is too small to be an IPMB event. */
4236
		ipmi_inc_stat(intf, invalid_events);
L
Linus Torvalds 已提交
4237 4238 4239 4240 4241 4242 4243 4244 4245 4246
		return 0;
	}

	if (msg->rsp[2] != 0) {
		/* An error getting the event, just ignore it. */
		return 0;
	}

	INIT_LIST_HEAD(&msgs);

4247
	spin_lock_irqsave(&intf->events_lock, flags);
L
Linus Torvalds 已提交
4248

4249
	ipmi_inc_stat(intf, events);
L
Linus Torvalds 已提交
4250

4251 4252 4253 4254
	/*
	 * Allocate and fill in one message for every user that is
	 * getting events.
	 */
4255
	index = srcu_read_lock(&intf->users_srcu);
4256
	list_for_each_entry_rcu(user, &intf->users, link) {
4257
		if (!user->gets_events)
L
Linus Torvalds 已提交
4258 4259 4260
			continue;

		recv_msg = ipmi_alloc_recv_msg();
4261
		if (!recv_msg) {
4262
			rcu_read_unlock();
4263 4264
			list_for_each_entry_safe(recv_msg, recv_msg2, &msgs,
						 link) {
L
Linus Torvalds 已提交
4265 4266 4267
				list_del(&recv_msg->link);
				ipmi_free_recv_msg(recv_msg);
			}
4268 4269 4270 4271 4272
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling
			 * later.
			 */
L
Linus Torvalds 已提交
4273 4274 4275 4276 4277 4278 4279 4280
			rv = 1;
			goto out;
		}

		deliver_count++;

		copy_event_into_recv_msg(recv_msg, msg);
		recv_msg->user = user;
4281
		kref_get(&user->refcount);
4282
		list_add_tail(&recv_msg->link, &msgs);
L
Linus Torvalds 已提交
4283
	}
4284
	srcu_read_unlock(&intf->users_srcu, index);
L
Linus Torvalds 已提交
4285 4286 4287 4288 4289

	if (deliver_count) {
		/* Now deliver all the messages. */
		list_for_each_entry_safe(recv_msg, recv_msg2, &msgs, link) {
			list_del(&recv_msg->link);
C
Corey Minyard 已提交
4290
			deliver_local_response(intf, recv_msg);
L
Linus Torvalds 已提交
4291 4292
		}
	} else if (intf->waiting_events_count < MAX_EVENTS_IN_QUEUE) {
4293 4294 4295 4296
		/*
		 * No one to receive the message, put it in queue if there's
		 * not already too many things in the queue.
		 */
L
Linus Torvalds 已提交
4297
		recv_msg = ipmi_alloc_recv_msg();
4298
		if (!recv_msg) {
4299 4300 4301 4302 4303
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling
			 * later.
			 */
L
Linus Torvalds 已提交
4304 4305 4306 4307 4308
			rv = 1;
			goto out;
		}

		copy_event_into_recv_msg(recv_msg, msg);
4309
		list_add_tail(&recv_msg->link, &intf->waiting_events);
4310
		intf->waiting_events_count++;
4311
	} else if (!intf->event_msg_printed) {
4312 4313 4314 4315
		/*
		 * There's too many things in the queue, discard this
		 * message.
		 */
4316 4317
		dev_warn(intf->si_dev,
			 PFX "Event queue full, discarding incoming events\n");
4318
		intf->event_msg_printed = 1;
L
Linus Torvalds 已提交
4319 4320 4321
	}

 out:
4322
	spin_unlock_irqrestore(&intf->events_lock, flags);
L
Linus Torvalds 已提交
4323 4324 4325 4326

	return rv;
}

4327
static int handle_bmc_rsp(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
4328 4329 4330
			  struct ipmi_smi_msg *msg)
{
	struct ipmi_recv_msg *recv_msg;
4331
	struct ipmi_system_interface_addr *smi_addr;
L
Linus Torvalds 已提交
4332 4333

	recv_msg = (struct ipmi_recv_msg *) msg->user_data;
4334
	if (recv_msg == NULL) {
4335 4336
		dev_warn(intf->si_dev,
			 "IPMI message received with no owner. This could be because of a malformed message, or because of a hardware error.  Contact your hardware vender for assistance\n");
4337 4338
		return 0;
	}
L
Linus Torvalds 已提交
4339

4340 4341 4342 4343 4344 4345 4346 4347 4348 4349 4350 4351 4352
	recv_msg->recv_type = IPMI_RESPONSE_RECV_TYPE;
	recv_msg->msgid = msg->msgid;
	smi_addr = ((struct ipmi_system_interface_addr *)
		    &recv_msg->addr);
	smi_addr->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
	smi_addr->channel = IPMI_BMC_CHANNEL;
	smi_addr->lun = msg->rsp[0] & 3;
	recv_msg->msg.netfn = msg->rsp[0] >> 2;
	recv_msg->msg.cmd = msg->rsp[1];
	memcpy(recv_msg->msg_data, &msg->rsp[2], msg->rsp_size - 2);
	recv_msg->msg.data = recv_msg->msg_data;
	recv_msg->msg.data_len = msg->rsp_size - 2;
	deliver_local_response(intf, recv_msg);
L
Linus Torvalds 已提交
4353 4354 4355 4356

	return 0;
}

4357
/*
4358
 * Handle a received message.  Return 1 if the message should be requeued,
4359 4360 4361
 * 0 if the message should be freed, or -1 if the message should not
 * be freed or requeued.
 */
4362
static int handle_one_recv_msg(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
4363 4364 4365 4366 4367
			       struct ipmi_smi_msg *msg)
{
	int requeue;
	int chan;

C
Corey Minyard 已提交
4368
	ipmi_debug_msg("Recv:", msg->rsp, msg->rsp_size);
L
Linus Torvalds 已提交
4369 4370
	if (msg->rsp_size < 2) {
		/* Message is too small to be correct. */
4371 4372 4373
		dev_warn(intf->si_dev,
			 PFX "BMC returned to small a message for netfn %x cmd %x, got %d bytes\n",
			 (msg->data[0] >> 2) | 1, msg->data[1], msg->rsp_size);
L
Linus Torvalds 已提交
4374 4375 4376 4377 4378 4379

		/* Generate an error response for the message. */
		msg->rsp[0] = msg->data[0] | (1 << 2);
		msg->rsp[1] = msg->data[1];
		msg->rsp[2] = IPMI_ERR_UNSPECIFIED;
		msg->rsp_size = 3;
4380 4381 4382 4383 4384 4385
	} else if (((msg->rsp[0] >> 2) != ((msg->data[0] >> 2) | 1))
		   || (msg->rsp[1] != msg->data[1])) {
		/*
		 * The NetFN and Command in the response is not even
		 * marginally correct.
		 */
4386 4387 4388 4389
		dev_warn(intf->si_dev,
			 PFX "BMC returned incorrect response, expected netfn %x cmd %x, got netfn %x cmd %x\n",
			 (msg->data[0] >> 2) | 1, msg->data[1],
			 msg->rsp[0] >> 2, msg->rsp[1]);
L
Linus Torvalds 已提交
4390 4391 4392 4393 4394 4395 4396 4397 4398 4399

		/* Generate an error response for the message. */
		msg->rsp[0] = msg->data[0] | (1 << 2);
		msg->rsp[1] = msg->data[1];
		msg->rsp[2] = IPMI_ERR_UNSPECIFIED;
		msg->rsp_size = 3;
	}

	if ((msg->rsp[0] == ((IPMI_NETFN_APP_REQUEST|1) << 2))
	    && (msg->rsp[1] == IPMI_SEND_MSG_CMD)
4400 4401 4402 4403 4404
	    && (msg->user_data != NULL)) {
		/*
		 * It's a response to a response we sent.  For this we
		 * deliver a send message response to the user.
		 */
4405
		struct ipmi_recv_msg *recv_msg = msg->user_data;
L
Linus Torvalds 已提交
4406 4407 4408 4409 4410 4411 4412 4413 4414 4415 4416

		requeue = 0;
		if (msg->rsp_size < 2)
			/* Message is too small to be correct. */
			goto out;

		chan = msg->data[2] & 0x0f;
		if (chan >= IPMI_MAX_CHANNELS)
			/* Invalid channel number */
			goto out;

4417 4418 4419 4420 4421 4422 4423
		if (!recv_msg)
			goto out;

		recv_msg->recv_type = IPMI_RESPONSE_RESPONSE_TYPE;
		recv_msg->msg.data = recv_msg->msg_data;
		recv_msg->msg.data_len = 1;
		recv_msg->msg_data[0] = msg->rsp[2];
C
Corey Minyard 已提交
4424
		deliver_local_response(intf, recv_msg);
L
Linus Torvalds 已提交
4425
	} else if ((msg->rsp[0] == ((IPMI_NETFN_APP_REQUEST|1) << 2))
4426
		   && (msg->rsp[1] == IPMI_GET_MSG_CMD)) {
4427 4428
		struct ipmi_channel   *chans;

L
Linus Torvalds 已提交
4429 4430 4431 4432 4433 4434 4435 4436
		/* It's from the receive queue. */
		chan = msg->rsp[3] & 0xf;
		if (chan >= IPMI_MAX_CHANNELS) {
			/* Invalid channel number */
			requeue = 0;
			goto out;
		}

D
dann frazier 已提交
4437
		/*
C
Corey Minyard 已提交
4438 4439 4440 4441 4442
		 * We need to make sure the channels have been initialized.
		 * The channel_handler routine will set the "curr_channel"
		 * equal to or greater than IPMI_MAX_CHANNELS when all the
		 * channels for this interface have been initialized.
		 */
4443
		if (!intf->channels_ready) {
C
Corey Minyard 已提交
4444
			requeue = 0; /* Throw the message away */
D
dann frazier 已提交
4445 4446 4447
			goto out;
		}

4448 4449 4450
		chans = READ_ONCE(intf->channel_list)->c;

		switch (chans[chan].medium) {
L
Linus Torvalds 已提交
4451 4452
		case IPMI_CHANNEL_MEDIUM_IPMB:
			if (msg->rsp[4] & 0x04) {
4453 4454 4455 4456
				/*
				 * It's a response, so find the
				 * requesting message and send it up.
				 */
L
Linus Torvalds 已提交
4457 4458
				requeue = handle_ipmb_get_msg_rsp(intf, msg);
			} else {
4459 4460 4461 4462
				/*
				 * It's a command to the SMS from some other
				 * entity.  Handle that.
				 */
L
Linus Torvalds 已提交
4463 4464 4465 4466 4467 4468 4469
				requeue = handle_ipmb_get_msg_cmd(intf, msg);
			}
			break;

		case IPMI_CHANNEL_MEDIUM_8023LAN:
		case IPMI_CHANNEL_MEDIUM_ASYNC:
			if (msg->rsp[6] & 0x04) {
4470 4471 4472 4473
				/*
				 * It's a response, so find the
				 * requesting message and send it up.
				 */
L
Linus Torvalds 已提交
4474 4475
				requeue = handle_lan_get_msg_rsp(intf, msg);
			} else {
4476 4477 4478 4479
				/*
				 * It's a command to the SMS from some other
				 * entity.  Handle that.
				 */
L
Linus Torvalds 已提交
4480 4481 4482 4483 4484
				requeue = handle_lan_get_msg_cmd(intf, msg);
			}
			break;

		default:
D
dann frazier 已提交
4485 4486
			/* Check for OEM Channels.  Clients had better
			   register for these commands. */
4487 4488
			if ((chans[chan].medium >= IPMI_CHANNEL_MEDIUM_OEM_MIN)
			    && (chans[chan].medium
D
dann frazier 已提交
4489 4490 4491 4492 4493 4494 4495 4496 4497
				<= IPMI_CHANNEL_MEDIUM_OEM_MAX)) {
				requeue = handle_oem_get_msg_cmd(intf, msg);
			} else {
				/*
				 * We don't handle the channel type, so just
				 * free the message.
				 */
				requeue = 0;
			}
L
Linus Torvalds 已提交
4498 4499 4500
		}

	} else if ((msg->rsp[0] == ((IPMI_NETFN_APP_REQUEST|1) << 2))
4501
		   && (msg->rsp[1] == IPMI_READ_EVENT_MSG_BUFFER_CMD)) {
4502
		/* It's an asynchronous event. */
L
Linus Torvalds 已提交
4503 4504 4505 4506 4507 4508 4509 4510 4511 4512
		requeue = handle_read_event_rsp(intf, msg);
	} else {
		/* It's a response from the local BMC. */
		requeue = handle_bmc_rsp(intf, msg);
	}

 out:
	return requeue;
}

4513 4514 4515
/*
 * If there are messages in the queue or pretimeouts, handle them.
 */
4516
static void handle_new_recv_msgs(struct ipmi_smi *intf)
4517 4518 4519 4520 4521 4522 4523 4524
{
	struct ipmi_smi_msg  *smi_msg;
	unsigned long        flags = 0;
	int                  rv;
	int                  run_to_completion = intf->run_to_completion;

	/* See if any waiting messages need to be processed. */
	if (!run_to_completion)
4525 4526 4527
		spin_lock_irqsave(&intf->waiting_rcv_msgs_lock, flags);
	while (!list_empty(&intf->waiting_rcv_msgs)) {
		smi_msg = list_entry(intf->waiting_rcv_msgs.next,
4528
				     struct ipmi_smi_msg, link);
4529
		list_del(&smi_msg->link);
4530
		if (!run_to_completion)
4531 4532
			spin_unlock_irqrestore(&intf->waiting_rcv_msgs_lock,
					       flags);
4533 4534
		rv = handle_one_recv_msg(intf, smi_msg);
		if (!run_to_completion)
4535
			spin_lock_irqsave(&intf->waiting_rcv_msgs_lock, flags);
4536
		if (rv > 0) {
4537 4538
			/*
			 * To preserve message order, quit if we
4539 4540 4541 4542
			 * can't handle a message.  Add the message
			 * back at the head, this is safe because this
			 * tasklet is the only thing that pulls the
			 * messages.
4543
			 */
4544
			list_add(&smi_msg->link, &intf->waiting_rcv_msgs);
4545
			break;
4546 4547 4548 4549 4550
		} else {
			if (rv == 0)
				/* Message handled */
				ipmi_free_smi_msg(smi_msg);
			/* If rv < 0, fatal error, del but don't free. */
4551 4552 4553
		}
	}
	if (!run_to_completion)
4554
		spin_unlock_irqrestore(&intf->waiting_rcv_msgs_lock, flags);
4555 4556 4557 4558 4559 4560

	/*
	 * If the pretimout count is non-zero, decrement one from it and
	 * deliver pretimeouts to all the users.
	 */
	if (atomic_add_unless(&intf->watchdog_pretimeouts_to_deliver, -1, 0)) {
4561
		struct ipmi_user *user;
4562
		int index;
4563

4564
		index = srcu_read_lock(&intf->users_srcu);
4565 4566 4567 4568 4569
		list_for_each_entry_rcu(user, &intf->users, link) {
			if (user->handler->ipmi_watchdog_pretimeout)
				user->handler->ipmi_watchdog_pretimeout(
					user->handler_data);
		}
4570
		srcu_read_unlock(&intf->users_srcu, index);
4571 4572 4573 4574 4575
	}
}

static void smi_recv_tasklet(unsigned long val)
{
4576
	unsigned long flags = 0; /* keep us warning-free. */
4577
	struct ipmi_smi *intf = (struct ipmi_smi *) val;
4578 4579 4580 4581 4582 4583 4584 4585 4586 4587
	int run_to_completion = intf->run_to_completion;
	struct ipmi_smi_msg *newmsg = NULL;

	/*
	 * Start the next message if available.
	 *
	 * Do this here, not in the actual receiver, because we may deadlock
	 * because the lower layer is allowed to hold locks while calling
	 * message delivery.
	 */
4588 4589 4590

	rcu_read_lock();

4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607 4608 4609 4610
	if (!run_to_completion)
		spin_lock_irqsave(&intf->xmit_msgs_lock, flags);
	if (intf->curr_msg == NULL && !intf->in_shutdown) {
		struct list_head *entry = NULL;

		/* Pick the high priority queue first. */
		if (!list_empty(&intf->hp_xmit_msgs))
			entry = intf->hp_xmit_msgs.next;
		else if (!list_empty(&intf->xmit_msgs))
			entry = intf->xmit_msgs.next;

		if (entry) {
			list_del(entry);
			newmsg = list_entry(entry, struct ipmi_smi_msg, link);
			intf->curr_msg = newmsg;
		}
	}
	if (!run_to_completion)
		spin_unlock_irqrestore(&intf->xmit_msgs_lock, flags);
	if (newmsg)
4611
		intf->handlers->sender(intf->send_info, newmsg);
4612

4613 4614
	rcu_read_unlock();

4615
	handle_new_recv_msgs(intf);
4616 4617
}

L
Linus Torvalds 已提交
4618
/* Handle a new message from the lower layer. */
4619
void ipmi_smi_msg_received(struct ipmi_smi *intf,
L
Linus Torvalds 已提交
4620 4621
			   struct ipmi_smi_msg *msg)
{
4622
	unsigned long flags = 0; /* keep us warning-free. */
4623
	int run_to_completion = intf->run_to_completion;
L
Linus Torvalds 已提交
4624 4625 4626 4627

	if ((msg->data_size >= 2)
	    && (msg->data[0] == (IPMI_NETFN_APP_REQUEST << 2))
	    && (msg->data[1] == IPMI_SEND_MSG_CMD)
4628
	    && (msg->user_data == NULL)) {
4629 4630 4631 4632

		if (intf->in_shutdown)
			goto free_msg;

4633 4634 4635 4636 4637 4638 4639 4640 4641 4642 4643 4644 4645
		/*
		 * This is the local response to a command send, start
		 * the timer for these.  The user_data will not be
		 * NULL if this is a response send, and we will let
		 * response sends just go through.
		 */

		/*
		 * Check for errors, if we get certain errors (ones
		 * that mean basically we can try again later), we
		 * ignore them and start the timer.  Otherwise we
		 * report the error immediately.
		 */
L
Linus Torvalds 已提交
4646 4647
		if ((msg->rsp_size >= 3) && (msg->rsp[2] != 0)
		    && (msg->rsp[2] != IPMI_NODE_BUSY_ERR)
4648 4649
		    && (msg->rsp[2] != IPMI_LOST_ARBITRATION_ERR)
		    && (msg->rsp[2] != IPMI_BUS_ERR)
4650
		    && (msg->rsp[2] != IPMI_NAK_ON_WRITE_ERR)) {
4651 4652
			int ch = msg->rsp[3] & 0xf;
			struct ipmi_channel *chans;
L
Linus Torvalds 已提交
4653 4654

			/* Got an error sending the message, handle it. */
4655 4656 4657 4658

			chans = READ_ONCE(intf->channel_list)->c;
			if ((chans[ch].medium == IPMI_CHANNEL_MEDIUM_8023LAN)
			    || (chans[ch].medium == IPMI_CHANNEL_MEDIUM_ASYNC))
4659
				ipmi_inc_stat(intf, sent_lan_command_errs);
L
Linus Torvalds 已提交
4660
			else
4661
				ipmi_inc_stat(intf, sent_ipmb_command_errs);
L
Linus Torvalds 已提交
4662
			intf_err_seq(intf, msg->msgid, msg->rsp[2]);
4663
		} else
L
Linus Torvalds 已提交
4664 4665 4666
			/* The message was sent, start the timer. */
			intf_start_seq_timer(intf, msg->msgid);

4667
free_msg:
L
Linus Torvalds 已提交
4668
		ipmi_free_smi_msg(msg);
4669 4670 4671 4672 4673 4674 4675 4676 4677 4678 4679
	} else {
		/*
		 * To preserve message order, we keep a queue and deliver from
		 * a tasklet.
		 */
		if (!run_to_completion)
			spin_lock_irqsave(&intf->waiting_rcv_msgs_lock, flags);
		list_add_tail(&msg->link, &intf->waiting_rcv_msgs);
		if (!run_to_completion)
			spin_unlock_irqrestore(&intf->waiting_rcv_msgs_lock,
					       flags);
L
Linus Torvalds 已提交
4680 4681
	}

4682
	if (!run_to_completion)
4683
		spin_lock_irqsave(&intf->xmit_msgs_lock, flags);
4684 4685 4686 4687
	/*
	 * We can get an asynchronous event or receive message in addition
	 * to commands we send.
	 */
4688 4689
	if (msg == intf->curr_msg)
		intf->curr_msg = NULL;
4690
	if (!run_to_completion)
4691
		spin_unlock_irqrestore(&intf->xmit_msgs_lock, flags);
4692

4693 4694 4695 4696
	if (run_to_completion)
		smi_recv_tasklet((unsigned long) intf);
	else
		tasklet_schedule(&intf->recv_tasklet);
L
Linus Torvalds 已提交
4697
}
4698
EXPORT_SYMBOL(ipmi_smi_msg_received);
L
Linus Torvalds 已提交
4699

4700
void ipmi_smi_watchdog_pretimeout(struct ipmi_smi *intf)
L
Linus Torvalds 已提交
4701
{
4702 4703 4704
	if (intf->in_shutdown)
		return;

4705 4706
	atomic_set(&intf->watchdog_pretimeouts_to_deliver, 1);
	tasklet_schedule(&intf->recv_tasklet);
L
Linus Torvalds 已提交
4707
}
4708
EXPORT_SYMBOL(ipmi_smi_watchdog_pretimeout);
L
Linus Torvalds 已提交
4709

C
Corey Minyard 已提交
4710
static struct ipmi_smi_msg *
4711
smi_from_recv_msg(struct ipmi_smi *intf, struct ipmi_recv_msg *recv_msg,
C
Corey Minyard 已提交
4712
		  unsigned char seq, long seqid)
L
Linus Torvalds 已提交
4713
{
C
Corey Minyard 已提交
4714
	struct ipmi_smi_msg *smi_msg = ipmi_alloc_smi_msg();
L
Linus Torvalds 已提交
4715
	if (!smi_msg)
4716 4717 4718 4719
		/*
		 * If we can't allocate the message, then just return, we
		 * get 4 retries, so this should be ok.
		 */
C
Corey Minyard 已提交
4720
		return NULL;
L
Linus Torvalds 已提交
4721 4722 4723 4724

	memcpy(smi_msg->data, recv_msg->msg.data, recv_msg->msg.data_len);
	smi_msg->data_size = recv_msg->msg.data_len;
	smi_msg->msgid = STORE_SEQ_IN_MSGID(seq, seqid);
4725

C
Corey Minyard 已提交
4726 4727
	ipmi_debug_msg("Resend: ", smi_msg->data, smi_msg->data_size);

C
Corey Minyard 已提交
4728
	return smi_msg;
L
Linus Torvalds 已提交
4729 4730
}

4731
static void check_msg_timeout(struct ipmi_smi *intf, struct seq_table *ent,
4732 4733
			      struct list_head *timeouts,
			      unsigned long timeout_period,
4734 4735
			      int slot, unsigned long *flags,
			      unsigned int *waiting_msgs)
4736
{
4737
	struct ipmi_recv_msg *msg;
4738

4739
	if (intf->in_shutdown)
4740
		return;
4741 4742 4743 4744

	if (!ent->inuse)
		return;

4745 4746
	if (timeout_period < ent->timeout) {
		ent->timeout -= timeout_period;
4747
		(*waiting_msgs)++;
4748
		return;
4749
	}
4750 4751 4752 4753 4754 4755 4756

	if (ent->retries_left == 0) {
		/* The message has used all its retries. */
		ent->inuse = 0;
		msg = ent->recv_msg;
		list_add_tail(&msg->link, timeouts);
		if (ent->broadcast)
4757
			ipmi_inc_stat(intf, timed_out_ipmb_broadcasts);
4758
		else if (is_lan_addr(&ent->recv_msg->addr))
4759
			ipmi_inc_stat(intf, timed_out_lan_commands);
4760
		else
4761
			ipmi_inc_stat(intf, timed_out_ipmb_commands);
4762 4763 4764 4765
	} else {
		struct ipmi_smi_msg *smi_msg;
		/* More retries, send again. */

4766 4767
		(*waiting_msgs)++;

4768 4769 4770 4771
		/*
		 * Start with the max timer, set to normal timer after
		 * the message is sent.
		 */
4772 4773 4774 4775
		ent->timeout = MAX_MSG_TIMEOUT;
		ent->retries_left--;
		smi_msg = smi_from_recv_msg(intf, ent->recv_msg, slot,
					    ent->seqid);
4776 4777 4778 4779 4780 4781 4782
		if (!smi_msg) {
			if (is_lan_addr(&ent->recv_msg->addr))
				ipmi_inc_stat(intf,
					      dropped_rexmit_lan_commands);
			else
				ipmi_inc_stat(intf,
					      dropped_rexmit_ipmb_commands);
4783
			return;
4784
		}
4785 4786

		spin_unlock_irqrestore(&intf->seq_lock, *flags);
4787

4788 4789 4790 4791 4792 4793 4794
		/*
		 * Send the new message.  We send with a zero
		 * priority.  It timed out, I doubt time is that
		 * critical now, and high priority messages are really
		 * only for messages to the local MC, which don't get
		 * resent.
		 */
4795
		if (intf->handlers) {
4796 4797 4798 4799 4800 4801 4802
			if (is_lan_addr(&ent->recv_msg->addr))
				ipmi_inc_stat(intf,
					      retransmitted_lan_commands);
			else
				ipmi_inc_stat(intf,
					      retransmitted_ipmb_commands);

4803
			smi_send(intf, intf->handlers, smi_msg, 0);
4804
		} else
4805 4806
			ipmi_free_smi_msg(smi_msg);

4807 4808 4809 4810
		spin_lock_irqsave(&intf->seq_lock, *flags);
	}
}

4811
static unsigned int ipmi_timeout_handler(struct ipmi_smi *intf,
4812
					 unsigned long timeout_period)
L
Linus Torvalds 已提交
4813 4814 4815 4816
{
	struct list_head     timeouts;
	struct ipmi_recv_msg *msg, *msg2;
	unsigned long        flags;
4817
	int                  i;
4818
	unsigned int         waiting_msgs = 0;
L
Linus Torvalds 已提交
4819

4820 4821 4822 4823 4824 4825 4826 4827
	if (!intf->bmc_registered) {
		kref_get(&intf->refcount);
		if (!schedule_work(&intf->bmc_reg_work)) {
			kref_put(&intf->refcount, intf_free);
			waiting_msgs++;
		}
	}

4828 4829 4830 4831 4832 4833 4834
	/*
	 * Go through the seq table and find any messages that
	 * have timed out, putting them in the timeouts
	 * list.
	 */
	INIT_LIST_HEAD(&timeouts);
	spin_lock_irqsave(&intf->seq_lock, flags);
4835 4836 4837 4838 4839 4840
	if (intf->ipmb_maintenance_mode_timeout) {
		if (intf->ipmb_maintenance_mode_timeout <= timeout_period)
			intf->ipmb_maintenance_mode_timeout = 0;
		else
			intf->ipmb_maintenance_mode_timeout -= timeout_period;
	}
4841
	for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++)
4842
		check_msg_timeout(intf, &intf->seq_table[i],
4843 4844 4845
				  &timeouts, timeout_period, i,
				  &flags, &waiting_msgs);
	spin_unlock_irqrestore(&intf->seq_lock, flags);
4846

4847
	list_for_each_entry_safe(msg, msg2, &timeouts, link)
C
Corey Minyard 已提交
4848
		deliver_err_response(intf, msg, IPMI_TIMEOUT_COMPLETION_CODE);
C
Corey Minyard 已提交
4849

4850 4851 4852 4853 4854 4855 4856 4857 4858 4859
	/*
	 * Maintenance mode handling.  Check the timeout
	 * optimistically before we claim the lock.  It may
	 * mean a timeout gets missed occasionally, but that
	 * only means the timeout gets extended by one period
	 * in that case.  No big deal, and it avoids the lock
	 * most of the time.
	 */
	if (intf->auto_maintenance_timeout > 0) {
		spin_lock_irqsave(&intf->maintenance_mode_lock, flags);
C
Corey Minyard 已提交
4860
		if (intf->auto_maintenance_timeout > 0) {
4861 4862 4863 4864
			intf->auto_maintenance_timeout
				-= timeout_period;
			if (!intf->maintenance_mode
			    && (intf->auto_maintenance_timeout <= 0)) {
C
Corey Minyard 已提交
4865
				intf->maintenance_mode_enable = false;
4866
				maintenance_mode_update(intf);
C
Corey Minyard 已提交
4867 4868
			}
		}
4869 4870
		spin_unlock_irqrestore(&intf->maintenance_mode_lock,
				       flags);
L
Linus Torvalds 已提交
4871
	}
4872 4873 4874 4875

	tasklet_schedule(&intf->recv_tasklet);

	return waiting_msgs;
L
Linus Torvalds 已提交
4876 4877
}

4878
static void ipmi_request_event(struct ipmi_smi *intf)
L
Linus Torvalds 已提交
4879
{
4880 4881 4882
	/* No event requests when in maintenance mode. */
	if (intf->maintenance_mode_enable)
		return;
C
Corey Minyard 已提交
4883

4884 4885
	if (!intf->in_shutdown)
		intf->handlers->request_events(intf->send_info);
L
Linus Torvalds 已提交
4886 4887 4888 4889
}

static struct timer_list ipmi_timer;

4890
static atomic_t stop_operation;
L
Linus Torvalds 已提交
4891

4892
static void ipmi_timeout(struct timer_list *unused)
L
Linus Torvalds 已提交
4893
{
4894
	struct ipmi_smi *intf;
4895
	int nt = 0, index;
4896

4897
	if (atomic_read(&stop_operation))
L
Linus Torvalds 已提交
4898 4899
		return;

4900
	index = srcu_read_lock(&ipmi_interfaces_srcu);
4901 4902 4903 4904 4905 4906 4907 4908 4909 4910 4911 4912 4913
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
		int lnt = 0;

		if (atomic_read(&intf->event_waiters)) {
			intf->ticks_to_req_ev--;
			if (intf->ticks_to_req_ev == 0) {
				ipmi_request_event(intf);
				intf->ticks_to_req_ev = IPMI_REQUEST_EV_TIME;
			}
			lnt++;
		}

		lnt += ipmi_timeout_handler(intf, IPMI_TIMEOUT_TIME);
L
Linus Torvalds 已提交
4914

4915 4916 4917 4918 4919
		lnt = !!lnt;
		if (lnt != intf->last_needs_timer &&
					intf->handlers->set_need_watch)
			intf->handlers->set_need_watch(intf->send_info, lnt);
		intf->last_needs_timer = lnt;
L
Linus Torvalds 已提交
4920

4921 4922
		nt += lnt;
	}
4923
	srcu_read_unlock(&ipmi_interfaces_srcu, index);
4924 4925 4926

	if (nt)
		mod_timer(&ipmi_timer, jiffies + IPMI_TIMEOUT_JIFFIES);
L
Linus Torvalds 已提交
4927 4928
}

4929
static void need_waiter(struct ipmi_smi *intf)
4930 4931 4932 4933 4934
{
	/* Racy, but worst case we start the timer twice. */
	if (!timer_pending(&ipmi_timer))
		mod_timer(&ipmi_timer, jiffies + IPMI_TIMEOUT_JIFFIES);
}
L
Linus Torvalds 已提交
4935 4936 4937 4938 4939 4940 4941 4942 4943 4944 4945 4946 4947 4948 4949 4950 4951 4952 4953 4954 4955

static atomic_t smi_msg_inuse_count = ATOMIC_INIT(0);
static atomic_t recv_msg_inuse_count = ATOMIC_INIT(0);

static void free_smi_msg(struct ipmi_smi_msg *msg)
{
	atomic_dec(&smi_msg_inuse_count);
	kfree(msg);
}

struct ipmi_smi_msg *ipmi_alloc_smi_msg(void)
{
	struct ipmi_smi_msg *rv;
	rv = kmalloc(sizeof(struct ipmi_smi_msg), GFP_ATOMIC);
	if (rv) {
		rv->done = free_smi_msg;
		rv->user_data = NULL;
		atomic_inc(&smi_msg_inuse_count);
	}
	return rv;
}
4956
EXPORT_SYMBOL(ipmi_alloc_smi_msg);
L
Linus Torvalds 已提交
4957 4958 4959 4960 4961 4962 4963

static void free_recv_msg(struct ipmi_recv_msg *msg)
{
	atomic_dec(&recv_msg_inuse_count);
	kfree(msg);
}

A
Adrian Bunk 已提交
4964
static struct ipmi_recv_msg *ipmi_alloc_recv_msg(void)
L
Linus Torvalds 已提交
4965 4966 4967 4968 4969
{
	struct ipmi_recv_msg *rv;

	rv = kmalloc(sizeof(struct ipmi_recv_msg), GFP_ATOMIC);
	if (rv) {
4970
		rv->user = NULL;
L
Linus Torvalds 已提交
4971 4972 4973 4974 4975 4976
		rv->done = free_recv_msg;
		atomic_inc(&recv_msg_inuse_count);
	}
	return rv;
}

4977 4978 4979 4980 4981 4982
void ipmi_free_recv_msg(struct ipmi_recv_msg *msg)
{
	if (msg->user)
		kref_put(&msg->user->refcount, free_user);
	msg->done(msg);
}
4983
EXPORT_SYMBOL(ipmi_free_recv_msg);
4984

4985 4986
static atomic_t panic_done_count = ATOMIC_INIT(0);

L
Linus Torvalds 已提交
4987 4988
static void dummy_smi_done_handler(struct ipmi_smi_msg *msg)
{
4989
	atomic_dec(&panic_done_count);
L
Linus Torvalds 已提交
4990 4991 4992 4993
}

static void dummy_recv_done_handler(struct ipmi_recv_msg *msg)
{
4994 4995 4996 4997 4998 4999
	atomic_dec(&panic_done_count);
}

/*
 * Inside a panic, send a message and wait for a response.
 */
5000 5001
static void ipmi_panic_request_and_wait(struct ipmi_smi *intf,
					struct ipmi_addr *addr,
5002 5003 5004 5005 5006 5007 5008 5009 5010 5011 5012 5013 5014 5015 5016 5017 5018 5019
					struct kernel_ipmi_msg *msg)
{
	struct ipmi_smi_msg  smi_msg;
	struct ipmi_recv_msg recv_msg;
	int rv;

	smi_msg.done = dummy_smi_done_handler;
	recv_msg.done = dummy_recv_done_handler;
	atomic_add(2, &panic_done_count);
	rv = i_ipmi_request(NULL,
			    intf,
			    addr,
			    0,
			    msg,
			    intf,
			    &smi_msg,
			    &recv_msg,
			    0,
5020 5021
			    intf->addrinfo[0].address,
			    intf->addrinfo[0].lun,
5022 5023 5024
			    0, 1); /* Don't retry, and don't wait. */
	if (rv)
		atomic_sub(2, &panic_done_count);
5025 5026 5027
	else if (intf->handlers->flush_messages)
		intf->handlers->flush_messages(intf->send_info);

5028 5029
	while (atomic_read(&panic_done_count) != 0)
		ipmi_poll(intf);
L
Linus Torvalds 已提交
5030 5031
}

5032 5033
static void event_receiver_fetcher(struct ipmi_smi *intf,
				   struct ipmi_recv_msg *msg)
L
Linus Torvalds 已提交
5034
{
5035 5036 5037
	if ((msg->addr.addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
	    && (msg->msg.netfn == IPMI_NETFN_SENSOR_EVENT_RESPONSE)
	    && (msg->msg.cmd == IPMI_GET_EVENT_RECEIVER_CMD)
5038
	    && (msg->msg.data[0] == IPMI_CC_NO_ERROR)) {
L
Linus Torvalds 已提交
5039
		/* A get event receiver command, save it. */
5040 5041
		intf->event_receiver = msg->msg.data[1];
		intf->event_receiver_lun = msg->msg.data[2] & 0x3;
L
Linus Torvalds 已提交
5042 5043 5044
	}
}

5045
static void device_id_fetcher(struct ipmi_smi *intf, struct ipmi_recv_msg *msg)
L
Linus Torvalds 已提交
5046
{
5047 5048 5049
	if ((msg->addr.addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
	    && (msg->msg.netfn == IPMI_NETFN_APP_RESPONSE)
	    && (msg->msg.cmd == IPMI_GET_DEVICE_ID_CMD)
5050 5051 5052 5053 5054
	    && (msg->msg.data[0] == IPMI_CC_NO_ERROR)) {
		/*
		 * A get device id command, save if we are an event
		 * receiver or generator.
		 */
5055 5056
		intf->local_sel_device = (msg->msg.data[6] >> 2) & 1;
		intf->local_event_generator = (msg->msg.data[6] >> 5) & 1;
L
Linus Torvalds 已提交
5057 5058 5059
	}
}

5060
static void send_panic_events(struct ipmi_smi *intf, char *str)
L
Linus Torvalds 已提交
5061
{
5062 5063
	struct kernel_ipmi_msg msg;
	unsigned char data[16];
L
Linus Torvalds 已提交
5064
	struct ipmi_system_interface_addr *si;
5065 5066 5067 5068
	struct ipmi_addr addr;
	char *p = str;
	struct ipmi_ipmb_addr *ipmb;
	int j;
L
Linus Torvalds 已提交
5069

5070 5071 5072
	if (ipmi_send_panic_event == IPMI_SEND_PANIC_EVENT_NONE)
		return;

L
Linus Torvalds 已提交
5073 5074 5075 5076 5077 5078 5079 5080 5081 5082
	si = (struct ipmi_system_interface_addr *) &addr;
	si->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
	si->channel = IPMI_BMC_CHANNEL;
	si->lun = 0;

	/* Fill in an event telling that we have failed. */
	msg.netfn = 0x04; /* Sensor or Event. */
	msg.cmd = 2; /* Platform event command. */
	msg.data = data;
	msg.data_len = 8;
M
Matt Domsch 已提交
5083
	data[0] = 0x41; /* Kernel generator ID, IPMI table 5-4 */
L
Linus Torvalds 已提交
5084 5085 5086 5087 5088
	data[1] = 0x03; /* This is for IPMI 1.0. */
	data[2] = 0x20; /* OS Critical Stop, IPMI table 36-3 */
	data[4] = 0x6f; /* Sensor specific, IPMI table 36-1 */
	data[5] = 0xa1; /* Runtime stop OEM bytes 2 & 3. */

5089 5090 5091 5092
	/*
	 * Put a few breadcrumbs in.  Hopefully later we can add more things
	 * to make the panic events more useful.
	 */
L
Linus Torvalds 已提交
5093 5094 5095 5096 5097 5098
	if (str) {
		data[3] = str[0];
		data[6] = str[1];
		data[7] = str[2];
	}

5099 5100
	/* Send the event announcing the panic. */
	ipmi_panic_request_and_wait(intf, &addr, &msg);
L
Linus Torvalds 已提交
5101

5102 5103 5104 5105
	/*
	 * On every interface, dump a bunch of OEM event holding the
	 * string.
	 */
5106
	if (ipmi_send_panic_event != IPMI_SEND_PANIC_EVENT_STRING || !str)
L
Linus Torvalds 已提交
5107 5108
		return;

5109 5110 5111 5112 5113 5114 5115
	/*
	 * intf_num is used as an marker to tell if the
	 * interface is valid.  Thus we need a read barrier to
	 * make sure data fetched before checking intf_num
	 * won't be used.
	 */
	smp_rmb();
L
Linus Torvalds 已提交
5116

5117 5118 5119 5120 5121 5122 5123
	/*
	 * First job here is to figure out where to send the
	 * OEM events.  There's no way in IPMI to send OEM
	 * events using an event send command, so we have to
	 * find the SEL to put them in and stick them in
	 * there.
	 */
5124

5125 5126 5127 5128
	/* Get capabilities from the get device id. */
	intf->local_sel_device = 0;
	intf->local_event_generator = 0;
	intf->event_receiver = 0;
L
Linus Torvalds 已提交
5129

5130 5131 5132 5133 5134 5135 5136
	/* Request the device info from the local MC. */
	msg.netfn = IPMI_NETFN_APP_REQUEST;
	msg.cmd = IPMI_GET_DEVICE_ID_CMD;
	msg.data = NULL;
	msg.data_len = 0;
	intf->null_user_handler = device_id_fetcher;
	ipmi_panic_request_and_wait(intf, &addr, &msg);
L
Linus Torvalds 已提交
5137

5138 5139 5140 5141
	if (intf->local_event_generator) {
		/* Request the event receiver from the local MC. */
		msg.netfn = IPMI_NETFN_SENSOR_EVENT_REQUEST;
		msg.cmd = IPMI_GET_EVENT_RECEIVER_CMD;
L
Linus Torvalds 已提交
5142 5143
		msg.data = NULL;
		msg.data_len = 0;
5144
		intf->null_user_handler = event_receiver_fetcher;
5145
		ipmi_panic_request_and_wait(intf, &addr, &msg);
5146 5147
	}
	intf->null_user_handler = NULL;
L
Linus Torvalds 已提交
5148

5149 5150 5151 5152 5153 5154 5155 5156 5157 5158 5159 5160 5161 5162 5163 5164 5165 5166 5167 5168 5169 5170 5171 5172 5173 5174 5175 5176 5177
	/*
	 * Validate the event receiver.  The low bit must not
	 * be 1 (it must be a valid IPMB address), it cannot
	 * be zero, and it must not be my address.
	 */
	if (((intf->event_receiver & 1) == 0)
	    && (intf->event_receiver != 0)
	    && (intf->event_receiver != intf->addrinfo[0].address)) {
		/*
		 * The event receiver is valid, send an IPMB
		 * message.
		 */
		ipmb = (struct ipmi_ipmb_addr *) &addr;
		ipmb->addr_type = IPMI_IPMB_ADDR_TYPE;
		ipmb->channel = 0; /* FIXME - is this right? */
		ipmb->lun = intf->event_receiver_lun;
		ipmb->slave_addr = intf->event_receiver;
	} else if (intf->local_sel_device) {
		/*
		 * The event receiver was not valid (or was
		 * me), but I am an SEL device, just dump it
		 * in my SEL.
		 */
		si = (struct ipmi_system_interface_addr *) &addr;
		si->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
		si->channel = IPMI_BMC_CHANNEL;
		si->lun = 0;
	} else
		return; /* No where to send the event. */
L
Linus Torvalds 已提交
5178

5179 5180 5181 5182 5183 5184 5185 5186 5187 5188 5189 5190 5191 5192 5193 5194
	msg.netfn = IPMI_NETFN_STORAGE_REQUEST; /* Storage. */
	msg.cmd = IPMI_ADD_SEL_ENTRY_CMD;
	msg.data = data;
	msg.data_len = 16;

	j = 0;
	while (*p) {
		int size = strlen(p);

		if (size > 11)
			size = 11;
		data[0] = 0;
		data[1] = 0;
		data[2] = 0xf0; /* OEM event without timestamp. */
		data[3] = intf->addrinfo[0].address;
		data[4] = j++; /* sequence # */
5195
		/*
5196 5197
		 * Always give 11 bytes, so strncpy will fill
		 * it with zeroes for me.
5198
		 */
5199 5200
		strncpy(data+5, p, 11);
		p += size;
L
Linus Torvalds 已提交
5201

5202
		ipmi_panic_request_and_wait(intf, &addr, &msg);
5203
	}
L
Linus Torvalds 已提交
5204 5205
}

R
Randy Dunlap 已提交
5206
static int has_panicked;
L
Linus Torvalds 已提交
5207 5208 5209

static int panic_event(struct notifier_block *this,
		       unsigned long         event,
5210
		       void                  *ptr)
L
Linus Torvalds 已提交
5211
{
5212
	struct ipmi_smi *intf;
5213
	struct ipmi_user *user;
L
Linus Torvalds 已提交
5214

L
Lee Revell 已提交
5215
	if (has_panicked)
L
Linus Torvalds 已提交
5216
		return NOTIFY_DONE;
L
Lee Revell 已提交
5217
	has_panicked = 1;
L
Linus Torvalds 已提交
5218 5219

	/* For every registered interface, set it to run to completion. */
5220
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
5221
		if (!intf->handlers || intf->intf_num == -1)
5222
			/* Interface is not ready. */
L
Linus Torvalds 已提交
5223 5224
			continue;

5225 5226 5227
		if (!intf->handlers->poll)
			continue;

5228 5229 5230 5231 5232 5233 5234 5235 5236 5237 5238 5239 5240 5241 5242 5243 5244
		/*
		 * If we were interrupted while locking xmit_msgs_lock or
		 * waiting_rcv_msgs_lock, the corresponding list may be
		 * corrupted.  In this case, drop items on the list for
		 * the safety.
		 */
		if (!spin_trylock(&intf->xmit_msgs_lock)) {
			INIT_LIST_HEAD(&intf->xmit_msgs);
			INIT_LIST_HEAD(&intf->hp_xmit_msgs);
		} else
			spin_unlock(&intf->xmit_msgs_lock);

		if (!spin_trylock(&intf->waiting_rcv_msgs_lock))
			INIT_LIST_HEAD(&intf->waiting_rcv_msgs);
		else
			spin_unlock(&intf->waiting_rcv_msgs_lock);

5245
		intf->run_to_completion = 1;
5246 5247 5248
		if (intf->handlers->set_run_to_completion)
			intf->handlers->set_run_to_completion(intf->send_info,
							      1);
L
Linus Torvalds 已提交
5249

5250 5251 5252 5253 5254 5255 5256 5257
		list_for_each_entry_rcu(user, &intf->users, link) {
			if (user->handler->ipmi_panic_handler)
				user->handler->ipmi_panic_handler(
					user->handler_data);
		}

		send_panic_events(intf, ptr);
	}
L
Linus Torvalds 已提交
5258 5259 5260 5261 5262 5263 5264 5265 5266 5267 5268 5269

	return NOTIFY_DONE;
}

static struct notifier_block panic_block = {
	.notifier_call	= panic_event,
	.next		= NULL,
	.priority	= 200	/* priority: INT_MAX >= x >= 0 */
};

static int ipmi_init_msghandler(void)
{
5270
	int rv;
L
Linus Torvalds 已提交
5271 5272 5273 5274

	if (initialized)
		return 0;

5275
	rv = driver_register(&ipmidriver.driver);
5276
	if (rv) {
5277
		pr_err(PFX "Could not register IPMI driver\n");
5278 5279 5280
		return rv;
	}

5281
	pr_info("ipmi message handler version " IPMI_DRIVER_VERSION "\n");
L
Linus Torvalds 已提交
5282

5283
#ifdef CONFIG_IPMI_PROC_INTERFACE
L
Linus Torvalds 已提交
5284 5285
	proc_ipmi_root = proc_mkdir("ipmi", NULL);
	if (!proc_ipmi_root) {
5286
	    pr_err(PFX "Unable to create IPMI proc dir");
5287
	    driver_unregister(&ipmidriver.driver);
L
Linus Torvalds 已提交
5288 5289 5290
	    return -ENOMEM;
	}

5291
#endif /* CONFIG_IPMI_PROC_INTERFACE */
L
Linus Torvalds 已提交
5292

5293
	timer_setup(&ipmi_timer, ipmi_timeout, 0);
5294
	mod_timer(&ipmi_timer, jiffies + IPMI_TIMEOUT_JIFFIES);
L
Linus Torvalds 已提交
5295

5296
	atomic_notifier_chain_register(&panic_notifier_list, &panic_block);
L
Linus Torvalds 已提交
5297 5298 5299 5300 5301 5302

	initialized = 1;

	return 0;
}

5303
static int __init ipmi_init_msghandler_mod(void)
L
Linus Torvalds 已提交
5304 5305 5306 5307 5308
{
	ipmi_init_msghandler();
	return 0;
}

5309
static void __exit cleanup_ipmi(void)
L
Linus Torvalds 已提交
5310 5311 5312 5313 5314 5315
{
	int count;

	if (!initialized)
		return;

5316
	atomic_notifier_chain_unregister(&panic_notifier_list, &panic_block);
L
Linus Torvalds 已提交
5317

5318 5319 5320 5321
	/*
	 * This can't be called if any interfaces exist, so no worry
	 * about shutting down the interfaces.
	 */
L
Linus Torvalds 已提交
5322

5323 5324 5325 5326 5327
	/*
	 * Tell the timer to stop, then wait for it to stop.  This
	 * avoids problems with race conditions removing the timer
	 * here.
	 */
5328 5329
	atomic_inc(&stop_operation);
	del_timer_sync(&ipmi_timer);
L
Linus Torvalds 已提交
5330

5331
#ifdef CONFIG_IPMI_PROC_INTERFACE
5332
	proc_remove(proc_ipmi_root);
5333
#endif /* CONFIG_IPMI_PROC_INTERFACE */
L
Linus Torvalds 已提交
5334

5335
	driver_unregister(&ipmidriver.driver);
5336

L
Linus Torvalds 已提交
5337 5338 5339 5340 5341
	initialized = 0;

	/* Check for buffer leaks. */
	count = atomic_read(&smi_msg_inuse_count);
	if (count != 0)
5342
		pr_warn(PFX "SMI message count %d at exit\n", count);
L
Linus Torvalds 已提交
5343 5344
	count = atomic_read(&recv_msg_inuse_count);
	if (count != 0)
5345
		pr_warn(PFX "recv message count %d at exit\n", count);
L
Linus Torvalds 已提交
5346 5347 5348 5349 5350
}
module_exit(cleanup_ipmi);

module_init(ipmi_init_msghandler_mod);
MODULE_LICENSE("GPL");
5351
MODULE_AUTHOR("Corey Minyard <minyard@mvista.com>");
5352 5353
MODULE_DESCRIPTION("Incoming and outgoing message routing for an IPMI"
		   " interface.");
5354
MODULE_VERSION(IPMI_DRIVER_VERSION);
5355
MODULE_SOFTDEP("post: ipmi_devintf");