ipmi_msghandler.c 115.7 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
/*
 * 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.
 *
 *  This program is free software; you can redistribute it and/or modify it
 *  under the terms of the GNU General Public License as published by the
 *  Free Software Foundation; either version 2 of the License, or (at your
 *  option) any later version.
 *
 *
 *  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
 *  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
 *  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 *  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 *  INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
 *  BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
 *  OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 *  ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
 *  TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
 *  USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 *  You should have received a copy of the GNU General Public License along
 *  with this program; if not, write to the Free Software Foundation, Inc.,
 *  675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include <linux/module.h>
#include <linux/errno.h>
#include <linux/poll.h>
37
#include <linux/sched.h>
38
#include <linux/seq_file.h>
L
Linus Torvalds 已提交
39
#include <linux/spinlock.h>
40
#include <linux/mutex.h>
L
Linus Torvalds 已提交
41 42 43 44 45 46
#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>
47
#include <linux/rcupdate.h>
48
#include <linux/interrupt.h>
L
Linus Torvalds 已提交
49 50

#define PFX "IPMI message handler: "
51

C
Corey Minyard 已提交
52
#define IPMI_DRIVER_VERSION "39.2"
L
Linus Torvalds 已提交
53 54 55

static struct ipmi_recv_msg *ipmi_alloc_recv_msg(void);
static int ipmi_init_msghandler(void);
56 57
static void smi_recv_tasklet(unsigned long);
static void handle_new_recv_msgs(ipmi_smi_t intf);
L
Linus Torvalds 已提交
58

R
Randy Dunlap 已提交
59
static int initialized;
L
Linus Torvalds 已提交
60

61
#ifdef CONFIG_PROC_FS
R
Randy Dunlap 已提交
62
static struct proc_dir_entry *proc_ipmi_root;
63
#endif /* CONFIG_PROC_FS */
L
Linus Torvalds 已提交
64

C
Corey Minyard 已提交
65 66 67
/* Remain in auto-maintenance mode for this amount of time (in ms). */
#define IPMI_MAINTENANCE_MODE_TIMEOUT 30000

L
Linus Torvalds 已提交
68 69
#define MAX_EVENTS_IN_QUEUE	25

70 71 72 73
/*
 * 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 已提交
74 75
#define MAX_MSG_TIMEOUT		60000

76 77 78
/*
 * The main "user" data structure.
 */
79
struct ipmi_user {
L
Linus Torvalds 已提交
80 81
	struct list_head link;

82 83 84 85 86
	/* Set to "0" when the user is destroyed. */
	int valid;

	struct kref refcount;

L
Linus Torvalds 已提交
87 88 89 90 91 92 93 94 95 96 97
	/* The upper layer that handles receive messages. */
	struct ipmi_user_hndl *handler;
	void             *handler_data;

	/* The interface this user is bound to. */
	ipmi_smi_t intf;

	/* Does this interface receive IPMI events? */
	int gets_events;
};

98
struct cmd_rcvr {
L
Linus Torvalds 已提交
99 100 101 102 103
	struct list_head link;

	ipmi_user_t   user;
	unsigned char netfn;
	unsigned char cmd;
104
	unsigned int  chans;
105 106 107 108 109 110 111

	/*
	 * 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
112 113
	 * every individual deletion of a command.
	 */
114
	struct cmd_rcvr *next;
L
Linus Torvalds 已提交
115 116
};

117
struct seq_table {
L
Linus Torvalds 已提交
118 119 120 121 122 123 124
	unsigned int         inuse : 1;
	unsigned int         broadcast : 1;

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

125 126 127 128 129
	/*
	 * 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 已提交
130 131
	long                 seqid;

132 133 134 135 136
	/*
	 * 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 已提交
137 138 139
	struct ipmi_recv_msg *recv_msg;
};

140 141 142 143
/*
 * Store the information in a msgid (long) to allow us to find a
 * sequence table entry from the msgid.
 */
L
Linus Torvalds 已提交
144 145 146 147 148 149
#define STORE_SEQ_IN_MSGID(seq, seqid) (((seq&0xff)<<26) | (seqid&0x3ffffff))

#define GET_SEQ_FROM_MSGID(msgid, seq, seqid) \
	do {								\
		seq = ((msgid >> 26) & 0x3f);				\
		seqid = (msgid & 0x3fffff);				\
150
	} while (0)
L
Linus Torvalds 已提交
151 152 153

#define NEXT_SEQID(seqid) (((seqid) + 1) & 0x3fffff)

154
struct ipmi_channel {
L
Linus Torvalds 已提交
155 156
	unsigned char medium;
	unsigned char protocol;
157

158 159 160 161
	/*
	 * My slave address.  This is initialized to IPMI_BMC_SLAVE_ADDR,
	 * but may be changed by the user.
	 */
162 163
	unsigned char address;

164 165 166 167
	/*
	 * My LUN.  This should generally stay the SMS LUN, but just in
	 * case...
	 */
168
	unsigned char lun;
L
Linus Torvalds 已提交
169 170
};

171
#ifdef CONFIG_PROC_FS
172
struct ipmi_proc_entry {
L
Linus Torvalds 已提交
173 174 175
	char                   *name;
	struct ipmi_proc_entry *next;
};
176
#endif
L
Linus Torvalds 已提交
177

178
struct bmc_device {
179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198
	struct platform_device *dev;
	struct ipmi_device_id  id;
	unsigned char          guid[16];
	int                    guid_set;

	struct kref	       refcount;

	/* bmc device attributes */
	struct device_attribute device_id_attr;
	struct device_attribute provides_dev_sdrs_attr;
	struct device_attribute revision_attr;
	struct device_attribute firmware_rev_attr;
	struct device_attribute version_attr;
	struct device_attribute add_dev_support_attr;
	struct device_attribute manufacturer_id_attr;
	struct device_attribute product_id_attr;
	struct device_attribute guid_attr;
	struct device_attribute aux_firmware_rev_attr;
};

199 200 201 202
/*
 * Various statistics for IPMI, these index stats[] in the ipmi_smi
 * structure.
 */
203 204 205
enum ipmi_stat_indexes {
	/* Commands we got from the user that were invalid. */
	IPMI_STAT_sent_invalid_commands = 0,
206

207 208
	/* Commands we sent to the MC. */
	IPMI_STAT_sent_local_commands,
209

210 211
	/* Responses from the MC that were delivered to a user. */
	IPMI_STAT_handled_local_responses,
212

213 214
	/* Responses from the MC that were not delivered to a user. */
	IPMI_STAT_unhandled_local_responses,
215

216 217
	/* Commands we sent out to the IPMB bus. */
	IPMI_STAT_sent_ipmb_commands,
218

219 220
	/* Commands sent on the IPMB that had errors on the SEND CMD */
	IPMI_STAT_sent_ipmb_command_errs,
221

222 223
	/* Each retransmit increments this count. */
	IPMI_STAT_retransmitted_ipmb_commands,
224

225 226 227 228 229
	/*
	 * When a message times out (runs out of retransmits) this is
	 * incremented.
	 */
	IPMI_STAT_timed_out_ipmb_commands,
230

231 232 233 234 235 236
	/*
	 * 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,
237

238 239
	/* Responses I have sent to the IPMB bus. */
	IPMI_STAT_sent_ipmb_responses,
240

241 242
	/* The response was delivered to the user. */
	IPMI_STAT_handled_ipmb_responses,
243

244 245
	/* The response had invalid data in it. */
	IPMI_STAT_invalid_ipmb_responses,
246

247 248
	/* The response didn't have anyone waiting for it. */
	IPMI_STAT_unhandled_ipmb_responses,
249

250 251
	/* Commands we sent out to the IPMB bus. */
	IPMI_STAT_sent_lan_commands,
252

253 254
	/* Commands sent on the IPMB that had errors on the SEND CMD */
	IPMI_STAT_sent_lan_command_errs,
255

256 257
	/* Each retransmit increments this count. */
	IPMI_STAT_retransmitted_lan_commands,
258

259 260 261 262 263 264 265 266
	/*
	 * 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,
267

268 269
	/* The response was delivered to the user. */
	IPMI_STAT_handled_lan_responses,
270

271 272
	/* The response had invalid data in it. */
	IPMI_STAT_invalid_lan_responses,
273

274 275
	/* The response didn't have anyone waiting for it. */
	IPMI_STAT_unhandled_lan_responses,
276

277 278
	/* The command was delivered to the user. */
	IPMI_STAT_handled_commands,
279

280 281
	/* The command had invalid data in it. */
	IPMI_STAT_invalid_commands,
282

283 284
	/* The command didn't have anyone waiting for it. */
	IPMI_STAT_unhandled_commands,
285

286 287
	/* Invalid data in an event. */
	IPMI_STAT_invalid_events,
288

289 290
	/* Events that were received with the proper format. */
	IPMI_STAT_events,
291

292 293 294 295 296
	/* Retransmissions on IPMB that failed. */
	IPMI_STAT_dropped_rexmit_ipmb_commands,

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

298 299 300
	/* This *must* remain last, add new values above this. */
	IPMI_NUM_STATS
};
301 302


L
Linus Torvalds 已提交
303
#define IPMI_IPMB_NUM_SEQ	64
304
#define IPMI_MAX_CHANNELS       16
305
struct ipmi_smi {
L
Linus Torvalds 已提交
306 307 308
	/* What interface number are we? */
	int intf_num;

309 310
	struct kref refcount;

311 312 313
	/* Used for a list of interfaces. */
	struct list_head link;

314 315 316 317
	/*
	 * The list of upper layers that are using me.  seq_lock
	 * protects this.
	 */
318
	struct list_head users;
L
Linus Torvalds 已提交
319

320 321 322 323
	/* Information to supply to users. */
	unsigned char ipmi_version_major;
	unsigned char ipmi_version_minor;

L
Linus Torvalds 已提交
324 325 326
	/* Used for wake ups at startup. */
	wait_queue_head_t waitq;

327 328
	struct bmc_device *bmc;
	char *my_dev_name;
329
	char *sysfs_name;
L
Linus Torvalds 已提交
330

331 332
	/*
	 * This is the lower-layer's sender routine.  Note that you
333 334
	 * must either be holding the ipmi_interfaces_mutex or be in
	 * an umpreemptible region to use this.  You must fetch the
335 336
	 * value into a local variable and make sure it is not NULL.
	 */
L
Linus Torvalds 已提交
337 338 339
	struct ipmi_smi_handlers *handlers;
	void                     *send_info;

340
#ifdef CONFIG_PROC_FS
C
Corey Minyard 已提交
341 342
	/* A list of proc entries for this interface. */
	struct mutex           proc_entry_lock;
L
Linus Torvalds 已提交
343
	struct ipmi_proc_entry *proc_entries;
344
#endif
L
Linus Torvalds 已提交
345

346 347 348
	/* Driver-model device for the system interface. */
	struct device          *si_dev;

349 350 351 352 353 354
	/*
	 * 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 已提交
355 356 357 358
	spinlock_t       seq_lock;
	struct seq_table seq_table[IPMI_IPMB_NUM_SEQ];
	int curr_seq;

359
	/*
360 361 362 363
	 * 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.
364
	 */
L
Linus Torvalds 已提交
365 366
	spinlock_t       waiting_msgs_lock;
	struct list_head waiting_msgs;
367 368
	atomic_t	 watchdog_pretimeouts_to_deliver;
	struct tasklet_struct recv_tasklet;
L
Linus Torvalds 已提交
369

370 371 372 373
	/*
	 * The list of command receivers that are registered for commands
	 * on this interface.
	 */
374
	struct mutex     cmd_rcvrs_mutex;
L
Linus Torvalds 已提交
375 376
	struct list_head cmd_rcvrs;

377 378 379 380
	/*
	 * Events that were queues because no one was there to receive
	 * them.
	 */
L
Linus Torvalds 已提交
381 382 383
	spinlock_t       events_lock; /* For dealing with event stuff. */
	struct list_head waiting_events;
	unsigned int     waiting_events_count; /* How many events in queue? */
384 385
	char             delivering_events;
	char             event_msg_printed;
L
Linus Torvalds 已提交
386

387 388 389 390
	/*
	 * The event receiver for my BMC, only really used at panic
	 * shutdown as a place to store this.
	 */
L
Linus Torvalds 已提交
391 392 393 394 395
	unsigned char event_receiver;
	unsigned char event_receiver_lun;
	unsigned char local_sel_device;
	unsigned char local_event_generator;

C
Corey Minyard 已提交
396 397 398 399 400 401
	/* For handling of maintenance mode. */
	int maintenance_mode;
	int maintenance_mode_enable;
	int auto_maintenance_timeout;
	spinlock_t maintenance_mode_lock; /* Used in a timer... */

402 403 404 405 406 407
	/*
	 * 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.
	 */
408
	void (*null_user_handler)(ipmi_smi_t intf, struct ipmi_recv_msg *msg);
L
Linus Torvalds 已提交
409

410 411 412 413
	/*
	 * When we are scanning the channels for an SMI, this will
	 * tell which channel we are scanning.
	 */
L
Linus Torvalds 已提交
414 415 416 417 418 419 420 421 422
	int curr_channel;

	/* Channel information */
	struct ipmi_channel channels[IPMI_MAX_CHANNELS];

	/* Proc FS stuff. */
	struct proc_dir_entry *proc_dir;
	char                  proc_dir_name[10];

423
	atomic_t stats[IPMI_NUM_STATS];
424 425 426 427 428 429 430

	/*
	 * 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 已提交
431
};
432
#define to_si_intf_from_dev(device) container_of(device, struct ipmi_smi, dev)
L
Linus Torvalds 已提交
433

434 435 436
/**
 * The driver model view of the IPMI messaging driver.
 */
437 438 439 440 441
static struct platform_driver ipmidriver = {
	.driver = {
		.name = "ipmi",
		.bus = &platform_bus_type
	}
442 443 444
};
static DEFINE_MUTEX(ipmidriver_mutex);

445
static LIST_HEAD(ipmi_interfaces);
446
static DEFINE_MUTEX(ipmi_interfaces_mutex);
L
Linus Torvalds 已提交
447

448 449 450
/*
 * List of watchers that want to know when smi's are added and deleted.
 */
451
static LIST_HEAD(smi_watchers);
452
static DEFINE_MUTEX(smi_watchers_mutex);
L
Linus Torvalds 已提交
453

454

455 456 457 458 459
#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]))

460 461 462 463 464 465 466 467 468 469 470 471 472 473
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;
}
474

475 476 477 478 479 480 481 482 483 484
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);
	}
}

485 486 487 488 489 490 491 492 493 494
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);
	}
}

495 496 497 498 499 500
static void clean_up_interface_data(ipmi_smi_t intf)
{
	int              i;
	struct cmd_rcvr  *rcvr, *rcvr2;
	struct list_head list;

501 502
	tasklet_kill(&intf->recv_tasklet);

503
	free_smi_msg_list(&intf->waiting_msgs);
504 505
	free_recv_msg_list(&intf->waiting_events);

506 507 508 509
	/*
	 * Wholesale remove all the entries from the list in the
	 * interface and wait for RCU to know that none are in use.
	 */
510
	mutex_lock(&intf->cmd_rcvrs_mutex);
511 512
	INIT_LIST_HEAD(&list);
	list_splice_init_rcu(&intf->cmd_rcvrs, &list, synchronize_rcu);
513
	mutex_unlock(&intf->cmd_rcvrs_mutex);
514 515 516 517 518 519

	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)
520
					&& (intf->seq_table[i].recv_msg))
521 522 523 524 525 526 527 528 529 530 531 532
			ipmi_free_recv_msg(intf->seq_table[i].recv_msg);
	}
}

static void intf_free(struct kref *ref)
{
	ipmi_smi_t intf = container_of(ref, struct ipmi_smi, refcount);

	clean_up_interface_data(intf);
	kfree(intf);
}

533
struct watcher_entry {
534 535
	int              intf_num;
	ipmi_smi_t       intf;
536 537 538
	struct list_head link;
};

L
Linus Torvalds 已提交
539 540
int ipmi_smi_watcher_register(struct ipmi_smi_watcher *watcher)
{
541
	ipmi_smi_t intf;
542
	LIST_HEAD(to_deliver);
543 544
	struct watcher_entry *e, *e2;

545 546
	mutex_lock(&smi_watchers_mutex);

547 548
	mutex_lock(&ipmi_interfaces_mutex);

549
	/* Build a list of things to deliver. */
550
	list_for_each_entry(intf, &ipmi_interfaces, link) {
551 552 553 554 555
		if (intf->intf_num == -1)
			continue;
		e = kmalloc(sizeof(*e), GFP_KERNEL);
		if (!e)
			goto out_err;
556 557
		kref_get(&intf->refcount);
		e->intf = intf;
558 559 560
		e->intf_num = intf->intf_num;
		list_add_tail(&e->link, &to_deliver);
	}
L
Linus Torvalds 已提交
561

562 563
	/* We will succeed, so add it to the list. */
	list_add(&watcher->link, &smi_watchers);
564 565 566 567 568

	mutex_unlock(&ipmi_interfaces_mutex);

	list_for_each_entry_safe(e, e2, &to_deliver, link) {
		list_del(&e->link);
569 570
		watcher->new_smi(e->intf_num, e->intf->si_dev);
		kref_put(&e->intf->refcount, intf_free);
571
		kfree(e);
L
Linus Torvalds 已提交
572
	}
573

574
	mutex_unlock(&smi_watchers_mutex);
575

L
Linus Torvalds 已提交
576
	return 0;
577 578

 out_err:
579 580
	mutex_unlock(&ipmi_interfaces_mutex);
	mutex_unlock(&smi_watchers_mutex);
581 582
	list_for_each_entry_safe(e, e2, &to_deliver, link) {
		list_del(&e->link);
583
		kref_put(&e->intf->refcount, intf_free);
584 585 586
		kfree(e);
	}
	return -ENOMEM;
L
Linus Torvalds 已提交
587
}
588
EXPORT_SYMBOL(ipmi_smi_watcher_register);
L
Linus Torvalds 已提交
589 590 591

int ipmi_smi_watcher_unregister(struct ipmi_smi_watcher *watcher)
{
592
	mutex_lock(&smi_watchers_mutex);
L
Linus Torvalds 已提交
593
	list_del(&(watcher->link));
594
	mutex_unlock(&smi_watchers_mutex);
L
Linus Torvalds 已提交
595 596
	return 0;
}
597
EXPORT_SYMBOL(ipmi_smi_watcher_unregister);
L
Linus Torvalds 已提交
598

599 600 601
/*
 * Must be called with smi_watchers_mutex held.
 */
L
Linus Torvalds 已提交
602
static void
603
call_smi_watchers(int i, struct device *dev)
L
Linus Torvalds 已提交
604 605 606 607 608
{
	struct ipmi_smi_watcher *w;

	list_for_each_entry(w, &smi_watchers, link) {
		if (try_module_get(w->owner)) {
609
			w->new_smi(i, dev);
L
Linus Torvalds 已提交
610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631
			module_put(w->owner);
		}
	}
}

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

632
	if (is_ipmb_addr(addr1) || is_ipmb_bcast_addr(addr1)) {
L
Linus Torvalds 已提交
633 634 635 636 637 638 639 640 641
		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));
	}

642
	if (is_lan_addr(addr1)) {
L
Linus Torvalds 已提交
643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659
		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)
{
660
	if (len < sizeof(struct ipmi_system_interface_addr))
L
Linus Torvalds 已提交
661 662 663 664 665 666 667 668 669
		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)
670
	    || (addr->channel >= IPMI_MAX_CHANNELS)
L
Linus Torvalds 已提交
671 672 673
	    || (addr->channel < 0))
		return -EINVAL;

674
	if (is_ipmb_addr(addr) || is_ipmb_bcast_addr(addr)) {
675
		if (len < sizeof(struct ipmi_ipmb_addr))
L
Linus Torvalds 已提交
676 677 678 679
			return -EINVAL;
		return 0;
	}

680
	if (is_lan_addr(addr)) {
681
		if (len < sizeof(struct ipmi_lan_addr))
L
Linus Torvalds 已提交
682 683 684 685 686 687
			return -EINVAL;
		return 0;
	}

	return -EINVAL;
}
688
EXPORT_SYMBOL(ipmi_validate_addr);
L
Linus Torvalds 已提交
689 690 691 692 693 694 695

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)
696
			|| (addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE))
L
Linus Torvalds 已提交
697 698 699 700 701 702 703
		return sizeof(struct ipmi_ipmb_addr);

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

	return 0;
}
704
EXPORT_SYMBOL(ipmi_addr_length);
L
Linus Torvalds 已提交
705 706 707

static void deliver_response(struct ipmi_recv_msg *msg)
{
708
	if (!msg->user) {
709 710 711 712 713
		ipmi_smi_t    intf = msg->user_msg_data;

		/* Special handling for NULL users. */
		if (intf->null_user_handler) {
			intf->null_user_handler(intf, msg);
714
			ipmi_inc_stat(intf, handled_local_responses);
715 716
		} else {
			/* No handler, so give up. */
717
			ipmi_inc_stat(intf, unhandled_local_responses);
718 719 720
		}
		ipmi_free_recv_msg(msg);
	} else {
721 722
		ipmi_user_t user = msg->user;
		user->handler->ipmi_recv_hndl(msg, user->handler_data);
723
	}
L
Linus Torvalds 已提交
724 725
}

726 727 728 729 730 731 732 733 734 735 736
static void
deliver_err_response(struct ipmi_recv_msg *msg, int err)
{
	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;
	deliver_response(msg);
}

737 738 739 740 741
/*
 * 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.
 */
L
Linus Torvalds 已提交
742 743 744 745 746 747 748 749 750 751 752
static int intf_next_seq(ipmi_smi_t           intf,
			 struct ipmi_recv_msg *recv_msg,
			 unsigned long        timeout,
			 int                  retries,
			 int                  broadcast,
			 unsigned char        *seq,
			 long                 *seqid)
{
	int          rv = 0;
	unsigned int i;

753 754
	for (i = intf->curr_seq; (i+1)%IPMI_IPMB_NUM_SEQ != intf->curr_seq;
					i = (i+1)%IPMI_IPMB_NUM_SEQ) {
755
		if (!intf->seq_table[i].inuse)
L
Linus Torvalds 已提交
756 757 758
			break;
	}

759
	if (!intf->seq_table[i].inuse) {
L
Linus Torvalds 已提交
760 761
		intf->seq_table[i].recv_msg = recv_msg;

762 763 764 765
		/*
		 * Start with the maximum timeout, when the send response
		 * comes in we will start the real timer.
		 */
L
Linus Torvalds 已提交
766 767 768 769 770 771 772 773 774 775 776 777
		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;
	} else {
		rv = -EAGAIN;
	}
778

L
Linus Torvalds 已提交
779 780 781
	return rv;
}

782 783 784 785 786 787 788
/*
 * 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).
 */
L
Linus Torvalds 已提交
789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806
static int intf_find_seq(ipmi_smi_t           intf,
			 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;

	spin_lock_irqsave(&(intf->seq_lock), flags);
	if (intf->seq_table[seq].inuse) {
		struct ipmi_recv_msg *msg = intf->seq_table[seq].recv_msg;

807 808 809
		if ((msg->addr.channel == channel) && (msg->msg.cmd == cmd)
				&& (msg->msg.netfn == netfn)
				&& (ipmi_addr_equal(addr, &(msg->addr)))) {
L
Linus Torvalds 已提交
810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833
			*recv_msg = msg;
			intf->seq_table[seq].inuse = 0;
			rv = 0;
		}
	}
	spin_unlock_irqrestore(&(intf->seq_lock), flags);

	return rv;
}


/* Start the timer for a specific sequence table entry. */
static int intf_start_seq_timer(ipmi_smi_t intf,
				long       msgid)
{
	int           rv = -ENODEV;
	unsigned long flags;
	unsigned char seq;
	unsigned long seqid;


	GET_SEQ_FROM_MSGID(msgid, seq, seqid);

	spin_lock_irqsave(&(intf->seq_lock), flags);
834 835 836 837
	/*
	 * We do this verification because the user can be deleted
	 * while a message is outstanding.
	 */
L
Linus Torvalds 已提交
838
	if ((intf->seq_table[seq].inuse)
839
				&& (intf->seq_table[seq].seqid == seqid)) {
L
Linus Torvalds 已提交
840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863
		struct seq_table *ent = &(intf->seq_table[seq]);
		ent->timeout = ent->orig_timeout;
		rv = 0;
	}
	spin_unlock_irqrestore(&(intf->seq_lock), flags);

	return rv;
}

/* Got an error for the send message for a specific sequence number. */
static int intf_err_seq(ipmi_smi_t   intf,
			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);

	spin_lock_irqsave(&(intf->seq_lock), flags);
864 865 866 867
	/*
	 * We do this verification because the user can be deleted
	 * while a message is outstanding.
	 */
L
Linus Torvalds 已提交
868
	if ((intf->seq_table[seq].inuse)
869
				&& (intf->seq_table[seq].seqid == seqid)) {
L
Linus Torvalds 已提交
870 871 872 873 874 875 876 877
		struct seq_table *ent = &(intf->seq_table[seq]);

		ent->inuse = 0;
		msg = ent->recv_msg;
		rv = 0;
	}
	spin_unlock_irqrestore(&(intf->seq_lock), flags);

878 879
	if (msg)
		deliver_err_response(msg, err);
L
Linus Torvalds 已提交
880 881 882 883 884 885 886 887 888 889 890 891 892 893 894

	return rv;
}


int ipmi_create_user(unsigned int          if_num,
		     struct ipmi_user_hndl *handler,
		     void                  *handler_data,
		     ipmi_user_t           *user)
{
	unsigned long flags;
	ipmi_user_t   new_user;
	int           rv = 0;
	ipmi_smi_t    intf;

895 896 897 898 899 900 901
	/*
	 * 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 已提交
902 903 904 905

	if (handler == NULL)
		return -EINVAL;

906 907 908 909
	/*
	 * Make sure the driver is actually initialized, this handles
	 * problems with initialization order.
	 */
L
Linus Torvalds 已提交
910 911 912 913 914
	if (!initialized) {
		rv = ipmi_init_msghandler();
		if (rv)
			return rv;

915 916 917 918
		/*
		 * The init code doesn't return an error if it was turned
		 * off, but it won't initialize.  Check that.
		 */
L
Linus Torvalds 已提交
919 920 921 922 923
		if (!initialized)
			return -ENODEV;
	}

	new_user = kmalloc(sizeof(*new_user), GFP_KERNEL);
924
	if (!new_user)
L
Linus Torvalds 已提交
925 926
		return -ENOMEM;

927
	mutex_lock(&ipmi_interfaces_mutex);
928 929 930
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
		if (intf->intf_num == if_num)
			goto found;
L
Linus Torvalds 已提交
931
	}
932
	/* Not found, return an error */
933 934
	rv = -EINVAL;
	goto out_kfree;
L
Linus Torvalds 已提交
935

936
 found:
937 938
	/* Note that each existing user holds a refcount to the interface. */
	kref_get(&intf->refcount);
L
Linus Torvalds 已提交
939

940
	kref_init(&new_user->refcount);
L
Linus Torvalds 已提交
941 942 943 944 945 946 947
	new_user->handler = handler;
	new_user->handler_data = handler_data;
	new_user->intf = intf;
	new_user->gets_events = 0;

	if (!try_module_get(intf->handlers->owner)) {
		rv = -ENODEV;
948
		goto out_kref;
L
Linus Torvalds 已提交
949 950 951 952 953 954
	}

	if (intf->handlers->inc_usecount) {
		rv = intf->handlers->inc_usecount(intf->send_info);
		if (rv) {
			module_put(intf->handlers->owner);
955
			goto out_kref;
L
Linus Torvalds 已提交
956 957 958
		}
	}

959 960 961 962
	/*
	 * Hold the lock so intf->handlers is guaranteed to be good
	 * until now
	 */
963 964
	mutex_unlock(&ipmi_interfaces_mutex);

965 966 967 968 969 970
	new_user->valid = 1;
	spin_lock_irqsave(&intf->seq_lock, flags);
	list_add_rcu(&new_user->link, &intf->users);
	spin_unlock_irqrestore(&intf->seq_lock, flags);
	*user = new_user;
	return 0;
L
Linus Torvalds 已提交
971

972
out_kref:
973
	kref_put(&intf->refcount, intf_free);
974
out_kfree:
975
	mutex_unlock(&ipmi_interfaces_mutex);
976
	kfree(new_user);
L
Linus Torvalds 已提交
977 978
	return rv;
}
979
EXPORT_SYMBOL(ipmi_create_user);
L
Linus Torvalds 已提交
980

981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007
int ipmi_get_smi_info(int if_num, struct ipmi_smi_info *data)
{
	int           rv = 0;
	ipmi_smi_t    intf;
	struct ipmi_smi_handlers *handlers;

	mutex_lock(&ipmi_interfaces_mutex);
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
		if (intf->intf_num == if_num)
			goto found;
	}
	/* Not found, return an error */
	rv = -EINVAL;
	mutex_unlock(&ipmi_interfaces_mutex);
	return rv;

found:
	handlers = intf->handlers;
	rv = -ENOSYS;
	if (handlers->get_smi_info)
		rv = handlers->get_smi_info(intf->send_info, data);
	mutex_unlock(&ipmi_interfaces_mutex);

	return rv;
}
EXPORT_SYMBOL(ipmi_get_smi_info);

1008 1009 1010 1011 1012 1013 1014
static void free_user(struct kref *ref)
{
	ipmi_user_t user = container_of(ref, struct ipmi_user, refcount);
	kfree(user);
}

int ipmi_destroy_user(ipmi_user_t user)
L
Linus Torvalds 已提交
1015
{
1016
	ipmi_smi_t       intf = user->intf;
L
Linus Torvalds 已提交
1017 1018
	int              i;
	unsigned long    flags;
1019 1020
	struct cmd_rcvr  *rcvr;
	struct cmd_rcvr  *rcvrs = NULL;
L
Linus Torvalds 已提交
1021

1022
	user->valid = 0;
L
Linus Torvalds 已提交
1023

1024 1025 1026
	/* Remove the user from the interface's sequence table. */
	spin_lock_irqsave(&intf->seq_lock, flags);
	list_del_rcu(&user->link);
L
Linus Torvalds 已提交
1027

C
Corey Minyard 已提交
1028
	for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++) {
1029
		if (intf->seq_table[i].inuse
1030
		    && (intf->seq_table[i].recv_msg->user == user)) {
1031
			intf->seq_table[i].inuse = 0;
1032
			ipmi_free_recv_msg(intf->seq_table[i].recv_msg);
L
Linus Torvalds 已提交
1033 1034
		}
	}
1035 1036 1037 1038 1039 1040 1041 1042
	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
	 * synchronize_rcu()) then free everything in that list.
	 */
1043
	mutex_lock(&intf->cmd_rcvrs_mutex);
1044
	list_for_each_entry_rcu(rcvr, &intf->cmd_rcvrs, link) {
L
Linus Torvalds 已提交
1045
		if (rcvr->user == user) {
1046 1047 1048
			list_del_rcu(&rcvr->link);
			rcvr->next = rcvrs;
			rcvrs = rcvr;
L
Linus Torvalds 已提交
1049 1050
		}
	}
1051
	mutex_unlock(&intf->cmd_rcvrs_mutex);
1052 1053 1054 1055 1056 1057
	synchronize_rcu();
	while (rcvrs) {
		rcvr = rcvrs;
		rcvrs = rcvr->next;
		kfree(rcvr);
	}
L
Linus Torvalds 已提交
1058

1059 1060 1061 1062 1063 1064 1065
	mutex_lock(&ipmi_interfaces_mutex);
	if (intf->handlers) {
		module_put(intf->handlers->owner);
		if (intf->handlers->dec_usecount)
			intf->handlers->dec_usecount(intf->send_info);
	}
	mutex_unlock(&ipmi_interfaces_mutex);
L
Linus Torvalds 已提交
1066

1067
	kref_put(&intf->refcount, intf_free);
L
Linus Torvalds 已提交
1068

1069
	kref_put(&user->refcount, free_user);
L
Linus Torvalds 已提交
1070

1071
	return 0;
L
Linus Torvalds 已提交
1072
}
1073
EXPORT_SYMBOL(ipmi_destroy_user);
L
Linus Torvalds 已提交
1074 1075 1076 1077 1078

void ipmi_get_version(ipmi_user_t   user,
		      unsigned char *major,
		      unsigned char *minor)
{
1079 1080
	*major = user->intf->ipmi_version_major;
	*minor = user->intf->ipmi_version_minor;
L
Linus Torvalds 已提交
1081
}
1082
EXPORT_SYMBOL(ipmi_get_version);
L
Linus Torvalds 已提交
1083

1084 1085 1086
int ipmi_set_my_address(ipmi_user_t   user,
			unsigned int  channel,
			unsigned char address)
L
Linus Torvalds 已提交
1087
{
1088 1089 1090 1091
	if (channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
	user->intf->channels[channel].address = address;
	return 0;
L
Linus Torvalds 已提交
1092
}
1093
EXPORT_SYMBOL(ipmi_set_my_address);
L
Linus Torvalds 已提交
1094

1095 1096 1097
int ipmi_get_my_address(ipmi_user_t   user,
			unsigned int  channel,
			unsigned char *address)
L
Linus Torvalds 已提交
1098
{
1099 1100 1101 1102
	if (channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
	*address = user->intf->channels[channel].address;
	return 0;
L
Linus Torvalds 已提交
1103
}
1104
EXPORT_SYMBOL(ipmi_get_my_address);
L
Linus Torvalds 已提交
1105

1106 1107 1108
int ipmi_set_my_LUN(ipmi_user_t   user,
		    unsigned int  channel,
		    unsigned char LUN)
L
Linus Torvalds 已提交
1109
{
1110 1111 1112 1113
	if (channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
	user->intf->channels[channel].lun = LUN & 0x3;
	return 0;
L
Linus Torvalds 已提交
1114
}
1115
EXPORT_SYMBOL(ipmi_set_my_LUN);
L
Linus Torvalds 已提交
1116

1117 1118 1119
int ipmi_get_my_LUN(ipmi_user_t   user,
		    unsigned int  channel,
		    unsigned char *address)
L
Linus Torvalds 已提交
1120
{
1121 1122 1123 1124
	if (channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
	*address = user->intf->channels[channel].lun;
	return 0;
L
Linus Torvalds 已提交
1125
}
1126
EXPORT_SYMBOL(ipmi_get_my_LUN);
L
Linus Torvalds 已提交
1127

C
Corey Minyard 已提交
1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186
int ipmi_get_maintenance_mode(ipmi_user_t user)
{
	int           mode;
	unsigned long flags;

	spin_lock_irqsave(&user->intf->maintenance_mode_lock, flags);
	mode = user->intf->maintenance_mode;
	spin_unlock_irqrestore(&user->intf->maintenance_mode_lock, flags);

	return mode;
}
EXPORT_SYMBOL(ipmi_get_maintenance_mode);

static void maintenance_mode_update(ipmi_smi_t intf)
{
	if (intf->handlers->set_maintenance_mode)
		intf->handlers->set_maintenance_mode(
			intf->send_info, intf->maintenance_mode_enable);
}

int ipmi_set_maintenance_mode(ipmi_user_t user, int mode)
{
	int           rv = 0;
	unsigned long flags;
	ipmi_smi_t    intf = user->intf;

	spin_lock_irqsave(&intf->maintenance_mode_lock, flags);
	if (intf->maintenance_mode != mode) {
		switch (mode) {
		case IPMI_MAINTENANCE_MODE_AUTO:
			intf->maintenance_mode = mode;
			intf->maintenance_mode_enable
				= (intf->auto_maintenance_timeout > 0);
			break;

		case IPMI_MAINTENANCE_MODE_OFF:
			intf->maintenance_mode = mode;
			intf->maintenance_mode_enable = 0;
			break;

		case IPMI_MAINTENANCE_MODE_ON:
			intf->maintenance_mode = mode;
			intf->maintenance_mode_enable = 1;
			break;

		default:
			rv = -EINVAL;
			goto out_unlock;
		}

		maintenance_mode_update(intf);
	}
 out_unlock:
	spin_unlock_irqrestore(&intf->maintenance_mode_lock, flags);

	return rv;
}
EXPORT_SYMBOL(ipmi_set_maintenance_mode);

L
Linus Torvalds 已提交
1187 1188
int ipmi_set_gets_events(ipmi_user_t user, int val)
{
1189 1190 1191 1192
	unsigned long        flags;
	ipmi_smi_t           intf = user->intf;
	struct ipmi_recv_msg *msg, *msg2;
	struct list_head     msgs;
L
Linus Torvalds 已提交
1193

1194 1195 1196
	INIT_LIST_HEAD(&msgs);

	spin_lock_irqsave(&intf->events_lock, flags);
L
Linus Torvalds 已提交
1197 1198
	user->gets_events = val;

1199 1200 1201 1202 1203 1204 1205 1206 1207
	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 已提交
1208 1209
		list_for_each_entry_safe(msg, msg2, &intf->waiting_events, link)
			list_move_tail(&msg->link, &msgs);
1210
		intf->waiting_events_count = 0;
1211 1212 1213 1214 1215
		if (intf->event_msg_printed) {
			printk(KERN_WARNING PFX "Event queue no longer"
			       " full\n");
			intf->event_msg_printed = 0;
		}
1216

1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227
		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);
			deliver_response(msg);
		}

		spin_lock_irqsave(&intf->events_lock, flags);
		intf->delivering_events = 0;
1228 1229
	}

1230
 out:
1231
	spin_unlock_irqrestore(&intf->events_lock, flags);
L
Linus Torvalds 已提交
1232 1233 1234

	return 0;
}
1235
EXPORT_SYMBOL(ipmi_set_gets_events);
L
Linus Torvalds 已提交
1236

1237 1238
static struct cmd_rcvr *find_cmd_rcvr(ipmi_smi_t    intf,
				      unsigned char netfn,
1239 1240
				      unsigned char cmd,
				      unsigned char chan)
1241 1242 1243 1244
{
	struct cmd_rcvr *rcvr;

	list_for_each_entry_rcu(rcvr, &intf->cmd_rcvrs, link) {
1245 1246
		if ((rcvr->netfn == netfn) && (rcvr->cmd == cmd)
					&& (rcvr->chans & (1 << chan)))
1247 1248 1249 1250 1251
			return rcvr;
	}
	return NULL;
}

1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266
static int is_cmd_rcvr_exclusive(ipmi_smi_t    intf,
				 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;
}

L
Linus Torvalds 已提交
1267 1268
int ipmi_register_for_cmd(ipmi_user_t   user,
			  unsigned char netfn,
1269 1270
			  unsigned char cmd,
			  unsigned int  chans)
L
Linus Torvalds 已提交
1271
{
1272 1273 1274
	ipmi_smi_t      intf = user->intf;
	struct cmd_rcvr *rcvr;
	int             rv = 0;
L
Linus Torvalds 已提交
1275 1276 1277


	rcvr = kmalloc(sizeof(*rcvr), GFP_KERNEL);
1278
	if (!rcvr)
L
Linus Torvalds 已提交
1279
		return -ENOMEM;
1280 1281
	rcvr->cmd = cmd;
	rcvr->netfn = netfn;
1282
	rcvr->chans = chans;
1283
	rcvr->user = user;
L
Linus Torvalds 已提交
1284

1285
	mutex_lock(&intf->cmd_rcvrs_mutex);
L
Linus Torvalds 已提交
1286
	/* Make sure the command/netfn is not already registered. */
1287
	if (!is_cmd_rcvr_exclusive(intf, netfn, cmd, chans)) {
1288 1289
		rv = -EBUSY;
		goto out_unlock;
L
Linus Torvalds 已提交
1290
	}
1291

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

1294
 out_unlock:
1295
	mutex_unlock(&intf->cmd_rcvrs_mutex);
L
Linus Torvalds 已提交
1296 1297 1298 1299 1300
	if (rv)
		kfree(rcvr);

	return rv;
}
1301
EXPORT_SYMBOL(ipmi_register_for_cmd);
L
Linus Torvalds 已提交
1302 1303 1304

int ipmi_unregister_for_cmd(ipmi_user_t   user,
			    unsigned char netfn,
1305 1306
			    unsigned char cmd,
			    unsigned int  chans)
L
Linus Torvalds 已提交
1307
{
1308 1309
	ipmi_smi_t      intf = user->intf;
	struct cmd_rcvr *rcvr;
1310 1311
	struct cmd_rcvr *rcvrs = NULL;
	int i, rv = -ENOENT;
L
Linus Torvalds 已提交
1312

1313
	mutex_lock(&intf->cmd_rcvrs_mutex);
1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334
	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();
	while (rcvrs) {
		rcvr = rcvrs;
		rcvrs = rcvr->next;
1335
		kfree(rcvr);
L
Linus Torvalds 已提交
1336
	}
1337
	return rv;
L
Linus Torvalds 已提交
1338
}
1339
EXPORT_SYMBOL(ipmi_unregister_for_cmd);
L
Linus Torvalds 已提交
1340 1341 1342 1343 1344

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

L
Linus Torvalds 已提交
1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386
	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);
	smi_msg->data[i+5] = ipmb_checksum(&(smi_msg->data[i+3]), 2);
	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)
		memcpy(&(smi_msg->data[i+9]), msg->data,
		       msg->data_len);
	smi_msg->data_size = msg->data_len + 9;

	/* Now calculate the checksum and tack it on. */
	smi_msg->data[i+smi_msg->data_size]
		= ipmb_checksum(&(smi_msg->data[i+6]),
				smi_msg->data_size-6);

1387 1388 1389 1390
	/*
	 * Add on the checksum size and the offset from the
	 * broadcast.
	 */
L
Linus Torvalds 已提交
1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425
	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);
	smi_msg->data[6] = ipmb_checksum(&(smi_msg->data[4]), 2);
	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)
		memcpy(&(smi_msg->data[10]), msg->data,
		       msg->data_len);
	smi_msg->data_size = msg->data_len + 10;

	/* Now calculate the checksum and tack it on. */
	smi_msg->data[smi_msg->data_size]
		= ipmb_checksum(&(smi_msg->data[7]),
				smi_msg->data_size-7);

1426 1427 1428 1429
	/*
	 * Add on the checksum size and the offset from the
	 * broadcast.
	 */
L
Linus Torvalds 已提交
1430 1431 1432 1433 1434
	smi_msg->data_size += 1;

	smi_msg->msgid = msgid;
}

1435 1436 1437 1438 1439 1440
/*
 * 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.
 */
1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453
static int i_ipmi_request(ipmi_user_t          user,
			  ipmi_smi_t           intf,
			  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 已提交
1454
{
1455 1456 1457 1458 1459
	int                      rv = 0;
	struct ipmi_smi_msg      *smi_msg;
	struct ipmi_recv_msg     *recv_msg;
	unsigned long            flags;
	struct ipmi_smi_handlers *handlers;
L
Linus Torvalds 已提交
1460 1461


1462
	if (supplied_recv)
L
Linus Torvalds 已提交
1463
		recv_msg = supplied_recv;
1464
	else {
L
Linus Torvalds 已提交
1465
		recv_msg = ipmi_alloc_recv_msg();
1466
		if (recv_msg == NULL)
L
Linus Torvalds 已提交
1467 1468 1469 1470
			return -ENOMEM;
	}
	recv_msg->user_msg_data = user_msg_data;

1471
	if (supplied_smi)
L
Linus Torvalds 已提交
1472
		smi_msg = (struct ipmi_smi_msg *) supplied_smi;
1473
	else {
L
Linus Torvalds 已提交
1474 1475 1476 1477 1478 1479 1480
		smi_msg = ipmi_alloc_smi_msg();
		if (smi_msg == NULL) {
			ipmi_free_recv_msg(recv_msg);
			return -ENOMEM;
		}
	}

1481 1482 1483 1484 1485 1486 1487
	rcu_read_lock();
	handlers = intf->handlers;
	if (!handlers) {
		rv = -ENODEV;
		goto out_err;
	}

L
Linus Torvalds 已提交
1488
	recv_msg->user = user;
1489 1490
	if (user)
		kref_get(&user->refcount);
L
Linus Torvalds 已提交
1491
	recv_msg->msgid = msgid;
1492 1493 1494 1495
	/*
	 * Store the message to send in the receive message so timeout
	 * responses can get the proper response data.
	 */
L
Linus Torvalds 已提交
1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508
	recv_msg->msg = *msg;

	if (addr->addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE) {
		struct ipmi_system_interface_addr *smi_addr;

		if (msg->netfn & 1) {
			/* Responses are not allowed to the SMI. */
			rv = -EINVAL;
			goto out_err;
		}

		smi_addr = (struct ipmi_system_interface_addr *) addr;
		if (smi_addr->lun > 3) {
1509
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1510 1511 1512 1513 1514 1515 1516 1517 1518
			rv = -EINVAL;
			goto out_err;
		}

		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)
1519 1520 1521 1522 1523
			|| (msg->cmd == IPMI_READ_EVENT_MSG_BUFFER_CMD))) {
			/*
			 * We don't let the user do these, since we manage
			 * the sequence numbers.
			 */
1524
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1525 1526 1527 1528
			rv = -EINVAL;
			goto out_err;
		}

C
Corey Minyard 已提交
1529 1530 1531
		if (((msg->netfn == IPMI_NETFN_APP_REQUEST)
		      && ((msg->cmd == IPMI_COLD_RESET_CMD)
			  || (msg->cmd == IPMI_WARM_RESET_CMD)))
1532
		     || (msg->netfn == IPMI_NETFN_FIRMWARE_REQUEST)) {
C
Corey Minyard 已提交
1533 1534 1535 1536
			spin_lock_irqsave(&intf->maintenance_mode_lock, flags);
			intf->auto_maintenance_timeout
				= IPMI_MAINTENANCE_MODE_TIMEOUT;
			if (!intf->maintenance_mode
1537
			    && !intf->maintenance_mode_enable) {
C
Corey Minyard 已提交
1538 1539 1540 1541 1542 1543 1544
				intf->maintenance_mode_enable = 1;
				maintenance_mode_update(intf);
			}
			spin_unlock_irqrestore(&intf->maintenance_mode_lock,
					       flags);
		}

L
Linus Torvalds 已提交
1545
		if ((msg->data_len + 2) > IPMI_MAX_MSG_LENGTH) {
1546
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557
			rv = -EMSGSIZE;
			goto out_err;
		}

		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;
1558
		ipmi_inc_stat(intf, sent_local_commands);
1559
	} else if (is_ipmb_addr(addr) || is_ipmb_bcast_addr(addr)) {
L
Linus Torvalds 已提交
1560 1561 1562 1563 1564
		struct ipmi_ipmb_addr *ipmb_addr;
		unsigned char         ipmb_seq;
		long                  seqid;
		int                   broadcast = 0;

1565
		if (addr->channel >= IPMI_MAX_CHANNELS) {
1566
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1567 1568 1569 1570 1571
			rv = -EINVAL;
			goto out_err;
		}

		if (intf->channels[addr->channel].medium
1572
					!= IPMI_CHANNEL_MEDIUM_IPMB) {
1573
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584
			rv = -EINVAL;
			goto out_err;
		}

		if (retries < 0) {
		    if (addr->addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE)
			retries = 0; /* Don't retry broadcasts. */
		    else
			retries = 4;
		}
		if (addr->addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE) {
1585 1586 1587 1588 1589
		    /*
		     * Broadcasts add a zero at the beginning of the
		     * message, but otherwise is the same as an IPMB
		     * address.
		     */
L
Linus Torvalds 已提交
1590 1591 1592 1593 1594 1595 1596 1597 1598
		    addr->addr_type = IPMI_IPMB_ADDR_TYPE;
		    broadcast = 1;
		}


		/* Default to 1 second retries. */
		if (retry_time_ms == 0)
		    retry_time_ms = 1000;

1599 1600 1601 1602
		/*
		 * 9 for the header and 1 for the checksum, plus
		 * possibly one for the broadcast.
		 */
L
Linus Torvalds 已提交
1603
		if ((msg->data_len + 10 + broadcast) > IPMI_MAX_MSG_LENGTH) {
1604
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1605 1606 1607 1608 1609 1610
			rv = -EMSGSIZE;
			goto out_err;
		}

		ipmb_addr = (struct ipmi_ipmb_addr *) addr;
		if (ipmb_addr->lun > 3) {
1611
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1612 1613 1614 1615 1616 1617 1618
			rv = -EINVAL;
			goto out_err;
		}

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

		if (recv_msg->msg.netfn & 0x1) {
1619 1620 1621 1622
			/*
			 * It's a response, so use the user's sequence
			 * from msgid.
			 */
1623
			ipmi_inc_stat(intf, sent_ipmb_responses);
L
Linus Torvalds 已提交
1624 1625 1626 1627
			format_ipmb_msg(smi_msg, msg, ipmb_addr, msgid,
					msgid, broadcast,
					source_address, source_lun);

1628 1629 1630 1631
			/*
			 * Save the receive message so we can use it
			 * to deliver the response.
			 */
L
Linus Torvalds 已提交
1632 1633 1634 1635 1636 1637
			smi_msg->user_data = recv_msg;
		} else {
			/* It's a command, so get a sequence for it. */

			spin_lock_irqsave(&(intf->seq_lock), flags);

1638 1639 1640 1641
			/*
			 * Create a sequence number with a 1 second
			 * timeout and 4 retries.
			 */
L
Linus Torvalds 已提交
1642 1643 1644 1645 1646 1647 1648 1649
			rv = intf_next_seq(intf,
					   recv_msg,
					   retry_time_ms,
					   retries,
					   broadcast,
					   &ipmb_seq,
					   &seqid);
			if (rv) {
1650 1651 1652 1653
				/*
				 * We have used up all the sequence numbers,
				 * probably, so abort.
				 */
L
Linus Torvalds 已提交
1654 1655 1656 1657 1658
				spin_unlock_irqrestore(&(intf->seq_lock),
						       flags);
				goto out_err;
			}

1659 1660
			ipmi_inc_stat(intf, sent_ipmb_commands);

1661 1662 1663 1664 1665
			/*
			 * Store the sequence number in the message,
			 * so that when the send message response
			 * comes back we can start the timer.
			 */
L
Linus Torvalds 已提交
1666 1667 1668 1669 1670
			format_ipmb_msg(smi_msg, msg, ipmb_addr,
					STORE_SEQ_IN_MSGID(ipmb_seq, seqid),
					ipmb_seq, broadcast,
					source_address, source_lun);

1671 1672 1673 1674
			/*
			 * Copy the message into the recv message data, so we
			 * can retransmit it later if necessary.
			 */
L
Linus Torvalds 已提交
1675 1676 1677 1678 1679
			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;

1680 1681 1682 1683 1684 1685 1686 1687
			/*
			 * 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.
			 */
L
Linus Torvalds 已提交
1688 1689
			spin_unlock_irqrestore(&(intf->seq_lock), flags);
		}
1690
	} else if (is_lan_addr(addr)) {
L
Linus Torvalds 已提交
1691 1692 1693 1694
		struct ipmi_lan_addr  *lan_addr;
		unsigned char         ipmb_seq;
		long                  seqid;

1695
		if (addr->channel >= IPMI_MAX_CHANNELS) {
1696
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1697 1698 1699 1700 1701
			rv = -EINVAL;
			goto out_err;
		}

		if ((intf->channels[addr->channel].medium
1702
				!= IPMI_CHANNEL_MEDIUM_8023LAN)
L
Linus Torvalds 已提交
1703
		    && (intf->channels[addr->channel].medium
1704
				!= IPMI_CHANNEL_MEDIUM_ASYNC)) {
1705
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717
			rv = -EINVAL;
			goto out_err;
		}

		retries = 4;

		/* Default to 1 second retries. */
		if (retry_time_ms == 0)
		    retry_time_ms = 1000;

		/* 11 for the header and 1 for the checksum. */
		if ((msg->data_len + 12) > IPMI_MAX_MSG_LENGTH) {
1718
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1719 1720 1721 1722 1723 1724
			rv = -EMSGSIZE;
			goto out_err;
		}

		lan_addr = (struct ipmi_lan_addr *) addr;
		if (lan_addr->lun > 3) {
1725
			ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1726 1727 1728 1729 1730 1731 1732
			rv = -EINVAL;
			goto out_err;
		}

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

		if (recv_msg->msg.netfn & 0x1) {
1733 1734 1735 1736
			/*
			 * It's a response, so use the user's sequence
			 * from msgid.
			 */
1737
			ipmi_inc_stat(intf, sent_lan_responses);
L
Linus Torvalds 已提交
1738 1739 1740
			format_lan_msg(smi_msg, msg, lan_addr, msgid,
				       msgid, source_lun);

1741 1742 1743 1744
			/*
			 * Save the receive message so we can use it
			 * to deliver the response.
			 */
L
Linus Torvalds 已提交
1745 1746 1747 1748 1749 1750
			smi_msg->user_data = recv_msg;
		} else {
			/* It's a command, so get a sequence for it. */

			spin_lock_irqsave(&(intf->seq_lock), flags);

1751 1752 1753 1754
			/*
			 * Create a sequence number with a 1 second
			 * timeout and 4 retries.
			 */
L
Linus Torvalds 已提交
1755 1756 1757 1758 1759 1760 1761 1762
			rv = intf_next_seq(intf,
					   recv_msg,
					   retry_time_ms,
					   retries,
					   0,
					   &ipmb_seq,
					   &seqid);
			if (rv) {
1763 1764 1765 1766
				/*
				 * We have used up all the sequence numbers,
				 * probably, so abort.
				 */
L
Linus Torvalds 已提交
1767 1768 1769 1770 1771
				spin_unlock_irqrestore(&(intf->seq_lock),
						       flags);
				goto out_err;
			}

1772 1773
			ipmi_inc_stat(intf, sent_lan_commands);

1774 1775 1776 1777 1778
			/*
			 * Store the sequence number in the message,
			 * so that when the send message response
			 * comes back we can start the timer.
			 */
L
Linus Torvalds 已提交
1779 1780 1781 1782
			format_lan_msg(smi_msg, msg, lan_addr,
				       STORE_SEQ_IN_MSGID(ipmb_seq, seqid),
				       ipmb_seq, source_lun);

1783 1784 1785 1786
			/*
			 * Copy the message into the recv message data, so we
			 * can retransmit it later if necessary.
			 */
L
Linus Torvalds 已提交
1787 1788 1789 1790 1791
			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;

1792 1793 1794 1795 1796 1797 1798 1799
			/*
			 * 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.
			 */
L
Linus Torvalds 已提交
1800 1801 1802 1803
			spin_unlock_irqrestore(&(intf->seq_lock), flags);
		}
	} else {
	    /* Unknown address type. */
1804
		ipmi_inc_stat(intf, sent_invalid_commands);
L
Linus Torvalds 已提交
1805 1806 1807 1808 1809 1810 1811
		rv = -EINVAL;
		goto out_err;
	}

#ifdef DEBUG_MSGING
	{
		int m;
C
Corey Minyard 已提交
1812
		for (m = 0; m < smi_msg->data_size; m++)
L
Linus Torvalds 已提交
1813 1814 1815 1816
			printk(" %2.2x", smi_msg->data[m]);
		printk("\n");
	}
#endif
1817 1818 1819

	handlers->sender(intf->send_info, smi_msg, priority);
	rcu_read_unlock();
L
Linus Torvalds 已提交
1820 1821 1822 1823

	return 0;

 out_err:
1824
	rcu_read_unlock();
L
Linus Torvalds 已提交
1825 1826 1827 1828 1829
	ipmi_free_smi_msg(smi_msg);
	ipmi_free_recv_msg(recv_msg);
	return rv;
}

1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841
static int check_addr(ipmi_smi_t       intf,
		      struct ipmi_addr *addr,
		      unsigned char    *saddr,
		      unsigned char    *lun)
{
	if (addr->channel >= IPMI_MAX_CHANNELS)
		return -EINVAL;
	*lun = intf->channels[addr->channel].lun;
	*saddr = intf->channels[addr->channel].address;
	return 0;
}

L
Linus Torvalds 已提交
1842 1843 1844 1845 1846 1847 1848 1849 1850
int ipmi_request_settime(ipmi_user_t      user,
			 struct ipmi_addr *addr,
			 long             msgid,
			 struct kernel_ipmi_msg  *msg,
			 void             *user_msg_data,
			 int              priority,
			 int              retries,
			 unsigned int     retry_time_ms)
{
1851 1852 1853
	unsigned char saddr, lun;
	int           rv;

1854
	if (!user)
1855
		return -EINVAL;
1856 1857 1858
	rv = check_addr(user->intf, addr, &saddr, &lun);
	if (rv)
		return rv;
L
Linus Torvalds 已提交
1859 1860 1861 1862 1863 1864 1865 1866
	return i_ipmi_request(user,
			      user->intf,
			      addr,
			      msgid,
			      msg,
			      user_msg_data,
			      NULL, NULL,
			      priority,
1867 1868
			      saddr,
			      lun,
L
Linus Torvalds 已提交
1869 1870 1871
			      retries,
			      retry_time_ms);
}
1872
EXPORT_SYMBOL(ipmi_request_settime);
L
Linus Torvalds 已提交
1873 1874 1875 1876 1877 1878 1879 1880 1881 1882

int ipmi_request_supply_msgs(ipmi_user_t          user,
			     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)
{
1883
	unsigned char saddr = 0, lun = 0;
1884 1885
	int           rv;

1886
	if (!user)
1887
		return -EINVAL;
1888 1889 1890
	rv = check_addr(user->intf, addr, &saddr, &lun);
	if (rv)
		return rv;
L
Linus Torvalds 已提交
1891 1892 1893 1894 1895 1896 1897 1898 1899
	return i_ipmi_request(user,
			      user->intf,
			      addr,
			      msgid,
			      msg,
			      user_msg_data,
			      supplied_smi,
			      supplied_recv,
			      priority,
1900 1901
			      saddr,
			      lun,
L
Linus Torvalds 已提交
1902 1903
			      -1, 0);
}
1904
EXPORT_SYMBOL(ipmi_request_supply_msgs);
L
Linus Torvalds 已提交
1905

1906
#ifdef CONFIG_PROC_FS
1907
static int smi_ipmb_proc_show(struct seq_file *m, void *v)
L
Linus Torvalds 已提交
1908
{
1909
	ipmi_smi_t intf = m->private;
1910
	int        i;
L
Linus Torvalds 已提交
1911

1912 1913 1914 1915
	seq_printf(m, "%x", intf->channels[0].address);
	for (i = 1; i < IPMI_MAX_CHANNELS; i++)
		seq_printf(m, " %x", intf->channels[i].address);
	return seq_putc(m, '\n');
L
Linus Torvalds 已提交
1916 1917
}

1918
static int smi_ipmb_proc_open(struct inode *inode, struct file *file)
L
Linus Torvalds 已提交
1919
{
A
Al Viro 已提交
1920
	return single_open(file, smi_ipmb_proc_show, PDE_DATA(inode));
1921
}
L
Linus Torvalds 已提交
1922

1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934
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)
{
	ipmi_smi_t intf = m->private;

	return seq_printf(m, "%u.%u\n",
1935 1936
		       ipmi_version_major(&intf->bmc->id),
		       ipmi_version_minor(&intf->bmc->id));
L
Linus Torvalds 已提交
1937 1938
}

1939
static int smi_version_proc_open(struct inode *inode, struct file *file)
L
Linus Torvalds 已提交
1940
{
A
Al Viro 已提交
1941
	return single_open(file, smi_version_proc_show, PDE_DATA(inode));
1942 1943 1944 1945 1946 1947 1948 1949
}

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

1951 1952 1953 1954 1955
static int smi_stats_proc_show(struct seq_file *m, void *v)
{
	ipmi_smi_t intf = m->private;

	seq_printf(m, "sent_invalid_commands:       %u\n",
1956
		       ipmi_get_stat(intf, sent_invalid_commands));
1957
	seq_printf(m, "sent_local_commands:         %u\n",
1958
		       ipmi_get_stat(intf, sent_local_commands));
1959
	seq_printf(m, "handled_local_responses:     %u\n",
1960
		       ipmi_get_stat(intf, handled_local_responses));
1961
	seq_printf(m, "unhandled_local_responses:   %u\n",
1962
		       ipmi_get_stat(intf, unhandled_local_responses));
1963
	seq_printf(m, "sent_ipmb_commands:          %u\n",
1964
		       ipmi_get_stat(intf, sent_ipmb_commands));
1965
	seq_printf(m, "sent_ipmb_command_errs:      %u\n",
1966
		       ipmi_get_stat(intf, sent_ipmb_command_errs));
1967
	seq_printf(m, "retransmitted_ipmb_commands: %u\n",
1968
		       ipmi_get_stat(intf, retransmitted_ipmb_commands));
1969
	seq_printf(m, "timed_out_ipmb_commands:     %u\n",
1970
		       ipmi_get_stat(intf, timed_out_ipmb_commands));
1971
	seq_printf(m, "timed_out_ipmb_broadcasts:   %u\n",
1972
		       ipmi_get_stat(intf, timed_out_ipmb_broadcasts));
1973
	seq_printf(m, "sent_ipmb_responses:         %u\n",
1974
		       ipmi_get_stat(intf, sent_ipmb_responses));
1975
	seq_printf(m, "handled_ipmb_responses:      %u\n",
1976
		       ipmi_get_stat(intf, handled_ipmb_responses));
1977
	seq_printf(m, "invalid_ipmb_responses:      %u\n",
1978
		       ipmi_get_stat(intf, invalid_ipmb_responses));
1979
	seq_printf(m, "unhandled_ipmb_responses:    %u\n",
1980
		       ipmi_get_stat(intf, unhandled_ipmb_responses));
1981
	seq_printf(m, "sent_lan_commands:           %u\n",
1982
		       ipmi_get_stat(intf, sent_lan_commands));
1983
	seq_printf(m, "sent_lan_command_errs:       %u\n",
1984
		       ipmi_get_stat(intf, sent_lan_command_errs));
1985
	seq_printf(m, "retransmitted_lan_commands:  %u\n",
1986
		       ipmi_get_stat(intf, retransmitted_lan_commands));
1987
	seq_printf(m, "timed_out_lan_commands:      %u\n",
1988
		       ipmi_get_stat(intf, timed_out_lan_commands));
1989
	seq_printf(m, "sent_lan_responses:          %u\n",
1990
		       ipmi_get_stat(intf, sent_lan_responses));
1991
	seq_printf(m, "handled_lan_responses:       %u\n",
1992
		       ipmi_get_stat(intf, handled_lan_responses));
1993
	seq_printf(m, "invalid_lan_responses:       %u\n",
1994
		       ipmi_get_stat(intf, invalid_lan_responses));
1995
	seq_printf(m, "unhandled_lan_responses:     %u\n",
1996
		       ipmi_get_stat(intf, unhandled_lan_responses));
1997
	seq_printf(m, "handled_commands:            %u\n",
1998
		       ipmi_get_stat(intf, handled_commands));
1999
	seq_printf(m, "invalid_commands:            %u\n",
2000
		       ipmi_get_stat(intf, invalid_commands));
2001
	seq_printf(m, "unhandled_commands:          %u\n",
2002
		       ipmi_get_stat(intf, unhandled_commands));
2003
	seq_printf(m, "invalid_events:              %u\n",
2004
		       ipmi_get_stat(intf, invalid_events));
2005
	seq_printf(m, "events:                      %u\n",
2006
		       ipmi_get_stat(intf, events));
2007
	seq_printf(m, "failed rexmit LAN msgs:      %u\n",
2008
		       ipmi_get_stat(intf, dropped_rexmit_lan_commands));
2009
	seq_printf(m, "failed rexmit IPMB msgs:     %u\n",
2010
		       ipmi_get_stat(intf, dropped_rexmit_ipmb_commands));
2011 2012
	return 0;
}
L
Linus Torvalds 已提交
2013

2014 2015
static int smi_stats_proc_open(struct inode *inode, struct file *file)
{
A
Al Viro 已提交
2016
	return single_open(file, smi_stats_proc_show, PDE_DATA(inode));
L
Linus Torvalds 已提交
2017
}
2018 2019 2020 2021 2022 2023 2024

static const struct file_operations smi_stats_proc_ops = {
	.open		= smi_stats_proc_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};
2025
#endif /* CONFIG_PROC_FS */
L
Linus Torvalds 已提交
2026 2027

int ipmi_smi_add_proc_entry(ipmi_smi_t smi, char *name,
2028
			    const struct file_operations *proc_ops,
2029
			    void *data)
L
Linus Torvalds 已提交
2030 2031
{
	int                    rv = 0;
2032 2033
#ifdef CONFIG_PROC_FS
	struct proc_dir_entry  *file;
L
Linus Torvalds 已提交
2034 2035 2036 2037 2038 2039
	struct ipmi_proc_entry *entry;

	/* Create a list element. */
	entry = kmalloc(sizeof(*entry), GFP_KERNEL);
	if (!entry)
		return -ENOMEM;
2040
	entry->name = kstrdup(name, GFP_KERNEL);
L
Linus Torvalds 已提交
2041 2042 2043 2044 2045
	if (!entry->name) {
		kfree(entry);
		return -ENOMEM;
	}

2046
	file = proc_create_data(name, 0, smi->proc_dir, proc_ops, data);
L
Linus Torvalds 已提交
2047 2048 2049 2050 2051
	if (!file) {
		kfree(entry->name);
		kfree(entry);
		rv = -ENOMEM;
	} else {
C
Corey Minyard 已提交
2052
		mutex_lock(&smi->proc_entry_lock);
L
Linus Torvalds 已提交
2053 2054 2055
		/* Stick it on the list. */
		entry->next = smi->proc_entries;
		smi->proc_entries = entry;
C
Corey Minyard 已提交
2056
		mutex_unlock(&smi->proc_entry_lock);
L
Linus Torvalds 已提交
2057
	}
2058
#endif /* CONFIG_PROC_FS */
L
Linus Torvalds 已提交
2059 2060 2061

	return rv;
}
2062
EXPORT_SYMBOL(ipmi_smi_add_proc_entry);
L
Linus Torvalds 已提交
2063 2064 2065 2066 2067

static int add_proc_entries(ipmi_smi_t smi, int num)
{
	int rv = 0;

2068
#ifdef CONFIG_PROC_FS
L
Linus Torvalds 已提交
2069 2070 2071 2072 2073 2074 2075
	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",
2076
					     &smi_stats_proc_ops,
2077
					     smi);
L
Linus Torvalds 已提交
2078 2079 2080

	if (rv == 0)
		rv = ipmi_smi_add_proc_entry(smi, "ipmb",
2081
					     &smi_ipmb_proc_ops,
2082
					     smi);
L
Linus Torvalds 已提交
2083 2084 2085

	if (rv == 0)
		rv = ipmi_smi_add_proc_entry(smi, "version",
2086
					     &smi_version_proc_ops,
2087
					     smi);
2088
#endif /* CONFIG_PROC_FS */
L
Linus Torvalds 已提交
2089 2090 2091 2092 2093 2094

	return rv;
}

static void remove_proc_entries(ipmi_smi_t smi)
{
2095
#ifdef CONFIG_PROC_FS
L
Linus Torvalds 已提交
2096 2097
	struct ipmi_proc_entry *entry;

C
Corey Minyard 已提交
2098
	mutex_lock(&smi->proc_entry_lock);
L
Linus Torvalds 已提交
2099 2100 2101 2102 2103 2104 2105 2106
	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 已提交
2107
	mutex_unlock(&smi->proc_entry_lock);
L
Linus Torvalds 已提交
2108
	remove_proc_entry(smi->proc_dir_name, proc_ipmi_root);
2109
#endif /* CONFIG_PROC_FS */
L
Linus Torvalds 已提交
2110 2111
}

2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144 2145 2146
static int __find_bmc_guid(struct device *dev, void *data)
{
	unsigned char *id = data;
	struct bmc_device *bmc = dev_get_drvdata(dev);
	return memcmp(bmc->guid, id, 16) == 0;
}

static struct bmc_device *ipmi_find_bmc_guid(struct device_driver *drv,
					     unsigned char *guid)
{
	struct device *dev;

	dev = driver_find_device(drv, NULL, guid, __find_bmc_guid);
	if (dev)
		return dev_get_drvdata(dev);
	else
		return NULL;
}

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

static int __find_bmc_prod_dev_id(struct device *dev, void *data)
{
	struct prod_dev_id *id = data;
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return (bmc->id.product_id == id->product_id
		&& bmc->id.device_id == id->device_id);
}

static struct bmc_device *ipmi_find_bmc_prod_dev_id(
	struct device_driver *drv,
2147
	unsigned int product_id, unsigned char device_id)
2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177
{
	struct prod_dev_id id = {
		.product_id = product_id,
		.device_id = device_id,
	};
	struct device *dev;

	dev = driver_find_device(drv, NULL, &id, __find_bmc_prod_dev_id);
	if (dev)
		return dev_get_drvdata(dev);
	else
		return NULL;
}

static ssize_t device_id_show(struct device *dev,
			      struct device_attribute *attr,
			      char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 10, "%u\n", bmc->id.device_id);
}

static ssize_t provides_dev_sdrs_show(struct device *dev,
				      struct device_attribute *attr,
				      char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 10, "%u\n",
C
Corey Minyard 已提交
2178
			(bmc->id.device_revision & 0x80) >> 7);
2179 2180 2181 2182 2183 2184 2185 2186
}

static ssize_t revision_show(struct device *dev, struct device_attribute *attr,
			     char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 20, "%u\n",
C
Corey Minyard 已提交
2187
			bmc->id.device_revision & 0x0F);
2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261
}

static ssize_t firmware_rev_show(struct device *dev,
				 struct device_attribute *attr,
				 char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 20, "%u.%x\n", bmc->id.firmware_revision_1,
			bmc->id.firmware_revision_2);
}

static ssize_t ipmi_version_show(struct device *dev,
				 struct device_attribute *attr,
				 char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 20, "%u.%u\n",
			ipmi_version_major(&bmc->id),
			ipmi_version_minor(&bmc->id));
}

static ssize_t add_dev_support_show(struct device *dev,
				    struct device_attribute *attr,
				    char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 10, "0x%02x\n",
			bmc->id.additional_device_support);
}

static ssize_t manufacturer_id_show(struct device *dev,
				    struct device_attribute *attr,
				    char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 20, "0x%6.6x\n", bmc->id.manufacturer_id);
}

static ssize_t product_id_show(struct device *dev,
			       struct device_attribute *attr,
			       char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 10, "0x%4.4x\n", bmc->id.product_id);
}

static ssize_t aux_firmware_rev_show(struct device *dev,
				     struct device_attribute *attr,
				     char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 21, "0x%02x 0x%02x 0x%02x 0x%02x\n",
			bmc->id.aux_firmware_revision[3],
			bmc->id.aux_firmware_revision[2],
			bmc->id.aux_firmware_revision[1],
			bmc->id.aux_firmware_revision[0]);
}

static ssize_t guid_show(struct device *dev, struct device_attribute *attr,
			 char *buf)
{
	struct bmc_device *bmc = dev_get_drvdata(dev);

	return snprintf(buf, 100, "%Lx%Lx\n",
			(long long) bmc->guid[0],
			(long long) bmc->guid[8]);
}

J
Jeff Garzik 已提交
2262
static void remove_files(struct bmc_device *bmc)
2263
{
2264 2265 2266
	if (!bmc->dev)
		return;

2267 2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282
	device_remove_file(&bmc->dev->dev,
			   &bmc->device_id_attr);
	device_remove_file(&bmc->dev->dev,
			   &bmc->provides_dev_sdrs_attr);
	device_remove_file(&bmc->dev->dev,
			   &bmc->revision_attr);
	device_remove_file(&bmc->dev->dev,
			   &bmc->firmware_rev_attr);
	device_remove_file(&bmc->dev->dev,
			   &bmc->version_attr);
	device_remove_file(&bmc->dev->dev,
			   &bmc->add_dev_support_attr);
	device_remove_file(&bmc->dev->dev,
			   &bmc->manufacturer_id_attr);
	device_remove_file(&bmc->dev->dev,
			   &bmc->product_id_attr);
J
Jeff Garzik 已提交
2283

2284 2285 2286 2287 2288 2289
	if (bmc->id.aux_firmware_revision_set)
		device_remove_file(&bmc->dev->dev,
				   &bmc->aux_firmware_rev_attr);
	if (bmc->guid_set)
		device_remove_file(&bmc->dev->dev,
				   &bmc->guid_attr);
J
Jeff Garzik 已提交
2290 2291 2292 2293 2294 2295 2296 2297 2298 2299
}

static void
cleanup_bmc_device(struct kref *ref)
{
	struct bmc_device *bmc;

	bmc = container_of(ref, struct bmc_device, refcount);

	remove_files(bmc);
C
Corey Minyard 已提交
2300
	platform_device_unregister(bmc->dev);
2301 2302 2303 2304 2305 2306 2307
	kfree(bmc);
}

static void ipmi_bmc_unregister(ipmi_smi_t intf)
{
	struct bmc_device *bmc = intf->bmc;

2308 2309 2310 2311 2312
	if (intf->sysfs_name) {
		sysfs_remove_link(&intf->si_dev->kobj, intf->sysfs_name);
		kfree(intf->sysfs_name);
		intf->sysfs_name = NULL;
	}
2313 2314 2315 2316 2317 2318 2319 2320
	if (intf->my_dev_name) {
		sysfs_remove_link(&bmc->dev->dev.kobj, intf->my_dev_name);
		kfree(intf->my_dev_name);
		intf->my_dev_name = NULL;
	}

	mutex_lock(&ipmidriver_mutex);
	kref_put(&bmc->refcount, cleanup_bmc_device);
2321
	intf->bmc = NULL;
2322 2323 2324
	mutex_unlock(&ipmidriver_mutex);
}

J
Jeff Garzik 已提交
2325 2326 2327 2328
static int create_files(struct bmc_device *bmc)
{
	int err;

2329 2330 2331
	bmc->device_id_attr.attr.name = "device_id";
	bmc->device_id_attr.attr.mode = S_IRUGO;
	bmc->device_id_attr.show = device_id_show;
2332
	sysfs_attr_init(&bmc->device_id_attr.attr);
2333 2334 2335 2336

	bmc->provides_dev_sdrs_attr.attr.name = "provides_device_sdrs";
	bmc->provides_dev_sdrs_attr.attr.mode = S_IRUGO;
	bmc->provides_dev_sdrs_attr.show = provides_dev_sdrs_show;
2337
	sysfs_attr_init(&bmc->provides_dev_sdrs_attr.attr);
2338 2339 2340 2341

	bmc->revision_attr.attr.name = "revision";
	bmc->revision_attr.attr.mode = S_IRUGO;
	bmc->revision_attr.show = revision_show;
2342
	sysfs_attr_init(&bmc->revision_attr.attr);
2343 2344 2345 2346

	bmc->firmware_rev_attr.attr.name = "firmware_revision";
	bmc->firmware_rev_attr.attr.mode = S_IRUGO;
	bmc->firmware_rev_attr.show = firmware_rev_show;
2347
	sysfs_attr_init(&bmc->firmware_rev_attr.attr);
2348 2349 2350 2351

	bmc->version_attr.attr.name = "ipmi_version";
	bmc->version_attr.attr.mode = S_IRUGO;
	bmc->version_attr.show = ipmi_version_show;
2352
	sysfs_attr_init(&bmc->version_attr.attr);
2353 2354 2355 2356

	bmc->add_dev_support_attr.attr.name = "additional_device_support";
	bmc->add_dev_support_attr.attr.mode = S_IRUGO;
	bmc->add_dev_support_attr.show = add_dev_support_show;
2357
	sysfs_attr_init(&bmc->add_dev_support_attr.attr);
2358 2359 2360 2361

	bmc->manufacturer_id_attr.attr.name = "manufacturer_id";
	bmc->manufacturer_id_attr.attr.mode = S_IRUGO;
	bmc->manufacturer_id_attr.show = manufacturer_id_show;
2362
	sysfs_attr_init(&bmc->manufacturer_id_attr.attr);
2363 2364 2365 2366

	bmc->product_id_attr.attr.name = "product_id";
	bmc->product_id_attr.attr.mode = S_IRUGO;
	bmc->product_id_attr.show = product_id_show;
2367
	sysfs_attr_init(&bmc->product_id_attr.attr);
2368 2369 2370 2371

	bmc->guid_attr.attr.name = "guid";
	bmc->guid_attr.attr.mode = S_IRUGO;
	bmc->guid_attr.show = guid_show;
2372
	sysfs_attr_init(&bmc->guid_attr.attr);
2373 2374 2375 2376

	bmc->aux_firmware_rev_attr.attr.name = "aux_firmware_revision";
	bmc->aux_firmware_rev_attr.attr.mode = S_IRUGO;
	bmc->aux_firmware_rev_attr.show = aux_firmware_rev_show;
2377
	sysfs_attr_init(&bmc->aux_firmware_rev_attr.attr);
2378

J
Jeff Garzik 已提交
2379 2380
	err = device_create_file(&bmc->dev->dev,
			   &bmc->device_id_attr);
2381 2382
	if (err)
		goto out;
J
Jeff Garzik 已提交
2383 2384
	err = device_create_file(&bmc->dev->dev,
			   &bmc->provides_dev_sdrs_attr);
2385 2386
	if (err)
		goto out_devid;
J
Jeff Garzik 已提交
2387 2388
	err = device_create_file(&bmc->dev->dev,
			   &bmc->revision_attr);
2389 2390
	if (err)
		goto out_sdrs;
J
Jeff Garzik 已提交
2391 2392
	err = device_create_file(&bmc->dev->dev,
			   &bmc->firmware_rev_attr);
2393 2394
	if (err)
		goto out_rev;
J
Jeff Garzik 已提交
2395 2396
	err = device_create_file(&bmc->dev->dev,
			   &bmc->version_attr);
2397 2398
	if (err)
		goto out_firm;
J
Jeff Garzik 已提交
2399 2400
	err = device_create_file(&bmc->dev->dev,
			   &bmc->add_dev_support_attr);
2401 2402
	if (err)
		goto out_version;
J
Jeff Garzik 已提交
2403 2404
	err = device_create_file(&bmc->dev->dev,
			   &bmc->manufacturer_id_attr);
2405 2406
	if (err)
		goto out_add_dev;
J
Jeff Garzik 已提交
2407 2408
	err = device_create_file(&bmc->dev->dev,
			   &bmc->product_id_attr);
2409 2410
	if (err)
		goto out_manu;
J
Jeff Garzik 已提交
2411 2412 2413
	if (bmc->id.aux_firmware_revision_set) {
		err = device_create_file(&bmc->dev->dev,
				   &bmc->aux_firmware_rev_attr);
2414 2415
		if (err)
			goto out_prod_id;
J
Jeff Garzik 已提交
2416 2417 2418 2419
	}
	if (bmc->guid_set) {
		err = device_create_file(&bmc->dev->dev,
				   &bmc->guid_attr);
2420 2421
		if (err)
			goto out_aux_firm;
J
Jeff Garzik 已提交
2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457
	}

	return 0;

out_aux_firm:
	if (bmc->id.aux_firmware_revision_set)
		device_remove_file(&bmc->dev->dev,
				   &bmc->aux_firmware_rev_attr);
out_prod_id:
	device_remove_file(&bmc->dev->dev,
			   &bmc->product_id_attr);
out_manu:
	device_remove_file(&bmc->dev->dev,
			   &bmc->manufacturer_id_attr);
out_add_dev:
	device_remove_file(&bmc->dev->dev,
			   &bmc->add_dev_support_attr);
out_version:
	device_remove_file(&bmc->dev->dev,
			   &bmc->version_attr);
out_firm:
	device_remove_file(&bmc->dev->dev,
			   &bmc->firmware_rev_attr);
out_rev:
	device_remove_file(&bmc->dev->dev,
			   &bmc->revision_attr);
out_sdrs:
	device_remove_file(&bmc->dev->dev,
			   &bmc->provides_dev_sdrs_attr);
out_devid:
	device_remove_file(&bmc->dev->dev,
			   &bmc->device_id_attr);
out:
	return err;
}

2458 2459
static int ipmi_bmc_register(ipmi_smi_t intf, int ifnum,
			     const char *sysfs_name)
2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473
{
	int               rv;
	struct bmc_device *bmc = intf->bmc;
	struct bmc_device *old_bmc;
	int               size;
	char              dummy[1];

	mutex_lock(&ipmidriver_mutex);

	/*
	 * Try to find if there is an bmc_device struct
	 * representing the interfaced BMC already
	 */
	if (bmc->guid_set)
2474
		old_bmc = ipmi_find_bmc_guid(&ipmidriver.driver, bmc->guid);
2475
	else
2476
		old_bmc = ipmi_find_bmc_prod_dev_id(&ipmidriver.driver,
2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498
						    bmc->id.product_id,
						    bmc->id.device_id);

	/*
	 * If there is already an bmc_device, free the new one,
	 * otherwise register the new BMC device
	 */
	if (old_bmc) {
		kfree(bmc);
		intf->bmc = old_bmc;
		bmc = old_bmc;

		kref_get(&bmc->refcount);
		mutex_unlock(&ipmidriver_mutex);

		printk(KERN_INFO
		       "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);
	} else {
2499 2500 2501 2502 2503 2504 2505
		char name[14];
		unsigned char orig_dev_id = bmc->id.device_id;
		int warn_printed = 0;

		snprintf(name, sizeof(name),
			 "ipmi_bmc.%4.4x", bmc->id.product_id);

2506
		while (ipmi_find_bmc_prod_dev_id(&ipmidriver.driver,
2507
						 bmc->id.product_id,
C
Corey Minyard 已提交
2508
						 bmc->id.device_id)) {
2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528
			if (!warn_printed) {
				printk(KERN_WARNING PFX
				       "This machine has two different BMCs"
				       " with the same product id and device"
				       " id.  This is an error in the"
				       " firmware, but incrementing the"
				       " device id to work around the problem."
				       " Prod ID = 0x%x, Dev ID = 0x%x\n",
				       bmc->id.product_id, bmc->id.device_id);
				warn_printed = 1;
			}
			bmc->id.device_id++; /* Wraps at 255 */
			if (bmc->id.device_id == orig_dev_id) {
				printk(KERN_ERR PFX
				       "Out of device ids!\n");
				break;
			}
		}

		bmc->dev = platform_device_alloc(name, bmc->id.device_id);
2529
		if (!bmc->dev) {
2530
			mutex_unlock(&ipmidriver_mutex);
2531 2532 2533 2534 2535
			printk(KERN_ERR
			       "ipmi_msghandler:"
			       " Unable to allocate platform device\n");
			return -ENOMEM;
		}
2536
		bmc->dev->dev.driver = &ipmidriver.driver;
2537 2538 2539
		dev_set_drvdata(&bmc->dev->dev, bmc);
		kref_init(&bmc->refcount);

2540
		rv = platform_device_add(bmc->dev);
2541 2542
		mutex_unlock(&ipmidriver_mutex);
		if (rv) {
2543 2544
			platform_device_put(bmc->dev);
			bmc->dev = NULL;
2545 2546 2547 2548
			printk(KERN_ERR
			       "ipmi_msghandler:"
			       " Unable to register bmc device: %d\n",
			       rv);
2549 2550 2551 2552
			/*
			 * Don't go to out_err, you can only do that if
			 * the device is registered already.
			 */
2553 2554 2555
			return rv;
		}

J
Jeff Garzik 已提交
2556 2557 2558 2559 2560 2561 2562 2563
		rv = create_files(bmc);
		if (rv) {
			mutex_lock(&ipmidriver_mutex);
			platform_device_unregister(bmc->dev);
			mutex_unlock(&ipmidriver_mutex);

			return rv;
		}
2564

2565 2566 2567 2568 2569
		dev_info(intf->si_dev, "Found new 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);
2570 2571 2572 2573 2574 2575
	}

	/*
	 * create symlink from system interface device to bmc device
	 * and back.
	 */
2576 2577 2578 2579 2580 2581 2582 2583 2584
	intf->sysfs_name = kstrdup(sysfs_name, GFP_KERNEL);
	if (!intf->sysfs_name) {
		rv = -ENOMEM;
		printk(KERN_ERR
		       "ipmi_msghandler: allocate link to BMC: %d\n",
		       rv);
		goto out_err;
	}

2585
	rv = sysfs_create_link(&intf->si_dev->kobj,
2586
			       &bmc->dev->dev.kobj, intf->sysfs_name);
2587
	if (rv) {
2588 2589
		kfree(intf->sysfs_name);
		intf->sysfs_name = NULL;
2590 2591 2592 2593 2594 2595
		printk(KERN_ERR
		       "ipmi_msghandler: Unable to create bmc symlink: %d\n",
		       rv);
		goto out_err;
	}

2596
	size = snprintf(dummy, 0, "ipmi%d", ifnum);
2597 2598
	intf->my_dev_name = kmalloc(size+1, GFP_KERNEL);
	if (!intf->my_dev_name) {
2599 2600
		kfree(intf->sysfs_name);
		intf->sysfs_name = NULL;
2601 2602 2603 2604 2605 2606
		rv = -ENOMEM;
		printk(KERN_ERR
		       "ipmi_msghandler: allocate link from BMC: %d\n",
		       rv);
		goto out_err;
	}
2607
	snprintf(intf->my_dev_name, size+1, "ipmi%d", ifnum);
2608 2609 2610 2611

	rv = sysfs_create_link(&bmc->dev->dev.kobj, &intf->si_dev->kobj,
			       intf->my_dev_name);
	if (rv) {
2612 2613
		kfree(intf->sysfs_name);
		intf->sysfs_name = NULL;
2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628 2629 2630 2631 2632 2633 2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644 2645 2646 2647 2648 2649 2650 2651 2652 2653 2654 2655 2656 2657 2658 2659 2660 2661 2662 2663 2664 2665 2666 2667 2668 2669 2670 2671 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703
		kfree(intf->my_dev_name);
		intf->my_dev_name = NULL;
		printk(KERN_ERR
		       "ipmi_msghandler:"
		       " Unable to create symlink to bmc: %d\n",
		       rv);
		goto out_err;
	}

	return 0;

out_err:
	ipmi_bmc_unregister(intf);
	return rv;
}

static int
send_guid_cmd(ipmi_smi_t intf, int chan)
{
	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,
			      intf->channels[0].address,
			      intf->channels[0].lun,
			      -1, 0);
}

static void
guid_handler(ipmi_smi_t intf, struct ipmi_recv_msg *msg)
{
	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. */
		intf->bmc->guid_set = 0;
		goto out;
	}

	if (msg->msg.data_len < 17) {
		intf->bmc->guid_set = 0;
		printk(KERN_WARNING PFX
		       "guid_handler: 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);
		goto out;
	}

	memcpy(intf->bmc->guid, msg->msg.data, 16);
	intf->bmc->guid_set = 1;
 out:
	wake_up(&intf->waitq);
}

static void
get_guid(ipmi_smi_t intf)
{
	int rv;

	intf->bmc->guid_set = 0x2;
	intf->null_user_handler = guid_handler;
	rv = send_guid_cmd(intf, 0);
	if (rv)
		/* Send failed, no GUID available. */
		intf->bmc->guid_set = 0;
	wait_event(intf->waitq, intf->bmc->guid_set != 2);
	intf->null_user_handler = NULL;
}

L
Linus Torvalds 已提交
2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724
static int
send_channel_info_cmd(ipmi_smi_t intf, int chan)
{
	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,
2725
			      intf,
L
Linus Torvalds 已提交
2726 2727 2728
			      NULL,
			      NULL,
			      0,
2729 2730
			      intf->channels[0].address,
			      intf->channels[0].lun,
L
Linus Torvalds 已提交
2731 2732 2733 2734
			      -1, 0);
}

static void
2735
channel_handler(ipmi_smi_t intf, struct ipmi_recv_msg *msg)
L
Linus Torvalds 已提交
2736 2737 2738 2739
{
	int rv = 0;
	int chan;

2740 2741
	if ((msg->addr.addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
	    && (msg->msg.netfn == IPMI_NETFN_APP_RESPONSE)
2742
	    && (msg->msg.cmd == IPMI_GET_CHANNEL_INFO_CMD)) {
L
Linus Torvalds 已提交
2743
		/* It's the one we want */
2744
		if (msg->msg.data[0] != 0) {
L
Linus Torvalds 已提交
2745 2746
			/* Got an error from the channel, just go on. */

2747
			if (msg->msg.data[0] == IPMI_INVALID_COMMAND_ERR) {
2748 2749 2750 2751 2752 2753
				/*
				 * If the MC does not support this
				 * command, that is legal.  We just
				 * assume it has one IPMB at channel
				 * zero.
				 */
L
Linus Torvalds 已提交
2754 2755 2756 2757 2758 2759 2760 2761 2762 2763 2764 2765
				intf->channels[0].medium
					= IPMI_CHANNEL_MEDIUM_IPMB;
				intf->channels[0].protocol
					= IPMI_CHANNEL_PROTOCOL_IPMB;
				rv = -ENOSYS;

				intf->curr_channel = IPMI_MAX_CHANNELS;
				wake_up(&intf->waitq);
				goto out;
			}
			goto next_channel;
		}
2766
		if (msg->msg.data_len < 4) {
L
Linus Torvalds 已提交
2767 2768 2769 2770
			/* Message not big enough, just go on. */
			goto next_channel;
		}
		chan = intf->curr_channel;
2771 2772
		intf->channels[chan].medium = msg->msg.data[2] & 0x7f;
		intf->channels[chan].protocol = msg->msg.data[3] & 0x1f;
L
Linus Torvalds 已提交
2773

2774
 next_channel:
L
Linus Torvalds 已提交
2775 2776 2777 2778 2779 2780 2781 2782 2783 2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794
		intf->curr_channel++;
		if (intf->curr_channel >= IPMI_MAX_CHANNELS)
			wake_up(&intf->waitq);
		else
			rv = send_channel_info_cmd(intf, intf->curr_channel);

		if (rv) {
			/* Got an error somehow, just give up. */
			intf->curr_channel = IPMI_MAX_CHANNELS;
			wake_up(&intf->waitq);

			printk(KERN_WARNING PFX
			       "Error sending channel information: %d\n",
			       rv);
		}
	}
 out:
	return;
}

2795
static void ipmi_poll(ipmi_smi_t intf)
C
Corey Minyard 已提交
2796 2797 2798
{
	if (intf->handlers->poll)
		intf->handlers->poll(intf->send_info);
2799 2800
	/* In case something came in */
	handle_new_recv_msgs(intf);
C
Corey Minyard 已提交
2801
}
2802 2803 2804 2805

void ipmi_poll_interface(ipmi_user_t user)
{
	ipmi_poll(user->intf);
C
Corey Minyard 已提交
2806
}
2807
EXPORT_SYMBOL(ipmi_poll_interface);
C
Corey Minyard 已提交
2808

L
Linus Torvalds 已提交
2809 2810
int ipmi_register_smi(struct ipmi_smi_handlers *handlers,
		      void		       *send_info,
2811 2812
		      struct ipmi_device_id    *device_id,
		      struct device            *si_dev,
2813
		      const char               *sysfs_name,
2814
		      unsigned char            slave_addr)
L
Linus Torvalds 已提交
2815 2816 2817
{
	int              i, j;
	int              rv;
2818
	ipmi_smi_t       intf;
2819 2820
	ipmi_smi_t       tintf;
	struct list_head *link;
L
Linus Torvalds 已提交
2821

2822 2823 2824 2825
	/*
	 * Make sure the driver is actually initialized, this handles
	 * problems with initialization order.
	 */
L
Linus Torvalds 已提交
2826 2827 2828 2829
	if (!initialized) {
		rv = ipmi_init_msghandler();
		if (rv)
			return rv;
2830 2831 2832 2833
		/*
		 * The init code doesn't return an error if it was turned
		 * off, but it won't initialize.  Check that.
		 */
L
Linus Torvalds 已提交
2834 2835 2836 2837
		if (!initialized)
			return -ENODEV;
	}

2838
	intf = kzalloc(sizeof(*intf), GFP_KERNEL);
2839
	if (!intf)
L
Linus Torvalds 已提交
2840
		return -ENOMEM;
2841 2842 2843 2844

	intf->ipmi_version_major = ipmi_version_major(device_id);
	intf->ipmi_version_minor = ipmi_version_minor(device_id);

2845 2846 2847 2848 2849
	intf->bmc = kzalloc(sizeof(*intf->bmc), GFP_KERNEL);
	if (!intf->bmc) {
		kfree(intf);
		return -ENOMEM;
	}
2850
	intf->intf_num = -1; /* Mark it invalid for now. */
2851
	kref_init(&intf->refcount);
2852 2853
	intf->bmc->id = *device_id;
	intf->si_dev = si_dev;
2854 2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868 2869
	for (j = 0; j < IPMI_MAX_CHANNELS; j++) {
		intf->channels[j].address = IPMI_BMC_SLAVE_ADDR;
		intf->channels[j].lun = 2;
	}
	if (slave_addr != 0)
		intf->channels[0].address = slave_addr;
	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;
#ifdef CONFIG_PROC_FS
C
Corey Minyard 已提交
2870
	mutex_init(&intf->proc_entry_lock);
2871 2872 2873
#endif
	spin_lock_init(&intf->waiting_msgs_lock);
	INIT_LIST_HEAD(&intf->waiting_msgs);
2874 2875 2876 2877
	tasklet_init(&intf->recv_tasklet,
		     smi_recv_tasklet,
		     (unsigned long) intf);
	atomic_set(&intf->watchdog_pretimeouts_to_deliver, 0);
2878 2879 2880
	spin_lock_init(&intf->events_lock);
	INIT_LIST_HEAD(&intf->waiting_events);
	intf->waiting_events_count = 0;
2881
	mutex_init(&intf->cmd_rcvrs_mutex);
C
Corey Minyard 已提交
2882
	spin_lock_init(&intf->maintenance_mode_lock);
2883 2884
	INIT_LIST_HEAD(&intf->cmd_rcvrs);
	init_waitqueue_head(&intf->waitq);
2885 2886
	for (i = 0; i < IPMI_NUM_STATS; i++)
		atomic_set(&intf->stats[i], 0);
2887 2888

	intf->proc_dir = NULL;
L
Linus Torvalds 已提交
2889

2890
	mutex_lock(&smi_watchers_mutex);
2891 2892 2893 2894 2895 2896 2897
	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 已提交
2898 2899
			break;
		}
2900
		i++;
L
Linus Torvalds 已提交
2901
	}
2902 2903 2904 2905 2906
	/* 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 已提交
2907

2908 2909 2910
	rv = handlers->start_processing(send_info, intf);
	if (rv)
		goto out;
L
Linus Torvalds 已提交
2911

2912 2913
	get_guid(intf);

2914
	if ((intf->ipmi_version_major > 1)
2915 2916 2917 2918 2919 2920
			|| ((intf->ipmi_version_major == 1)
			    && (intf->ipmi_version_minor >= 5))) {
		/*
		 * Start scanning the channels to see what is
		 * available.
		 */
2921 2922 2923 2924 2925
		intf->null_user_handler = channel_handler;
		intf->curr_channel = 0;
		rv = send_channel_info_cmd(intf, 0);
		if (rv)
			goto out;
L
Linus Torvalds 已提交
2926

2927 2928 2929
		/* Wait for the channel info to be read. */
		wait_event(intf->waitq,
			   intf->curr_channel >= IPMI_MAX_CHANNELS);
2930
		intf->null_user_handler = NULL;
2931 2932 2933 2934
	} else {
		/* Assume a single IPMB channel at zero. */
		intf->channels[0].medium = IPMI_CHANNEL_MEDIUM_IPMB;
		intf->channels[0].protocol = IPMI_CHANNEL_PROTOCOL_IPMB;
C
Corey Minyard 已提交
2935
		intf->curr_channel = IPMI_MAX_CHANNELS;
L
Linus Torvalds 已提交
2936 2937
	}

2938 2939
	if (rv == 0)
		rv = add_proc_entries(intf, i);
L
Linus Torvalds 已提交
2940

2941
	rv = ipmi_bmc_register(intf, i, sysfs_name);
2942

2943
 out:
L
Linus Torvalds 已提交
2944
	if (rv) {
2945 2946
		if (intf->proc_dir)
			remove_proc_entries(intf);
2947
		intf->handlers = NULL;
2948 2949
		list_del_rcu(&intf->link);
		mutex_unlock(&ipmi_interfaces_mutex);
2950
		mutex_unlock(&smi_watchers_mutex);
2951
		synchronize_rcu();
2952 2953
		kref_put(&intf->refcount, intf_free);
	} else {
2954 2955 2956 2957 2958 2959
		/*
		 * 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();
2960 2961
		intf->intf_num = i;
		mutex_unlock(&ipmi_interfaces_mutex);
2962
		/* After this point the interface is legal to use. */
2963
		call_smi_watchers(i, intf->si_dev);
2964
		mutex_unlock(&smi_watchers_mutex);
L
Linus Torvalds 已提交
2965 2966 2967 2968
	}

	return rv;
}
2969
EXPORT_SYMBOL(ipmi_register_smi);
L
Linus Torvalds 已提交
2970

2971 2972 2973 2974 2975 2976 2977 2978 2979 2980 2981 2982 2983 2984
static void cleanup_smi_msgs(ipmi_smi_t intf)
{
	int              i;
	struct seq_table *ent;

	/* No need for locks, the interface is down. */
	for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++) {
		ent = &(intf->seq_table[i]);
		if (!ent->inuse)
			continue;
		deliver_err_response(ent->recv_msg, IPMI_ERR_UNSPECIFIED);
	}
}

L
Linus Torvalds 已提交
2985 2986 2987
int ipmi_unregister_smi(ipmi_smi_t intf)
{
	struct ipmi_smi_watcher *w;
2988
	int    intf_num = intf->intf_num;
L
Linus Torvalds 已提交
2989

2990 2991
	ipmi_bmc_unregister(intf);

2992
	mutex_lock(&smi_watchers_mutex);
2993
	mutex_lock(&ipmi_interfaces_mutex);
2994 2995
	intf->intf_num = -1;
	intf->handlers = NULL;
2996 2997 2998
	list_del_rcu(&intf->link);
	mutex_unlock(&ipmi_interfaces_mutex);
	synchronize_rcu();
L
Linus Torvalds 已提交
2999

3000 3001
	cleanup_smi_msgs(intf);

3002
	remove_proc_entries(intf);
L
Linus Torvalds 已提交
3003

3004 3005 3006 3007
	/*
	 * Call all the watcher interfaces to tell them that
	 * an interface is gone.
	 */
3008
	list_for_each_entry(w, &smi_watchers, link)
3009 3010
		w->smi_gone(intf_num);
	mutex_unlock(&smi_watchers_mutex);
3011 3012

	kref_put(&intf->refcount, intf_free);
L
Linus Torvalds 已提交
3013 3014
	return 0;
}
3015
EXPORT_SYMBOL(ipmi_unregister_smi);
L
Linus Torvalds 已提交
3016 3017 3018 3019 3020 3021 3022

static int handle_ipmb_get_msg_rsp(ipmi_smi_t          intf,
				   struct ipmi_smi_msg *msg)
{
	struct ipmi_ipmb_addr ipmb_addr;
	struct ipmi_recv_msg  *recv_msg;

3023 3024 3025 3026
	/*
	 * This is 11, not 10, because the response must contain a
	 * completion code.
	 */
L
Linus Torvalds 已提交
3027 3028
	if (msg->rsp_size < 11) {
		/* Message not big enough, just ignore it. */
3029
		ipmi_inc_stat(intf, invalid_ipmb_responses);
L
Linus Torvalds 已提交
3030 3031 3032 3033 3034 3035 3036 3037 3038 3039 3040 3041 3042
		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;

3043 3044 3045 3046
	/*
	 * It's a response from a remote entity.  Look up the sequence
	 * number and handle the response.
	 */
L
Linus Torvalds 已提交
3047 3048 3049 3050 3051 3052
	if (intf_find_seq(intf,
			  msg->rsp[7] >> 2,
			  msg->rsp[3] & 0x0f,
			  msg->rsp[8],
			  (msg->rsp[4] >> 2) & (~1),
			  (struct ipmi_addr *) &(ipmb_addr),
3053 3054 3055 3056 3057
			  &recv_msg)) {
		/*
		 * We were unable to find the sequence number,
		 * so just nuke the message.
		 */
3058
		ipmi_inc_stat(intf, unhandled_ipmb_responses);
L
Linus Torvalds 已提交
3059 3060 3061 3062 3063 3064
		return 0;
	}

	memcpy(recv_msg->msg_data,
	       &(msg->rsp[9]),
	       msg->rsp_size - 9);
3065 3066 3067 3068 3069
	/*
	 * 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 已提交
3070 3071 3072 3073
	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;
3074
	ipmi_inc_stat(intf, handled_ipmb_responses);
L
Linus Torvalds 已提交
3075 3076 3077 3078 3079 3080 3081 3082
	deliver_response(recv_msg);

	return 0;
}

static int handle_ipmb_get_msg_cmd(ipmi_smi_t          intf,
				   struct ipmi_smi_msg *msg)
{
3083 3084 3085 3086
	struct cmd_rcvr          *rcvr;
	int                      rv = 0;
	unsigned char            netfn;
	unsigned char            cmd;
3087
	unsigned char            chan;
3088 3089 3090
	ipmi_user_t              user = NULL;
	struct ipmi_ipmb_addr    *ipmb_addr;
	struct ipmi_recv_msg     *recv_msg;
3091
	struct ipmi_smi_handlers *handlers;
L
Linus Torvalds 已提交
3092 3093 3094

	if (msg->rsp_size < 10) {
		/* Message not big enough, just ignore it. */
3095
		ipmi_inc_stat(intf, invalid_commands);
L
Linus Torvalds 已提交
3096 3097 3098 3099 3100 3101 3102 3103 3104 3105
		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];
3106
	chan = msg->rsp[3] & 0xf;
L
Linus Torvalds 已提交
3107

3108
	rcu_read_lock();
3109
	rcvr = find_cmd_rcvr(intf, netfn, cmd, chan);
3110 3111 3112 3113 3114
	if (rcvr) {
		user = rcvr->user;
		kref_get(&user->refcount);
	} else
		user = NULL;
3115
	rcu_read_unlock();
L
Linus Torvalds 已提交
3116 3117 3118

	if (user == NULL) {
		/* We didn't find a user, deliver an error response. */
3119
		ipmi_inc_stat(intf, unhandled_commands);
L
Linus Torvalds 已提交
3120 3121 3122 3123 3124

		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];
3125
		msg->data[4] = ((netfn + 1) << 2) | (msg->rsp[7] & 0x3);
L
Linus Torvalds 已提交
3126
		msg->data[5] = ipmb_checksum(&(msg->data[3]), 2);
3127
		msg->data[6] = intf->channels[msg->rsp[3] & 0xf].address;
3128 3129
		/* rqseq/lun */
		msg->data[7] = (msg->rsp[7] & 0xfc) | (msg->rsp[4] & 0x3);
L
Linus Torvalds 已提交
3130 3131 3132 3133 3134 3135 3136 3137 3138
		msg->data[8] = msg->rsp[8]; /* cmd */
		msg->data[9] = IPMI_INVALID_CMD_COMPLETION_CODE;
		msg->data[10] = ipmb_checksum(&(msg->data[6]), 4);
		msg->data_size = 11;

#ifdef DEBUG_MSGING
	{
		int m;
		printk("Invalid command:");
C
Corey Minyard 已提交
3139
		for (m = 0; m < msg->data_size; m++)
L
Linus Torvalds 已提交
3140 3141 3142 3143
			printk(" %2.2x", msg->data[m]);
		printk("\n");
	}
#endif
3144 3145 3146 3147
		rcu_read_lock();
		handlers = intf->handlers;
		if (handlers) {
			handlers->sender(intf->send_info, msg, 0);
3148 3149 3150 3151 3152
			/*
			 * We used the message, so return the value
			 * that causes it to not be freed or
			 * queued.
			 */
3153 3154 3155
			rv = -1;
		}
		rcu_read_unlock();
L
Linus Torvalds 已提交
3156 3157
	} else {
		/* Deliver the message to the user. */
3158
		ipmi_inc_stat(intf, handled_commands);
L
Linus Torvalds 已提交
3159 3160

		recv_msg = ipmi_alloc_recv_msg();
3161
		if (!recv_msg) {
3162 3163 3164 3165 3166
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling
			 * later.
			 */
L
Linus Torvalds 已提交
3167
			rv = 1;
3168
			kref_put(&user->refcount, free_user);
L
Linus Torvalds 已提交
3169 3170 3171 3172 3173 3174 3175 3176
		} 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;

3177 3178 3179 3180
			/*
			 * Extract the rest of the message information
			 * from the IPMB header.
			 */
L
Linus Torvalds 已提交
3181 3182 3183 3184 3185 3186 3187
			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;

3188 3189 3190 3191
			/*
			 * We chop off 10, not 9 bytes because the checksum
			 * at the end also needs to be removed.
			 */
L
Linus Torvalds 已提交
3192 3193 3194 3195 3196 3197 3198 3199 3200 3201 3202 3203 3204 3205 3206 3207 3208 3209
			recv_msg->msg.data_len = msg->rsp_size - 10;
			memcpy(recv_msg->msg_data,
			       &(msg->rsp[9]),
			       msg->rsp_size - 10);
			deliver_response(recv_msg);
		}
	}

	return rv;
}

static int handle_lan_get_msg_rsp(ipmi_smi_t          intf,
				  struct ipmi_smi_msg *msg)
{
	struct ipmi_lan_addr  lan_addr;
	struct ipmi_recv_msg  *recv_msg;


3210 3211 3212 3213
	/*
	 * This is 13, not 12, because the response must contain a
	 * completion code.
	 */
L
Linus Torvalds 已提交
3214 3215
	if (msg->rsp_size < 13) {
		/* Message not big enough, just ignore it. */
3216
		ipmi_inc_stat(intf, invalid_lan_responses);
L
Linus Torvalds 已提交
3217 3218 3219 3220 3221 3222 3223 3224 3225 3226 3227 3228 3229 3230 3231 3232
		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;

3233 3234 3235 3236
	/*
	 * It's a response from a remote entity.  Look up the sequence
	 * number and handle the response.
	 */
L
Linus Torvalds 已提交
3237 3238 3239 3240 3241 3242
	if (intf_find_seq(intf,
			  msg->rsp[9] >> 2,
			  msg->rsp[3] & 0x0f,
			  msg->rsp[10],
			  (msg->rsp[6] >> 2) & (~1),
			  (struct ipmi_addr *) &(lan_addr),
3243 3244 3245 3246 3247
			  &recv_msg)) {
		/*
		 * We were unable to find the sequence number,
		 * so just nuke the message.
		 */
3248
		ipmi_inc_stat(intf, unhandled_lan_responses);
L
Linus Torvalds 已提交
3249 3250 3251 3252 3253 3254
		return 0;
	}

	memcpy(recv_msg->msg_data,
	       &(msg->rsp[11]),
	       msg->rsp_size - 11);
3255 3256 3257 3258 3259
	/*
	 * 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 已提交
3260 3261 3262 3263
	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;
3264
	ipmi_inc_stat(intf, handled_lan_responses);
L
Linus Torvalds 已提交
3265 3266 3267 3268 3269 3270 3271 3272
	deliver_response(recv_msg);

	return 0;
}

static int handle_lan_get_msg_cmd(ipmi_smi_t          intf,
				  struct ipmi_smi_msg *msg)
{
3273 3274 3275 3276
	struct cmd_rcvr          *rcvr;
	int                      rv = 0;
	unsigned char            netfn;
	unsigned char            cmd;
3277
	unsigned char            chan;
3278 3279 3280
	ipmi_user_t              user = NULL;
	struct ipmi_lan_addr     *lan_addr;
	struct ipmi_recv_msg     *recv_msg;
L
Linus Torvalds 已提交
3281 3282 3283

	if (msg->rsp_size < 12) {
		/* Message not big enough, just ignore it. */
3284
		ipmi_inc_stat(intf, invalid_commands);
L
Linus Torvalds 已提交
3285 3286 3287 3288 3289 3290 3291 3292 3293 3294
		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];
3295
	chan = msg->rsp[3] & 0xf;
L
Linus Torvalds 已提交
3296

3297
	rcu_read_lock();
3298
	rcvr = find_cmd_rcvr(intf, netfn, cmd, chan);
3299 3300 3301 3302 3303
	if (rcvr) {
		user = rcvr->user;
		kref_get(&user->refcount);
	} else
		user = NULL;
3304
	rcu_read_unlock();
L
Linus Torvalds 已提交
3305 3306

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

3310 3311 3312 3313 3314
		/*
		 * Don't do anything with these messages, just allow
		 * them to be freed.
		 */
		rv = 0;
L
Linus Torvalds 已提交
3315 3316
	} else {
		/* Deliver the message to the user. */
3317
		ipmi_inc_stat(intf, handled_commands);
L
Linus Torvalds 已提交
3318 3319

		recv_msg = ipmi_alloc_recv_msg();
3320
		if (!recv_msg) {
3321 3322 3323 3324
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling later.
			 */
L
Linus Torvalds 已提交
3325
			rv = 1;
3326
			kref_put(&user->refcount, free_user);
L
Linus Torvalds 已提交
3327 3328 3329 3330 3331 3332 3333 3334 3335 3336 3337
		} 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;

3338 3339 3340 3341
			/*
			 * Extract the rest of the message information
			 * from the IPMB header.
			 */
L
Linus Torvalds 已提交
3342 3343 3344 3345 3346 3347 3348
			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;

3349 3350 3351 3352
			/*
			 * We chop off 12, not 11 bytes because the checksum
			 * at the end also needs to be removed.
			 */
L
Linus Torvalds 已提交
3353 3354 3355 3356 3357 3358 3359 3360 3361 3362 3363
			recv_msg->msg.data_len = msg->rsp_size - 12;
			memcpy(recv_msg->msg_data,
			       &(msg->rsp[11]),
			       msg->rsp_size - 12);
			deliver_response(recv_msg);
		}
	}

	return rv;
}

D
dann frazier 已提交
3364 3365 3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377 3378 3379 3380 3381 3382 3383 3384 3385 3386 3387 3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419 3420 3421 3422 3423 3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436 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
/*
 * 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.
 */
static int handle_oem_get_msg_cmd(ipmi_smi_t          intf,
				  struct ipmi_smi_msg *msg)
{
	struct cmd_rcvr       *rcvr;
	int                   rv = 0;
	unsigned char         netfn;
	unsigned char         cmd;
	unsigned char         chan;
	ipmi_user_t           user = NULL;
	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 {
		/* Deliver the message to the user. */
		ipmi_inc_stat(intf, handled_commands);

		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 *)
				    &(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->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;
			memcpy(recv_msg->msg_data,
			       &(msg->rsp[4]),
			       msg->rsp_size - 4);
			deliver_response(recv_msg);
		}
	}

	return rv;
}

L
Linus Torvalds 已提交
3472 3473 3474 3475
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;
3476

L
Linus Torvalds 已提交
3477 3478 3479 3480 3481 3482 3483 3484 3485 3486 3487 3488 3489 3490 3491 3492 3493 3494 3495 3496 3497 3498 3499 3500 3501
	recv_msg->msgid = 0;
	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->recv_type = IPMI_ASYNC_EVENT_RECV_TYPE;
	recv_msg->msg.netfn = msg->rsp[0] >> 2;
	recv_msg->msg.cmd = msg->rsp[1];
	memcpy(recv_msg->msg_data, &(msg->rsp[3]), msg->rsp_size - 3);
	recv_msg->msg.data = recv_msg->msg_data;
	recv_msg->msg.data_len = msg->rsp_size - 3;
}

static int handle_read_event_rsp(ipmi_smi_t          intf,
				 struct ipmi_smi_msg *msg)
{
	struct ipmi_recv_msg *recv_msg, *recv_msg2;
	struct list_head     msgs;
	ipmi_user_t          user;
	int                  rv = 0;
	int                  deliver_count = 0;
	unsigned long        flags;

	if (msg->rsp_size < 19) {
		/* Message is too small to be an IPMB event. */
3502
		ipmi_inc_stat(intf, invalid_events);
L
Linus Torvalds 已提交
3503 3504 3505 3506 3507 3508 3509 3510 3511 3512
		return 0;
	}

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

	INIT_LIST_HEAD(&msgs);

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

3515
	ipmi_inc_stat(intf, events);
L
Linus Torvalds 已提交
3516

3517 3518 3519 3520
	/*
	 * Allocate and fill in one message for every user that is
	 * getting events.
	 */
3521 3522
	rcu_read_lock();
	list_for_each_entry_rcu(user, &intf->users, link) {
3523
		if (!user->gets_events)
L
Linus Torvalds 已提交
3524 3525 3526
			continue;

		recv_msg = ipmi_alloc_recv_msg();
3527
		if (!recv_msg) {
3528
			rcu_read_unlock();
3529 3530
			list_for_each_entry_safe(recv_msg, recv_msg2, &msgs,
						 link) {
L
Linus Torvalds 已提交
3531 3532 3533
				list_del(&recv_msg->link);
				ipmi_free_recv_msg(recv_msg);
			}
3534 3535 3536 3537 3538
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling
			 * later.
			 */
L
Linus Torvalds 已提交
3539 3540 3541 3542 3543 3544 3545 3546
			rv = 1;
			goto out;
		}

		deliver_count++;

		copy_event_into_recv_msg(recv_msg, msg);
		recv_msg->user = user;
3547
		kref_get(&user->refcount);
L
Linus Torvalds 已提交
3548 3549
		list_add_tail(&(recv_msg->link), &msgs);
	}
3550
	rcu_read_unlock();
L
Linus Torvalds 已提交
3551 3552 3553 3554 3555 3556 3557 3558

	if (deliver_count) {
		/* Now deliver all the messages. */
		list_for_each_entry_safe(recv_msg, recv_msg2, &msgs, link) {
			list_del(&recv_msg->link);
			deliver_response(recv_msg);
		}
	} else if (intf->waiting_events_count < MAX_EVENTS_IN_QUEUE) {
3559 3560 3561 3562
		/*
		 * No one to receive the message, put it in queue if there's
		 * not already too many things in the queue.
		 */
L
Linus Torvalds 已提交
3563
		recv_msg = ipmi_alloc_recv_msg();
3564
		if (!recv_msg) {
3565 3566 3567 3568 3569
			/*
			 * We couldn't allocate memory for the
			 * message, so requeue it for handling
			 * later.
			 */
L
Linus Torvalds 已提交
3570 3571 3572 3573 3574 3575
			rv = 1;
			goto out;
		}

		copy_event_into_recv_msg(recv_msg, msg);
		list_add_tail(&(recv_msg->link), &(intf->waiting_events));
3576
		intf->waiting_events_count++;
3577
	} else if (!intf->event_msg_printed) {
3578 3579 3580 3581
		/*
		 * There's too many things in the queue, discard this
		 * message.
		 */
3582 3583 3584
		printk(KERN_WARNING PFX "Event queue full, discarding"
		       " incoming events\n");
		intf->event_msg_printed = 1;
L
Linus Torvalds 已提交
3585 3586 3587 3588 3589 3590 3591 3592 3593 3594 3595 3596
	}

 out:
	spin_unlock_irqrestore(&(intf->events_lock), flags);

	return rv;
}

static int handle_bmc_rsp(ipmi_smi_t          intf,
			  struct ipmi_smi_msg *msg)
{
	struct ipmi_recv_msg *recv_msg;
3597
	struct ipmi_user     *user;
L
Linus Torvalds 已提交
3598 3599

	recv_msg = (struct ipmi_recv_msg *) msg->user_data;
3600 3601 3602 3603 3604 3605
	if (recv_msg == NULL) {
		printk(KERN_WARNING
		       "IPMI message received with no owner. This\n"
		       "could be because of a malformed message, or\n"
		       "because of a hardware error.  Contact your\n"
		       "hardware vender for assistance\n");
3606 3607
		return 0;
	}
L
Linus Torvalds 已提交
3608

3609
	user = recv_msg->user;
L
Linus Torvalds 已提交
3610
	/* Make sure the user still exists. */
3611
	if (user && !user->valid) {
3612
		/* The user for the message went away, so give up. */
3613
		ipmi_inc_stat(intf, unhandled_local_responses);
L
Linus Torvalds 已提交
3614 3615 3616 3617
		ipmi_free_recv_msg(recv_msg);
	} else {
		struct ipmi_system_interface_addr *smi_addr;

3618
		ipmi_inc_stat(intf, handled_local_responses);
L
Linus Torvalds 已提交
3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630 3631 3632 3633 3634 3635 3636 3637 3638
		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_response(recv_msg);
	}

	return 0;
}

3639
/*
3640
 * Handle a received message.  Return 1 if the message should be requeued,
3641 3642 3643
 * 0 if the message should be freed, or -1 if the message should not
 * be freed or requeued.
 */
3644
static int handle_one_recv_msg(ipmi_smi_t          intf,
L
Linus Torvalds 已提交
3645 3646 3647 3648 3649 3650 3651 3652
			       struct ipmi_smi_msg *msg)
{
	int requeue;
	int chan;

#ifdef DEBUG_MSGING
	int m;
	printk("Recv:");
C
Corey Minyard 已提交
3653
	for (m = 0; m < msg->rsp_size; m++)
L
Linus Torvalds 已提交
3654 3655 3656 3657 3658 3659 3660 3661 3662 3663 3664 3665 3666 3667
		printk(" %2.2x", msg->rsp[m]);
	printk("\n");
#endif
	if (msg->rsp_size < 2) {
		/* Message is too small to be correct. */
		printk(KERN_WARNING 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);

		/* 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;
3668 3669 3670 3671 3672 3673
	} 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.
		 */
L
Linus Torvalds 已提交
3674 3675 3676 3677 3678 3679 3680 3681 3682 3683 3684 3685 3686 3687
		printk(KERN_WARNING 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]);

		/* 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)
3688 3689 3690 3691 3692
	    && (msg->user_data != NULL)) {
		/*
		 * It's a response to a response we sent.  For this we
		 * deliver a send message response to the user.
		 */
3693
		struct ipmi_recv_msg     *recv_msg = msg->user_data;
L
Linus Torvalds 已提交
3694 3695 3696 3697 3698 3699 3700 3701 3702 3703 3704

		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;

3705 3706 3707 3708 3709 3710 3711 3712 3713 3714 3715 3716
		if (!recv_msg)
			goto out;

		/* Make sure the user still exists. */
		if (!recv_msg->user || !recv_msg->user->valid)
			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];
		deliver_response(recv_msg);
L
Linus Torvalds 已提交
3717
	} else if ((msg->rsp[0] == ((IPMI_NETFN_APP_REQUEST|1) << 2))
3718
		   && (msg->rsp[1] == IPMI_GET_MSG_CMD)) {
L
Linus Torvalds 已提交
3719 3720 3721 3722 3723 3724 3725 3726
		/* 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 已提交
3727
		/*
C
Corey Minyard 已提交
3728 3729 3730 3731 3732
		 * 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.
		 */
D
dann frazier 已提交
3733
		if (intf->curr_channel < IPMI_MAX_CHANNELS) {
C
Corey Minyard 已提交
3734
			requeue = 0; /* Throw the message away */
D
dann frazier 已提交
3735 3736 3737
			goto out;
		}

L
Linus Torvalds 已提交
3738 3739 3740
		switch (intf->channels[chan].medium) {
		case IPMI_CHANNEL_MEDIUM_IPMB:
			if (msg->rsp[4] & 0x04) {
3741 3742 3743 3744
				/*
				 * It's a response, so find the
				 * requesting message and send it up.
				 */
L
Linus Torvalds 已提交
3745 3746
				requeue = handle_ipmb_get_msg_rsp(intf, msg);
			} else {
3747 3748 3749 3750
				/*
				 * It's a command to the SMS from some other
				 * entity.  Handle that.
				 */
L
Linus Torvalds 已提交
3751 3752 3753 3754 3755 3756 3757
				requeue = handle_ipmb_get_msg_cmd(intf, msg);
			}
			break;

		case IPMI_CHANNEL_MEDIUM_8023LAN:
		case IPMI_CHANNEL_MEDIUM_ASYNC:
			if (msg->rsp[6] & 0x04) {
3758 3759 3760 3761
				/*
				 * It's a response, so find the
				 * requesting message and send it up.
				 */
L
Linus Torvalds 已提交
3762 3763
				requeue = handle_lan_get_msg_rsp(intf, msg);
			} else {
3764 3765 3766 3767
				/*
				 * It's a command to the SMS from some other
				 * entity.  Handle that.
				 */
L
Linus Torvalds 已提交
3768 3769 3770 3771 3772
				requeue = handle_lan_get_msg_cmd(intf, msg);
			}
			break;

		default:
D
dann frazier 已提交
3773 3774 3775 3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786
			/* Check for OEM Channels.  Clients had better
			   register for these commands. */
			if ((intf->channels[chan].medium
			     >= IPMI_CHANNEL_MEDIUM_OEM_MIN)
			    && (intf->channels[chan].medium
				<= 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 已提交
3787 3788 3789
		}

	} else if ((msg->rsp[0] == ((IPMI_NETFN_APP_REQUEST|1) << 2))
3790
		   && (msg->rsp[1] == IPMI_READ_EVENT_MSG_BUFFER_CMD)) {
3791
		/* It's an asynchronous event. */
L
Linus Torvalds 已提交
3792 3793 3794 3795 3796 3797 3798 3799 3800 3801
		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;
}

3802 3803 3804 3805 3806 3807 3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 3822 3823 3824 3825 3826 3827 3828 3829 3830 3831 3832 3833 3834 3835 3836 3837 3838 3839 3840 3841 3842 3843 3844 3845 3846 3847 3848 3849 3850 3851 3852 3853 3854 3855 3856 3857 3858 3859 3860 3861 3862
/*
 * If there are messages in the queue or pretimeouts, handle them.
 */
static void handle_new_recv_msgs(ipmi_smi_t intf)
{
	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)
		spin_lock_irqsave(&intf->waiting_msgs_lock, flags);
	while (!list_empty(&intf->waiting_msgs)) {
		smi_msg = list_entry(intf->waiting_msgs.next,
				     struct ipmi_smi_msg, link);
		list_del(&smi_msg->link);
		if (!run_to_completion)
			spin_unlock_irqrestore(&intf->waiting_msgs_lock, flags);
		rv = handle_one_recv_msg(intf, smi_msg);
		if (!run_to_completion)
			spin_lock_irqsave(&intf->waiting_msgs_lock, flags);
		if (rv == 0) {
			/* Message handled */
			ipmi_free_smi_msg(smi_msg);
		} else if (rv < 0) {
			/* Fatal error on the message, del but don't free. */
		} else {
			/*
			 * To preserve message order, quit if we
			 * can't handle a message.
			 */
			list_add(&smi_msg->link, &intf->waiting_msgs);
			break;
		}
	}
	if (!run_to_completion)
		spin_unlock_irqrestore(&intf->waiting_msgs_lock, flags);

	/*
	 * 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)) {
		ipmi_user_t user;

		rcu_read_lock();
		list_for_each_entry_rcu(user, &intf->users, link) {
			if (user->handler->ipmi_watchdog_pretimeout)
				user->handler->ipmi_watchdog_pretimeout(
					user->handler_data);
		}
		rcu_read_unlock();
	}
}

static void smi_recv_tasklet(unsigned long val)
{
	handle_new_recv_msgs((ipmi_smi_t) val);
}

L
Linus Torvalds 已提交
3863 3864 3865 3866
/* Handle a new message from the lower layer. */
void ipmi_smi_msg_received(ipmi_smi_t          intf,
			   struct ipmi_smi_msg *msg)
{
3867 3868
	unsigned long flags = 0; /* keep us warning-free. */
	int           run_to_completion;
L
Linus Torvalds 已提交
3869 3870 3871 3872 3873


	if ((msg->data_size >= 2)
	    && (msg->data[0] == (IPMI_NETFN_APP_REQUEST << 2))
	    && (msg->data[1] == IPMI_SEND_MSG_CMD)
3874 3875 3876 3877 3878 3879 3880 3881 3882 3883 3884 3885 3886 3887
	    && (msg->user_data == NULL)) {
		/*
		 * 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 已提交
3888 3889
		if ((msg->rsp_size >= 3) && (msg->rsp[2] != 0)
		    && (msg->rsp[2] != IPMI_NODE_BUSY_ERR)
3890 3891
		    && (msg->rsp[2] != IPMI_LOST_ARBITRATION_ERR)
		    && (msg->rsp[2] != IPMI_BUS_ERR)
3892
		    && (msg->rsp[2] != IPMI_NAK_ON_WRITE_ERR)) {
L
Linus Torvalds 已提交
3893 3894 3895 3896 3897 3898 3899 3900 3901
			int chan = msg->rsp[3] & 0xf;

			/* Got an error sending the message, handle it. */
			if (chan >= IPMI_MAX_CHANNELS)
				; /* This shouldn't happen */
			else if ((intf->channels[chan].medium
				  == IPMI_CHANNEL_MEDIUM_8023LAN)
				 || (intf->channels[chan].medium
				     == IPMI_CHANNEL_MEDIUM_ASYNC))
3902
				ipmi_inc_stat(intf, sent_lan_command_errs);
L
Linus Torvalds 已提交
3903
			else
3904
				ipmi_inc_stat(intf, sent_ipmb_command_errs);
L
Linus Torvalds 已提交
3905
			intf_err_seq(intf, msg->msgid, msg->rsp[2]);
3906
		} else
L
Linus Torvalds 已提交
3907 3908 3909 3910
			/* The message was sent, start the timer. */
			intf_start_seq_timer(intf, msg->msgid);

		ipmi_free_smi_msg(msg);
3911
		goto out;
L
Linus Torvalds 已提交
3912 3913
	}

3914 3915 3916 3917
	/*
	 * To preserve message order, if the list is not empty, we
	 * tack this message onto the end of the list.
	 */
3918 3919 3920
	run_to_completion = intf->run_to_completion;
	if (!run_to_completion)
		spin_lock_irqsave(&intf->waiting_msgs_lock, flags);
3921
	list_add_tail(&msg->link, &intf->waiting_msgs);
3922 3923
	if (!run_to_completion)
		spin_unlock_irqrestore(&intf->waiting_msgs_lock, flags);
3924

3925
	tasklet_schedule(&intf->recv_tasklet);
3926 3927
 out:
	return;
L
Linus Torvalds 已提交
3928
}
3929
EXPORT_SYMBOL(ipmi_smi_msg_received);
L
Linus Torvalds 已提交
3930 3931 3932

void ipmi_smi_watchdog_pretimeout(ipmi_smi_t intf)
{
3933 3934
	atomic_set(&intf->watchdog_pretimeouts_to_deliver, 1);
	tasklet_schedule(&intf->recv_tasklet);
L
Linus Torvalds 已提交
3935
}
3936
EXPORT_SYMBOL(ipmi_smi_watchdog_pretimeout);
L
Linus Torvalds 已提交
3937

C
Corey Minyard 已提交
3938 3939 3940
static struct ipmi_smi_msg *
smi_from_recv_msg(ipmi_smi_t intf, struct ipmi_recv_msg *recv_msg,
		  unsigned char seq, long seqid)
L
Linus Torvalds 已提交
3941
{
C
Corey Minyard 已提交
3942
	struct ipmi_smi_msg *smi_msg = ipmi_alloc_smi_msg();
L
Linus Torvalds 已提交
3943
	if (!smi_msg)
3944 3945 3946 3947
		/*
		 * If we can't allocate the message, then just return, we
		 * get 4 retries, so this should be ok.
		 */
C
Corey Minyard 已提交
3948
		return NULL;
L
Linus Torvalds 已提交
3949 3950 3951 3952

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

L
Linus Torvalds 已提交
3954 3955 3956 3957
#ifdef DEBUG_MSGING
	{
		int m;
		printk("Resend: ");
C
Corey Minyard 已提交
3958
		for (m = 0; m < smi_msg->data_size; m++)
L
Linus Torvalds 已提交
3959 3960 3961 3962
			printk(" %2.2x", smi_msg->data[m]);
		printk("\n");
	}
#endif
C
Corey Minyard 已提交
3963
	return smi_msg;
L
Linus Torvalds 已提交
3964 3965
}

3966 3967 3968 3969
static void check_msg_timeout(ipmi_smi_t intf, struct seq_table *ent,
			      struct list_head *timeouts, long timeout_period,
			      int slot, unsigned long *flags)
{
3970 3971 3972 3973 3974
	struct ipmi_recv_msg     *msg;
	struct ipmi_smi_handlers *handlers;

	if (intf->intf_num == -1)
		return;
3975 3976 3977 3978 3979 3980 3981 3982 3983 3984 3985 3986 3987 3988

	if (!ent->inuse)
		return;

	ent->timeout -= timeout_period;
	if (ent->timeout > 0)
		return;

	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)
3989
			ipmi_inc_stat(intf, timed_out_ipmb_broadcasts);
3990
		else if (is_lan_addr(&ent->recv_msg->addr))
3991
			ipmi_inc_stat(intf, timed_out_lan_commands);
3992
		else
3993
			ipmi_inc_stat(intf, timed_out_ipmb_commands);
3994 3995 3996 3997
	} else {
		struct ipmi_smi_msg *smi_msg;
		/* More retries, send again. */

3998 3999 4000 4001
		/*
		 * Start with the max timer, set to normal timer after
		 * the message is sent.
		 */
4002 4003 4004 4005
		ent->timeout = MAX_MSG_TIMEOUT;
		ent->retries_left--;
		smi_msg = smi_from_recv_msg(intf, ent->recv_msg, slot,
					    ent->seqid);
4006 4007 4008 4009 4010 4011 4012
		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);
4013
			return;
4014
		}
4015 4016

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

4018 4019 4020 4021 4022 4023 4024
		/*
		 * 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.
		 */
4025
		handlers = intf->handlers;
4026 4027 4028 4029 4030 4031 4032 4033
		if (handlers) {
			if (is_lan_addr(&ent->recv_msg->addr))
				ipmi_inc_stat(intf,
					      retransmitted_lan_commands);
			else
				ipmi_inc_stat(intf,
					      retransmitted_ipmb_commands);

4034 4035
			intf->handlers->sender(intf->send_info,
					       smi_msg, 0);
4036
		} else
4037 4038
			ipmi_free_smi_msg(smi_msg);

4039 4040 4041 4042 4043
		spin_lock_irqsave(&intf->seq_lock, *flags);
	}
}

static void ipmi_timeout_handler(long timeout_period)
L
Linus Torvalds 已提交
4044 4045 4046 4047 4048
{
	ipmi_smi_t           intf;
	struct list_head     timeouts;
	struct ipmi_recv_msg *msg, *msg2;
	unsigned long        flags;
4049
	int                  i;
L
Linus Torvalds 已提交
4050

4051 4052
	rcu_read_lock();
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
4053
		tasklet_schedule(&intf->recv_tasklet);
L
Linus Torvalds 已提交
4054

4055 4056 4057 4058 4059
		/*
		 * Go through the seq table and find any messages that
		 * have timed out, putting them in the timeouts
		 * list.
		 */
4060
		INIT_LIST_HEAD(&timeouts);
4061
		spin_lock_irqsave(&intf->seq_lock, flags);
4062 4063 4064
		for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++)
			check_msg_timeout(intf, &(intf->seq_table[i]),
					  &timeouts, timeout_period, i,
4065 4066 4067 4068
					  &flags);
		spin_unlock_irqrestore(&intf->seq_lock, flags);

		list_for_each_entry_safe(msg, msg2, &timeouts, link)
4069
			deliver_err_response(msg, IPMI_TIMEOUT_COMPLETION_CODE);
C
Corey Minyard 已提交
4070 4071 4072 4073 4074 4075 4076 4077 4078 4079 4080 4081 4082 4083 4084

		/*
		 * 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);
			if (intf->auto_maintenance_timeout > 0) {
				intf->auto_maintenance_timeout
					-= timeout_period;
				if (!intf->maintenance_mode
4085
				    && (intf->auto_maintenance_timeout <= 0)) {
C
Corey Minyard 已提交
4086 4087 4088 4089 4090 4091 4092
					intf->maintenance_mode_enable = 0;
					maintenance_mode_update(intf);
				}
			}
			spin_unlock_irqrestore(&intf->maintenance_mode_lock,
					       flags);
		}
L
Linus Torvalds 已提交
4093
	}
4094
	rcu_read_unlock();
L
Linus Torvalds 已提交
4095 4096 4097 4098
}

static void ipmi_request_event(void)
{
4099 4100
	ipmi_smi_t               intf;
	struct ipmi_smi_handlers *handlers;
L
Linus Torvalds 已提交
4101

4102
	rcu_read_lock();
4103 4104 4105 4106
	/*
	 * Called from the timer, no need to check if handlers is
	 * valid.
	 */
4107
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
C
Corey Minyard 已提交
4108 4109 4110 4111
		/* No event requests when in maintenance mode. */
		if (intf->maintenance_mode_enable)
			continue;

4112 4113 4114 4115
		handlers = intf->handlers;
		if (handlers)
			handlers->request_events(intf->send_info);
	}
4116
	rcu_read_unlock();
L
Linus Torvalds 已提交
4117 4118 4119 4120
}

static struct timer_list ipmi_timer;

4121 4122
/* Call every ~1000 ms. */
#define IPMI_TIMEOUT_TIME	1000
L
Linus Torvalds 已提交
4123 4124 4125 4126

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

4127 4128 4129 4130 4131 4132
/*
 * 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.
 */
L
Linus Torvalds 已提交
4133 4134
#define IPMI_REQUEST_EV_TIME	(1000 / (IPMI_TIMEOUT_TIME))

4135
static atomic_t stop_operation;
L
Linus Torvalds 已提交
4136 4137 4138 4139
static unsigned int ticks_to_req_ev = IPMI_REQUEST_EV_TIME;

static void ipmi_timeout(unsigned long data)
{
4140
	if (atomic_read(&stop_operation))
L
Linus Torvalds 已提交
4141 4142 4143 4144 4145 4146 4147 4148 4149 4150
		return;

	ticks_to_req_ev--;
	if (ticks_to_req_ev == 0) {
		ipmi_request_event();
		ticks_to_req_ev = IPMI_REQUEST_EV_TIME;
	}

	ipmi_timeout_handler(IPMI_TIMEOUT_TIME);

4151
	mod_timer(&ipmi_timer, jiffies + IPMI_TIMEOUT_JIFFIES);
L
Linus Torvalds 已提交
4152 4153 4154 4155 4156 4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167 4168 4169 4170 4171 4172 4173 4174 4175
}


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

/* FIXME - convert these to slabs. */
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;
}
4176
EXPORT_SYMBOL(ipmi_alloc_smi_msg);
L
Linus Torvalds 已提交
4177 4178 4179 4180 4181 4182 4183

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

A
Adrian Bunk 已提交
4184
static struct ipmi_recv_msg *ipmi_alloc_recv_msg(void)
L
Linus Torvalds 已提交
4185 4186 4187 4188 4189
{
	struct ipmi_recv_msg *rv;

	rv = kmalloc(sizeof(struct ipmi_recv_msg), GFP_ATOMIC);
	if (rv) {
4190
		rv->user = NULL;
L
Linus Torvalds 已提交
4191 4192 4193 4194 4195 4196
		rv->done = free_recv_msg;
		atomic_inc(&recv_msg_inuse_count);
	}
	return rv;
}

4197 4198 4199 4200 4201 4202
void ipmi_free_recv_msg(struct ipmi_recv_msg *msg)
{
	if (msg->user)
		kref_put(&msg->user->refcount, free_user);
	msg->done(msg);
}
4203
EXPORT_SYMBOL(ipmi_free_recv_msg);
4204

L
Linus Torvalds 已提交
4205 4206
#ifdef CONFIG_IPMI_PANIC_EVENT

4207 4208
static atomic_t panic_done_count = ATOMIC_INIT(0);

L
Linus Torvalds 已提交
4209 4210
static void dummy_smi_done_handler(struct ipmi_smi_msg *msg)
{
4211
	atomic_dec(&panic_done_count);
L
Linus Torvalds 已提交
4212 4213 4214 4215
}

static void dummy_recv_done_handler(struct ipmi_recv_msg *msg)
{
4216 4217 4218 4219 4220 4221 4222 4223 4224 4225 4226 4227 4228 4229 4230 4231 4232 4233 4234 4235 4236 4237 4238 4239 4240 4241 4242 4243 4244 4245 4246 4247 4248
	atomic_dec(&panic_done_count);
}

/*
 * Inside a panic, send a message and wait for a response.
 */
static void ipmi_panic_request_and_wait(ipmi_smi_t           intf,
					struct ipmi_addr     *addr,
					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,
			    intf->channels[0].address,
			    intf->channels[0].lun,
			    0, 1); /* Don't retry, and don't wait. */
	if (rv)
		atomic_sub(2, &panic_done_count);
	while (atomic_read(&panic_done_count) != 0)
		ipmi_poll(intf);
L
Linus Torvalds 已提交
4249 4250 4251
}

#ifdef CONFIG_IPMI_PANIC_STRING
4252
static void event_receiver_fetcher(ipmi_smi_t intf, struct ipmi_recv_msg *msg)
L
Linus Torvalds 已提交
4253
{
4254 4255 4256
	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)
4257
	    && (msg->msg.data[0] == IPMI_CC_NO_ERROR)) {
L
Linus Torvalds 已提交
4258
		/* A get event receiver command, save it. */
4259 4260
		intf->event_receiver = msg->msg.data[1];
		intf->event_receiver_lun = msg->msg.data[2] & 0x3;
L
Linus Torvalds 已提交
4261 4262 4263
	}
}

4264
static void device_id_fetcher(ipmi_smi_t intf, struct ipmi_recv_msg *msg)
L
Linus Torvalds 已提交
4265
{
4266 4267 4268
	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)
4269 4270 4271 4272 4273
	    && (msg->msg.data[0] == IPMI_CC_NO_ERROR)) {
		/*
		 * A get device id command, save if we are an event
		 * receiver or generator.
		 */
4274 4275
		intf->local_sel_device = (msg->msg.data[6] >> 2) & 1;
		intf->local_event_generator = (msg->msg.data[6] >> 5) & 1;
L
Linus Torvalds 已提交
4276 4277 4278 4279 4280 4281 4282 4283 4284 4285 4286 4287 4288 4289 4290 4291 4292 4293 4294 4295 4296 4297
	}
}
#endif

static void send_panic_events(char *str)
{
	struct kernel_ipmi_msg            msg;
	ipmi_smi_t                        intf;
	unsigned char                     data[16];
	struct ipmi_system_interface_addr *si;
	struct ipmi_addr                  addr;

	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 已提交
4298
	data[0] = 0x41; /* Kernel generator ID, IPMI table 5-4 */
L
Linus Torvalds 已提交
4299 4300 4301 4302 4303
	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. */

4304 4305 4306 4307
	/*
	 * Put a few breadcrumbs in.  Hopefully later we can add more things
	 * to make the panic events more useful.
	 */
L
Linus Torvalds 已提交
4308 4309 4310 4311 4312 4313 4314
	if (str) {
		data[3] = str[0];
		data[6] = str[1];
		data[7] = str[2];
	}

	/* For every registered interface, send the event. */
4315
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
4316 4317
		if (!intf->handlers)
			/* Interface is not ready. */
L
Linus Torvalds 已提交
4318 4319
			continue;

4320
		intf->run_to_completion = 1;
L
Linus Torvalds 已提交
4321 4322
		/* Send the event announcing the panic. */
		intf->handlers->set_run_to_completion(intf->send_info, 1);
4323
		ipmi_panic_request_and_wait(intf, &addr, &msg);
L
Linus Torvalds 已提交
4324 4325 4326
	}

#ifdef CONFIG_IPMI_PANIC_STRING
4327 4328 4329 4330 4331
	/*
	 * On every interface, dump a bunch of OEM event holding the
	 * string.
	 */
	if (!str)
L
Linus Torvalds 已提交
4332 4333
		return;

4334 4335
	/* For every registered interface, send the event. */
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
L
Linus Torvalds 已提交
4336 4337 4338 4339
		char                  *p = str;
		struct ipmi_ipmb_addr *ipmb;
		int                   j;

4340 4341
		if (intf->intf_num == -1)
			/* Interface was not ready yet. */
L
Linus Torvalds 已提交
4342 4343
			continue;

4344 4345 4346 4347 4348 4349 4350 4351
		/*
		 * 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();

4352 4353 4354 4355 4356 4357 4358
		/*
		 * 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.
		 */
L
Linus Torvalds 已提交
4359 4360 4361 4362 4363 4364 4365 4366 4367 4368 4369 4370

		/* Get capabilities from the get device id. */
		intf->local_sel_device = 0;
		intf->local_event_generator = 0;
		intf->event_receiver = 0;

		/* 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;
4371
		ipmi_panic_request_and_wait(intf, &addr, &msg);
L
Linus Torvalds 已提交
4372 4373 4374 4375 4376 4377 4378 4379

		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;
			msg.data = NULL;
			msg.data_len = 0;
			intf->null_user_handler = event_receiver_fetcher;
4380
			ipmi_panic_request_and_wait(intf, &addr, &msg);
L
Linus Torvalds 已提交
4381 4382 4383
		}
		intf->null_user_handler = NULL;

4384 4385 4386 4387 4388 4389
		/*
		 * 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)
L
Linus Torvalds 已提交
4390
		    && (intf->event_receiver != 0)
4391 4392 4393 4394 4395
		    && (intf->event_receiver != intf->channels[0].address)) {
			/*
			 * The event receiver is valid, send an IPMB
			 * message.
			 */
L
Linus Torvalds 已提交
4396 4397 4398 4399 4400 4401
			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) {
4402 4403 4404 4405 4406
			/*
			 * The event receiver was not valid (or was
			 * me), but I am an SEL device, just dump it
			 * in my SEL.
			 */
L
Linus Torvalds 已提交
4407 4408 4409 4410 4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421 4422 4423 4424 4425 4426 4427
			si = (struct ipmi_system_interface_addr *) &addr;
			si->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
			si->channel = IPMI_BMC_CHANNEL;
			si->lun = 0;
		} else
			continue; /* No where to send the event. */

		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. */
4428
			data[3] = intf->channels[0].address;
L
Linus Torvalds 已提交
4429
			data[4] = j++; /* sequence # */
4430 4431 4432 4433
			/*
			 * Always give 11 bytes, so strncpy will fill
			 * it with zeroes for me.
			 */
L
Linus Torvalds 已提交
4434 4435 4436
			strncpy(data+5, p, 11);
			p += size;

4437
			ipmi_panic_request_and_wait(intf, &addr, &msg);
L
Linus Torvalds 已提交
4438
		}
4439
	}
L
Linus Torvalds 已提交
4440 4441 4442 4443
#endif /* CONFIG_IPMI_PANIC_STRING */
}
#endif /* CONFIG_IPMI_PANIC_EVENT */

R
Randy Dunlap 已提交
4444
static int has_panicked;
L
Linus Torvalds 已提交
4445 4446 4447

static int panic_event(struct notifier_block *this,
		       unsigned long         event,
4448
		       void                  *ptr)
L
Linus Torvalds 已提交
4449 4450 4451
{
	ipmi_smi_t intf;

L
Lee Revell 已提交
4452
	if (has_panicked)
L
Linus Torvalds 已提交
4453
		return NOTIFY_DONE;
L
Lee Revell 已提交
4454
	has_panicked = 1;
L
Linus Torvalds 已提交
4455 4456

	/* For every registered interface, set it to run to completion. */
4457
	list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
4458 4459
		if (!intf->handlers)
			/* Interface is not ready. */
L
Linus Torvalds 已提交
4460 4461
			continue;

4462
		intf->run_to_completion = 1;
L
Linus Torvalds 已提交
4463 4464 4465 4466 4467 4468 4469 4470 4471 4472 4473 4474 4475 4476 4477 4478 4479 4480
		intf->handlers->set_run_to_completion(intf->send_info, 1);
	}

#ifdef CONFIG_IPMI_PANIC_EVENT
	send_panic_events(ptr);
#endif

	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)
{
4481
	int rv;
L
Linus Torvalds 已提交
4482 4483 4484 4485

	if (initialized)
		return 0;

4486
	rv = driver_register(&ipmidriver.driver);
4487 4488 4489 4490 4491
	if (rv) {
		printk(KERN_ERR PFX "Could not register IPMI driver\n");
		return rv;
	}

L
Linus Torvalds 已提交
4492
	printk(KERN_INFO "ipmi message handler version "
4493
	       IPMI_DRIVER_VERSION "\n");
L
Linus Torvalds 已提交
4494

4495
#ifdef CONFIG_PROC_FS
L
Linus Torvalds 已提交
4496 4497 4498 4499 4500 4501
	proc_ipmi_root = proc_mkdir("ipmi", NULL);
	if (!proc_ipmi_root) {
	    printk(KERN_ERR PFX "Unable to create IPMI proc dir");
	    return -ENOMEM;
	}

4502
#endif /* CONFIG_PROC_FS */
L
Linus Torvalds 已提交
4503

4504 4505
	setup_timer(&ipmi_timer, ipmi_timeout, 0);
	mod_timer(&ipmi_timer, jiffies + IPMI_TIMEOUT_JIFFIES);
L
Linus Torvalds 已提交
4506

4507
	atomic_notifier_chain_register(&panic_notifier_list, &panic_block);
L
Linus Torvalds 已提交
4508 4509 4510 4511 4512 4513

	initialized = 1;

	return 0;
}

4514
static int __init ipmi_init_msghandler_mod(void)
L
Linus Torvalds 已提交
4515 4516 4517 4518 4519
{
	ipmi_init_msghandler();
	return 0;
}

4520
static void __exit cleanup_ipmi(void)
L
Linus Torvalds 已提交
4521 4522 4523 4524 4525 4526
{
	int count;

	if (!initialized)
		return;

4527
	atomic_notifier_chain_unregister(&panic_notifier_list, &panic_block);
L
Linus Torvalds 已提交
4528

4529 4530 4531 4532
	/*
	 * This can't be called if any interfaces exist, so no worry
	 * about shutting down the interfaces.
	 */
L
Linus Torvalds 已提交
4533

4534 4535 4536 4537 4538
	/*
	 * Tell the timer to stop, then wait for it to stop.  This
	 * avoids problems with race conditions removing the timer
	 * here.
	 */
4539 4540
	atomic_inc(&stop_operation);
	del_timer_sync(&ipmi_timer);
L
Linus Torvalds 已提交
4541

4542
#ifdef CONFIG_PROC_FS
4543
	proc_remove(proc_ipmi_root);
4544
#endif /* CONFIG_PROC_FS */
L
Linus Torvalds 已提交
4545

4546
	driver_unregister(&ipmidriver.driver);
4547

L
Linus Torvalds 已提交
4548 4549 4550 4551 4552 4553 4554 4555 4556 4557 4558 4559 4560 4561 4562 4563
	initialized = 0;

	/* Check for buffer leaks. */
	count = atomic_read(&smi_msg_inuse_count);
	if (count != 0)
		printk(KERN_WARNING PFX "SMI message count %d at exit\n",
		       count);
	count = atomic_read(&recv_msg_inuse_count);
	if (count != 0)
		printk(KERN_WARNING PFX "recv message count %d at exit\n",
		       count);
}
module_exit(cleanup_ipmi);

module_init(ipmi_init_msghandler_mod);
MODULE_LICENSE("GPL");
4564
MODULE_AUTHOR("Corey Minyard <minyard@mvista.com>");
4565 4566
MODULE_DESCRIPTION("Incoming and outgoing message routing for an IPMI"
		   " interface.");
4567
MODULE_VERSION(IPMI_DRIVER_VERSION);