projects / GitHub / mt8127 / android_kernel_alcatel_ttab.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Merge branch 's3c-fixes-rc4' of git://aeryn.fluff.org.uk/bjdooks/linux
[GitHub/mt8127/android_kernel_alcatel_ttab.git] / drivers / char / ipmi / ipmi_msghandler.c
1 /*
2 * ipmi_msghandler.c
3 *
4 * Incoming and outgoing message routing for an IPMI interface.
5 *
6 * Author: MontaVista Software, Inc.
7 * Corey Minyard <minyard@mvista.com>
8 * source@mvista.com
9 *
10 * Copyright 2002 MontaVista Software Inc.
11 *
12 * This program is free software; you can redistribute it and/or modify it
13 * under the terms of the GNU General Public License as published by the
14 * Free Software Foundation; either version 2 of the License, or (at your
15 * option) any later version.
16 *
17 *
18 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
19 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
20 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
23 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
24 * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
25 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
26 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
27 * USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 *
29 * You should have received a copy of the GNU General Public License along
30 * with this program; if not, write to the Free Software Foundation, Inc.,
31 * 675 Mass Ave, Cambridge, MA 02139, USA.
32 */
33
34 #include <linux/module.h>
35 #include <linux/errno.h>
36 #include <asm/system.h>
37 #include <linux/poll.h>
38 #include <linux/spinlock.h>
39 #include <linux/mutex.h>
40 #include <linux/slab.h>
41 #include <linux/ipmi.h>
42 #include <linux/ipmi_smi.h>
43 #include <linux/notifier.h>
44 #include <linux/init.h>
45 #include <linux/proc_fs.h>
46 #include <linux/rcupdate.h>
47
48 #define PFX "IPMI message handler: "
49
50 #define IPMI_DRIVER_VERSION "39.2"
51
52 static struct ipmi_recv_msg *ipmi_alloc_recv_msg(void);
53 static int ipmi_init_msghandler(void);
54
55 static int initialized;
56
57 #ifdef CONFIG_PROC_FS
58 static struct proc_dir_entry *proc_ipmi_root;
59 #endif /* CONFIG_PROC_FS */
60
61 /* Remain in auto-maintenance mode for this amount of time (in ms). */
62 #define IPMI_MAINTENANCE_MODE_TIMEOUT 30000
63
64 #define MAX_EVENTS_IN_QUEUE 25
65
66 /*
67 * Don't let a message sit in a queue forever, always time it with at lest
68 * the max message timer. This is in milliseconds.
69 */
70 #define MAX_MSG_TIMEOUT 60000
71
72 /*
73 * The main "user" data structure.
74 */
75 struct ipmi_user {
76 struct list_head link;
77
78 /* Set to "0" when the user is destroyed. */
79 int valid;
80
81 struct kref refcount;
82
83 /* The upper layer that handles receive messages. */
84 struct ipmi_user_hndl *handler;
85 void *handler_data;
86
87 /* The interface this user is bound to. */
88 ipmi_smi_t intf;
89
90 /* Does this interface receive IPMI events? */
91 int gets_events;
92 };
93
94 struct cmd_rcvr {
95 struct list_head link;
96
97 ipmi_user_t user;
98 unsigned char netfn;
99 unsigned char cmd;
100 unsigned int chans;
101
102 /*
103 * This is used to form a linked lised during mass deletion.
104 * Since this is in an RCU list, we cannot use the link above
105 * or change any data until the RCU period completes. So we
106 * use this next variable during mass deletion so we can have
107 * a list and don't have to wait and restart the search on
108 * every individual deletion of a command.
109 */
110 struct cmd_rcvr *next;
111 };
112
113 struct seq_table {
114 unsigned int inuse : 1;
115 unsigned int broadcast : 1;
116
117 unsigned long timeout;
118 unsigned long orig_timeout;
119 unsigned int retries_left;
120
121 /*
122 * To verify on an incoming send message response that this is
123 * the message that the response is for, we keep a sequence id
124 * and increment it every time we send a message.
125 */
126 long seqid;
127
128 /*
129 * This is held so we can properly respond to the message on a
130 * timeout, and it is used to hold the temporary data for
131 * retransmission, too.
132 */
133 struct ipmi_recv_msg *recv_msg;
134 };
135
136 /*
137 * Store the information in a msgid (long) to allow us to find a
138 * sequence table entry from the msgid.
139 */
140 #define STORE_SEQ_IN_MSGID(seq, seqid) (((seq&0xff)<<26) | (seqid&0x3ffffff))
141
142 #define GET_SEQ_FROM_MSGID(msgid, seq, seqid) \
143 do { \
144 seq = ((msgid >> 26) & 0x3f); \
145 seqid = (msgid & 0x3fffff); \
146 } while (0)
147
148 #define NEXT_SEQID(seqid) (((seqid) + 1) & 0x3fffff)
149
150 struct ipmi_channel {
151 unsigned char medium;
152 unsigned char protocol;
153
154 /*
155 * My slave address. This is initialized to IPMI_BMC_SLAVE_ADDR,
156 * but may be changed by the user.
157 */
158 unsigned char address;
159
160 /*
161 * My LUN. This should generally stay the SMS LUN, but just in
162 * case...
163 */
164 unsigned char lun;
165 };
166
167 #ifdef CONFIG_PROC_FS
168 struct ipmi_proc_entry {
169 char *name;
170 struct ipmi_proc_entry *next;
171 };
172 #endif
173
174 struct bmc_device {
175 struct platform_device *dev;
176 struct ipmi_device_id id;
177 unsigned char guid[16];
178 int guid_set;
179
180 struct kref refcount;
181
182 /* bmc device attributes */
183 struct device_attribute device_id_attr;
184 struct device_attribute provides_dev_sdrs_attr;
185 struct device_attribute revision_attr;
186 struct device_attribute firmware_rev_attr;
187 struct device_attribute version_attr;
188 struct device_attribute add_dev_support_attr;
189 struct device_attribute manufacturer_id_attr;
190 struct device_attribute product_id_attr;
191 struct device_attribute guid_attr;
192 struct device_attribute aux_firmware_rev_attr;
193 };
194
195 /*
196 * Various statistics for IPMI, these index stats[] in the ipmi_smi
197 * structure.
198 */
199 enum ipmi_stat_indexes {
200 /* Commands we got from the user that were invalid. */
201 IPMI_STAT_sent_invalid_commands = 0,
202
203 /* Commands we sent to the MC. */
204 IPMI_STAT_sent_local_commands,
205
206 /* Responses from the MC that were delivered to a user. */
207 IPMI_STAT_handled_local_responses,
208
209 /* Responses from the MC that were not delivered to a user. */
210 IPMI_STAT_unhandled_local_responses,
211
212 /* Commands we sent out to the IPMB bus. */
213 IPMI_STAT_sent_ipmb_commands,
214
215 /* Commands sent on the IPMB that had errors on the SEND CMD */
216 IPMI_STAT_sent_ipmb_command_errs,
217
218 /* Each retransmit increments this count. */
219 IPMI_STAT_retransmitted_ipmb_commands,
220
221 /*
222 * When a message times out (runs out of retransmits) this is
223 * incremented.
224 */
225 IPMI_STAT_timed_out_ipmb_commands,
226
227 /*
228 * This is like above, but for broadcasts. Broadcasts are
229 * *not* included in the above count (they are expected to
230 * time out).
231 */
232 IPMI_STAT_timed_out_ipmb_broadcasts,
233
234 /* Responses I have sent to the IPMB bus. */
235 IPMI_STAT_sent_ipmb_responses,
236
237 /* The response was delivered to the user. */
238 IPMI_STAT_handled_ipmb_responses,
239
240 /* The response had invalid data in it. */
241 IPMI_STAT_invalid_ipmb_responses,
242
243 /* The response didn't have anyone waiting for it. */
244 IPMI_STAT_unhandled_ipmb_responses,
245
246 /* Commands we sent out to the IPMB bus. */
247 IPMI_STAT_sent_lan_commands,
248
249 /* Commands sent on the IPMB that had errors on the SEND CMD */
250 IPMI_STAT_sent_lan_command_errs,
251
252 /* Each retransmit increments this count. */
253 IPMI_STAT_retransmitted_lan_commands,
254
255 /*
256 * When a message times out (runs out of retransmits) this is
257 * incremented.
258 */
259 IPMI_STAT_timed_out_lan_commands,
260
261 /* Responses I have sent to the IPMB bus. */
262 IPMI_STAT_sent_lan_responses,
263
264 /* The response was delivered to the user. */
265 IPMI_STAT_handled_lan_responses,
266
267 /* The response had invalid data in it. */
268 IPMI_STAT_invalid_lan_responses,
269
270 /* The response didn't have anyone waiting for it. */
271 IPMI_STAT_unhandled_lan_responses,
272
273 /* The command was delivered to the user. */
274 IPMI_STAT_handled_commands,
275
276 /* The command had invalid data in it. */
277 IPMI_STAT_invalid_commands,
278
279 /* The command didn't have anyone waiting for it. */
280 IPMI_STAT_unhandled_commands,
281
282 /* Invalid data in an event. */
283 IPMI_STAT_invalid_events,
284
285 /* Events that were received with the proper format. */
286 IPMI_STAT_events,
287
288 /* Retransmissions on IPMB that failed. */
289 IPMI_STAT_dropped_rexmit_ipmb_commands,
290
291 /* Retransmissions on LAN that failed. */
292 IPMI_STAT_dropped_rexmit_lan_commands,
293
294 /* This *must* remain last, add new values above this. */
295 IPMI_NUM_STATS
296 };
297
298
299 #define IPMI_IPMB_NUM_SEQ 64
300 #define IPMI_MAX_CHANNELS 16
301 struct ipmi_smi {
302 /* What interface number are we? */
303 int intf_num;
304
305 struct kref refcount;
306
307 /* Used for a list of interfaces. */
308 struct list_head link;
309
310 /*
311 * The list of upper layers that are using me. seq_lock
312 * protects this.
313 */
314 struct list_head users;
315
316 /* Information to supply to users. */
317 unsigned char ipmi_version_major;
318 unsigned char ipmi_version_minor;
319
320 /* Used for wake ups at startup. */
321 wait_queue_head_t waitq;
322
323 struct bmc_device *bmc;
324 char *my_dev_name;
325 char *sysfs_name;
326
327 /*
328 * This is the lower-layer's sender routine. Note that you
329 * must either be holding the ipmi_interfaces_mutex or be in
330 * an umpreemptible region to use this. You must fetch the
331 * value into a local variable and make sure it is not NULL.
332 */
333 struct ipmi_smi_handlers *handlers;
334 void *send_info;
335
336 #ifdef CONFIG_PROC_FS
337 /* A list of proc entries for this interface. */
338 struct mutex proc_entry_lock;
339 struct ipmi_proc_entry *proc_entries;
340 #endif
341
342 /* Driver-model device for the system interface. */
343 struct device *si_dev;
344
345 /*
346 * A table of sequence numbers for this interface. We use the
347 * sequence numbers for IPMB messages that go out of the
348 * interface to match them up with their responses. A routine
349 * is called periodically to time the items in this list.
350 */
351 spinlock_t seq_lock;
352 struct seq_table seq_table[IPMI_IPMB_NUM_SEQ];
353 int curr_seq;
354
355 /*
356 * Messages that were delayed for some reason (out of memory,
357 * for instance), will go in here to be processed later in a
358 * periodic timer interrupt.
359 */
360 spinlock_t waiting_msgs_lock;
361 struct list_head waiting_msgs;
362
363 /*
364 * The list of command receivers that are registered for commands
365 * on this interface.
366 */
367 struct mutex cmd_rcvrs_mutex;
368 struct list_head cmd_rcvrs;
369
370 /*
371 * Events that were queues because no one was there to receive
372 * them.
373 */
374 spinlock_t events_lock; /* For dealing with event stuff. */
375 struct list_head waiting_events;
376 unsigned int waiting_events_count; /* How many events in queue? */
377 char delivering_events;
378 char event_msg_printed;
379
380 /*
381 * The event receiver for my BMC, only really used at panic
382 * shutdown as a place to store this.
383 */
384 unsigned char event_receiver;
385 unsigned char event_receiver_lun;
386 unsigned char local_sel_device;
387 unsigned char local_event_generator;
388
389 /* For handling of maintenance mode. */
390 int maintenance_mode;
391 int maintenance_mode_enable;
392 int auto_maintenance_timeout;
393 spinlock_t maintenance_mode_lock; /* Used in a timer... */
394
395 /*
396 * A cheap hack, if this is non-null and a message to an
397 * interface comes in with a NULL user, call this routine with
398 * it. Note that the message will still be freed by the
399 * caller. This only works on the system interface.
400 */
401 void (*null_user_handler)(ipmi_smi_t intf, struct ipmi_recv_msg *msg);
402
403 /*
404 * When we are scanning the channels for an SMI, this will
405 * tell which channel we are scanning.
406 */
407 int curr_channel;
408
409 /* Channel information */
410 struct ipmi_channel channels[IPMI_MAX_CHANNELS];
411
412 /* Proc FS stuff. */
413 struct proc_dir_entry *proc_dir;
414 char proc_dir_name[10];
415
416 atomic_t stats[IPMI_NUM_STATS];
417
418 /*
419 * run_to_completion duplicate of smb_info, smi_info
420 * and ipmi_serial_info structures. Used to decrease numbers of
421 * parameters passed by "low" level IPMI code.
422 */
423 int run_to_completion;
424 };
425 #define to_si_intf_from_dev(device) container_of(device, struct ipmi_smi, dev)
426
427 /**
428 * The driver model view of the IPMI messaging driver.
429 */
430 static struct platform_driver ipmidriver = {
431 .driver = {
432 .name = "ipmi",
433 .bus = &platform_bus_type
434 }
435 };
436 static DEFINE_MUTEX(ipmidriver_mutex);
437
438 static LIST_HEAD(ipmi_interfaces);
439 static DEFINE_MUTEX(ipmi_interfaces_mutex);
440
441 /*
442 * List of watchers that want to know when smi's are added and deleted.
443 */
444 static LIST_HEAD(smi_watchers);
445 static DEFINE_MUTEX(smi_watchers_mutex);
446
447
448 #define ipmi_inc_stat(intf, stat) \
449 atomic_inc(&(intf)->stats[IPMI_STAT_ ## stat])
450 #define ipmi_get_stat(intf, stat) \
451 ((unsigned int) atomic_read(&(intf)->stats[IPMI_STAT_ ## stat]))
452
453 static int is_lan_addr(struct ipmi_addr *addr)
454 {
455 return addr->addr_type == IPMI_LAN_ADDR_TYPE;
456 }
457
458 static int is_ipmb_addr(struct ipmi_addr *addr)
459 {
460 return addr->addr_type == IPMI_IPMB_ADDR_TYPE;
461 }
462
463 static int is_ipmb_bcast_addr(struct ipmi_addr *addr)
464 {
465 return addr->addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE;
466 }
467
468 static void free_recv_msg_list(struct list_head *q)
469 {
470 struct ipmi_recv_msg *msg, *msg2;
471
472 list_for_each_entry_safe(msg, msg2, q, link) {
473 list_del(&msg->link);
474 ipmi_free_recv_msg(msg);
475 }
476 }
477
478 static void free_smi_msg_list(struct list_head *q)
479 {
480 struct ipmi_smi_msg *msg, *msg2;
481
482 list_for_each_entry_safe(msg, msg2, q, link) {
483 list_del(&msg->link);
484 ipmi_free_smi_msg(msg);
485 }
486 }
487
488 static void clean_up_interface_data(ipmi_smi_t intf)
489 {
490 int i;
491 struct cmd_rcvr *rcvr, *rcvr2;
492 struct list_head list;
493
494 free_smi_msg_list(&intf->waiting_msgs);
495 free_recv_msg_list(&intf->waiting_events);
496
497 /*
498 * Wholesale remove all the entries from the list in the
499 * interface and wait for RCU to know that none are in use.
500 */
501 mutex_lock(&intf->cmd_rcvrs_mutex);
502 INIT_LIST_HEAD(&list);
503 list_splice_init_rcu(&intf->cmd_rcvrs, &list, synchronize_rcu);
504 mutex_unlock(&intf->cmd_rcvrs_mutex);
505
506 list_for_each_entry_safe(rcvr, rcvr2, &list, link)
507 kfree(rcvr);
508
509 for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++) {
510 if ((intf->seq_table[i].inuse)
511 && (intf->seq_table[i].recv_msg))
512 ipmi_free_recv_msg(intf->seq_table[i].recv_msg);
513 }
514 }
515
516 static void intf_free(struct kref *ref)
517 {
518 ipmi_smi_t intf = container_of(ref, struct ipmi_smi, refcount);
519
520 clean_up_interface_data(intf);
521 kfree(intf);
522 }
523
524 struct watcher_entry {
525 int intf_num;
526 ipmi_smi_t intf;
527 struct list_head link;
528 };
529
530 int ipmi_smi_watcher_register(struct ipmi_smi_watcher *watcher)
531 {
532 ipmi_smi_t intf;
533 LIST_HEAD(to_deliver);
534 struct watcher_entry *e, *e2;
535
536 mutex_lock(&smi_watchers_mutex);
537
538 mutex_lock(&ipmi_interfaces_mutex);
539
540 /* Build a list of things to deliver. */
541 list_for_each_entry(intf, &ipmi_interfaces, link) {
542 if (intf->intf_num == -1)
543 continue;
544 e = kmalloc(sizeof(*e), GFP_KERNEL);
545 if (!e)
546 goto out_err;
547 kref_get(&intf->refcount);
548 e->intf = intf;
549 e->intf_num = intf->intf_num;
550 list_add_tail(&e->link, &to_deliver);
551 }
552
553 /* We will succeed, so add it to the list. */
554 list_add(&watcher->link, &smi_watchers);
555
556 mutex_unlock(&ipmi_interfaces_mutex);
557
558 list_for_each_entry_safe(e, e2, &to_deliver, link) {
559 list_del(&e->link);
560 watcher->new_smi(e->intf_num, e->intf->si_dev);
561 kref_put(&e->intf->refcount, intf_free);
562 kfree(e);
563 }
564
565 mutex_unlock(&smi_watchers_mutex);
566
567 return 0;
568
569 out_err:
570 mutex_unlock(&ipmi_interfaces_mutex);
571 mutex_unlock(&smi_watchers_mutex);
572 list_for_each_entry_safe(e, e2, &to_deliver, link) {
573 list_del(&e->link);
574 kref_put(&e->intf->refcount, intf_free);
575 kfree(e);
576 }
577 return -ENOMEM;
578 }
579 EXPORT_SYMBOL(ipmi_smi_watcher_register);
580
581 int ipmi_smi_watcher_unregister(struct ipmi_smi_watcher *watcher)
582 {
583 mutex_lock(&smi_watchers_mutex);
584 list_del(&(watcher->link));
585 mutex_unlock(&smi_watchers_mutex);
586 return 0;
587 }
588 EXPORT_SYMBOL(ipmi_smi_watcher_unregister);
589
590 /*
591 * Must be called with smi_watchers_mutex held.
592 */
593 static void
594 call_smi_watchers(int i, struct device *dev)
595 {
596 struct ipmi_smi_watcher *w;
597
598 list_for_each_entry(w, &smi_watchers, link) {
599 if (try_module_get(w->owner)) {
600 w->new_smi(i, dev);
601 module_put(w->owner);
602 }
603 }
604 }
605
606 static int
607 ipmi_addr_equal(struct ipmi_addr *addr1, struct ipmi_addr *addr2)
608 {
609 if (addr1->addr_type != addr2->addr_type)
610 return 0;
611
612 if (addr1->channel != addr2->channel)
613 return 0;
614
615 if (addr1->addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE) {
616 struct ipmi_system_interface_addr *smi_addr1
617 = (struct ipmi_system_interface_addr *) addr1;
618 struct ipmi_system_interface_addr *smi_addr2
619 = (struct ipmi_system_interface_addr *) addr2;
620 return (smi_addr1->lun == smi_addr2->lun);
621 }
622
623 if (is_ipmb_addr(addr1) || is_ipmb_bcast_addr(addr1)) {
624 struct ipmi_ipmb_addr *ipmb_addr1
625 = (struct ipmi_ipmb_addr *) addr1;
626 struct ipmi_ipmb_addr *ipmb_addr2
627 = (struct ipmi_ipmb_addr *) addr2;
628
629 return ((ipmb_addr1->slave_addr == ipmb_addr2->slave_addr)
630 && (ipmb_addr1->lun == ipmb_addr2->lun));
631 }
632
633 if (is_lan_addr(addr1)) {
634 struct ipmi_lan_addr *lan_addr1
635 = (struct ipmi_lan_addr *) addr1;
636 struct ipmi_lan_addr *lan_addr2
637 = (struct ipmi_lan_addr *) addr2;
638
639 return ((lan_addr1->remote_SWID == lan_addr2->remote_SWID)
640 && (lan_addr1->local_SWID == lan_addr2->local_SWID)
641 && (lan_addr1->session_handle
642 == lan_addr2->session_handle)
643 && (lan_addr1->lun == lan_addr2->lun));
644 }
645
646 return 1;
647 }
648
649 int ipmi_validate_addr(struct ipmi_addr *addr, int len)
650 {
651 if (len < sizeof(struct ipmi_system_interface_addr))
652 return -EINVAL;
653
654 if (addr->addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE) {
655 if (addr->channel != IPMI_BMC_CHANNEL)
656 return -EINVAL;
657 return 0;
658 }
659
660 if ((addr->channel == IPMI_BMC_CHANNEL)
661 || (addr->channel >= IPMI_MAX_CHANNELS)
662 || (addr->channel < 0))
663 return -EINVAL;
664
665 if (is_ipmb_addr(addr) || is_ipmb_bcast_addr(addr)) {
666 if (len < sizeof(struct ipmi_ipmb_addr))
667 return -EINVAL;
668 return 0;
669 }
670
671 if (is_lan_addr(addr)) {
672 if (len < sizeof(struct ipmi_lan_addr))
673 return -EINVAL;
674 return 0;
675 }
676
677 return -EINVAL;
678 }
679 EXPORT_SYMBOL(ipmi_validate_addr);
680
681 unsigned int ipmi_addr_length(int addr_type)
682 {
683 if (addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
684 return sizeof(struct ipmi_system_interface_addr);
685
686 if ((addr_type == IPMI_IPMB_ADDR_TYPE)
687 || (addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE))
688 return sizeof(struct ipmi_ipmb_addr);
689
690 if (addr_type == IPMI_LAN_ADDR_TYPE)
691 return sizeof(struct ipmi_lan_addr);
692
693 return 0;
694 }
695 EXPORT_SYMBOL(ipmi_addr_length);
696
697 static void deliver_response(struct ipmi_recv_msg *msg)
698 {
699 if (!msg->user) {
700 ipmi_smi_t intf = msg->user_msg_data;
701
702 /* Special handling for NULL users. */
703 if (intf->null_user_handler) {
704 intf->null_user_handler(intf, msg);
705 ipmi_inc_stat(intf, handled_local_responses);
706 } else {
707 /* No handler, so give up. */
708 ipmi_inc_stat(intf, unhandled_local_responses);
709 }
710 ipmi_free_recv_msg(msg);
711 } else {
712 ipmi_user_t user = msg->user;
713 user->handler->ipmi_recv_hndl(msg, user->handler_data);
714 }
715 }
716
717 static void
718 deliver_err_response(struct ipmi_recv_msg *msg, int err)
719 {
720 msg->recv_type = IPMI_RESPONSE_RECV_TYPE;
721 msg->msg_data[0] = err;
722 msg->msg.netfn |= 1; /* Convert to a response. */
723 msg->msg.data_len = 1;
724 msg->msg.data = msg->msg_data;
725 deliver_response(msg);
726 }
727
728 /*
729 * Find the next sequence number not being used and add the given
730 * message with the given timeout to the sequence table. This must be
731 * called with the interface's seq_lock held.
732 */
733 static int intf_next_seq(ipmi_smi_t intf,
734 struct ipmi_recv_msg *recv_msg,
735 unsigned long timeout,
736 int retries,
737 int broadcast,
738 unsigned char *seq,
739 long *seqid)
740 {
741 int rv = 0;
742 unsigned int i;
743
744 for (i = intf->curr_seq; (i+1)%IPMI_IPMB_NUM_SEQ != intf->curr_seq;
745 i = (i+1)%IPMI_IPMB_NUM_SEQ) {
746 if (!intf->seq_table[i].inuse)
747 break;
748 }
749
750 if (!intf->seq_table[i].inuse) {
751 intf->seq_table[i].recv_msg = recv_msg;
752
753 /*
754 * Start with the maximum timeout, when the send response
755 * comes in we will start the real timer.
756 */
757 intf->seq_table[i].timeout = MAX_MSG_TIMEOUT;
758 intf->seq_table[i].orig_timeout = timeout;
759 intf->seq_table[i].retries_left = retries;
760 intf->seq_table[i].broadcast = broadcast;
761 intf->seq_table[i].inuse = 1;
762 intf->seq_table[i].seqid = NEXT_SEQID(intf->seq_table[i].seqid);
763 *seq = i;
764 *seqid = intf->seq_table[i].seqid;
765 intf->curr_seq = (i+1)%IPMI_IPMB_NUM_SEQ;
766 } else {
767 rv = -EAGAIN;
768 }
769
770 return rv;
771 }
772
773 /*
774 * Return the receive message for the given sequence number and
775 * release the sequence number so it can be reused. Some other data
776 * is passed in to be sure the message matches up correctly (to help
777 * guard against message coming in after their timeout and the
778 * sequence number being reused).
779 */
780 static int intf_find_seq(ipmi_smi_t intf,
781 unsigned char seq,
782 short channel,
783 unsigned char cmd,
784 unsigned char netfn,
785 struct ipmi_addr *addr,
786 struct ipmi_recv_msg **recv_msg)
787 {
788 int rv = -ENODEV;
789 unsigned long flags;
790
791 if (seq >= IPMI_IPMB_NUM_SEQ)
792 return -EINVAL;
793
794 spin_lock_irqsave(&(intf->seq_lock), flags);
795 if (intf->seq_table[seq].inuse) {
796 struct ipmi_recv_msg *msg = intf->seq_table[seq].recv_msg;
797
798 if ((msg->addr.channel == channel) && (msg->msg.cmd == cmd)
799 && (msg->msg.netfn == netfn)
800 && (ipmi_addr_equal(addr, &(msg->addr)))) {
801 *recv_msg = msg;
802 intf->seq_table[seq].inuse = 0;
803 rv = 0;
804 }
805 }
806 spin_unlock_irqrestore(&(intf->seq_lock), flags);
807
808 return rv;
809 }
810
811
812 /* Start the timer for a specific sequence table entry. */
813 static int intf_start_seq_timer(ipmi_smi_t intf,
814 long msgid)
815 {
816 int rv = -ENODEV;
817 unsigned long flags;
818 unsigned char seq;
819 unsigned long seqid;
820
821
822 GET_SEQ_FROM_MSGID(msgid, seq, seqid);
823
824 spin_lock_irqsave(&(intf->seq_lock), flags);
825 /*
826 * We do this verification because the user can be deleted
827 * while a message is outstanding.
828 */
829 if ((intf->seq_table[seq].inuse)
830 && (intf->seq_table[seq].seqid == seqid)) {
831 struct seq_table *ent = &(intf->seq_table[seq]);
832 ent->timeout = ent->orig_timeout;
833 rv = 0;
834 }
835 spin_unlock_irqrestore(&(intf->seq_lock), flags);
836
837 return rv;
838 }
839
840 /* Got an error for the send message for a specific sequence number. */
841 static int intf_err_seq(ipmi_smi_t intf,
842 long msgid,
843 unsigned int err)
844 {
845 int rv = -ENODEV;
846 unsigned long flags;
847 unsigned char seq;
848 unsigned long seqid;
849 struct ipmi_recv_msg *msg = NULL;
850
851
852 GET_SEQ_FROM_MSGID(msgid, seq, seqid);
853
854 spin_lock_irqsave(&(intf->seq_lock), flags);
855 /*
856 * We do this verification because the user can be deleted
857 * while a message is outstanding.
858 */
859 if ((intf->seq_table[seq].inuse)
860 && (intf->seq_table[seq].seqid == seqid)) {
861 struct seq_table *ent = &(intf->seq_table[seq]);
862
863 ent->inuse = 0;
864 msg = ent->recv_msg;
865 rv = 0;
866 }
867 spin_unlock_irqrestore(&(intf->seq_lock), flags);
868
869 if (msg)
870 deliver_err_response(msg, err);
871
872 return rv;
873 }
874
875
876 int ipmi_create_user(unsigned int if_num,
877 struct ipmi_user_hndl *handler,
878 void *handler_data,
879 ipmi_user_t *user)
880 {
881 unsigned long flags;
882 ipmi_user_t new_user;
883 int rv = 0;
884 ipmi_smi_t intf;
885
886 /*
887 * There is no module usecount here, because it's not
888 * required. Since this can only be used by and called from
889 * other modules, they will implicitly use this module, and
890 * thus this can't be removed unless the other modules are
891 * removed.
892 */
893
894 if (handler == NULL)
895 return -EINVAL;
896
897 /*
898 * Make sure the driver is actually initialized, this handles
899 * problems with initialization order.
900 */
901 if (!initialized) {
902 rv = ipmi_init_msghandler();
903 if (rv)
904 return rv;
905
906 /*
907 * The init code doesn't return an error if it was turned
908 * off, but it won't initialize. Check that.
909 */
910 if (!initialized)
911 return -ENODEV;
912 }
913
914 new_user = kmalloc(sizeof(*new_user), GFP_KERNEL);
915 if (!new_user)
916 return -ENOMEM;
917
918 mutex_lock(&ipmi_interfaces_mutex);
919 list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
920 if (intf->intf_num == if_num)
921 goto found;
922 }
923 /* Not found, return an error */
924 rv = -EINVAL;
925 goto out_kfree;
926
927 found:
928 /* Note that each existing user holds a refcount to the interface. */
929 kref_get(&intf->refcount);
930
931 kref_init(&new_user->refcount);
932 new_user->handler = handler;
933 new_user->handler_data = handler_data;
934 new_user->intf = intf;
935 new_user->gets_events = 0;
936
937 if (!try_module_get(intf->handlers->owner)) {
938 rv = -ENODEV;
939 goto out_kref;
940 }
941
942 if (intf->handlers->inc_usecount) {
943 rv = intf->handlers->inc_usecount(intf->send_info);
944 if (rv) {
945 module_put(intf->handlers->owner);
946 goto out_kref;
947 }
948 }
949
950 /*
951 * Hold the lock so intf->handlers is guaranteed to be good
952 * until now
953 */
954 mutex_unlock(&ipmi_interfaces_mutex);
955
956 new_user->valid = 1;
957 spin_lock_irqsave(&intf->seq_lock, flags);
958 list_add_rcu(&new_user->link, &intf->users);
959 spin_unlock_irqrestore(&intf->seq_lock, flags);
960 *user = new_user;
961 return 0;
962
963 out_kref:
964 kref_put(&intf->refcount, intf_free);
965 out_kfree:
966 mutex_unlock(&ipmi_interfaces_mutex);
967 kfree(new_user);
968 return rv;
969 }
970 EXPORT_SYMBOL(ipmi_create_user);
971
972 static void free_user(struct kref *ref)
973 {
974 ipmi_user_t user = container_of(ref, struct ipmi_user, refcount);
975 kfree(user);
976 }
977
978 int ipmi_destroy_user(ipmi_user_t user)
979 {
980 ipmi_smi_t intf = user->intf;
981 int i;
982 unsigned long flags;
983 struct cmd_rcvr *rcvr;
984 struct cmd_rcvr *rcvrs = NULL;
985
986 user->valid = 0;
987
988 /* Remove the user from the interface's sequence table. */
989 spin_lock_irqsave(&intf->seq_lock, flags);
990 list_del_rcu(&user->link);
991
992 for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++) {
993 if (intf->seq_table[i].inuse
994 && (intf->seq_table[i].recv_msg->user == user)) {
995 intf->seq_table[i].inuse = 0;
996 ipmi_free_recv_msg(intf->seq_table[i].recv_msg);
997 }
998 }
999 spin_unlock_irqrestore(&intf->seq_lock, flags);
1000
1001 /*
1002 * Remove the user from the command receiver's table. First
1003 * we build a list of everything (not using the standard link,
1004 * since other things may be using it till we do
1005 * synchronize_rcu()) then free everything in that list.
1006 */
1007 mutex_lock(&intf->cmd_rcvrs_mutex);
1008 list_for_each_entry_rcu(rcvr, &intf->cmd_rcvrs, link) {
1009 if (rcvr->user == user) {
1010 list_del_rcu(&rcvr->link);
1011 rcvr->next = rcvrs;
1012 rcvrs = rcvr;
1013 }
1014 }
1015 mutex_unlock(&intf->cmd_rcvrs_mutex);
1016 synchronize_rcu();
1017 while (rcvrs) {
1018 rcvr = rcvrs;
1019 rcvrs = rcvr->next;
1020 kfree(rcvr);
1021 }
1022
1023 mutex_lock(&ipmi_interfaces_mutex);
1024 if (intf->handlers) {
1025 module_put(intf->handlers->owner);
1026 if (intf->handlers->dec_usecount)
1027 intf->handlers->dec_usecount(intf->send_info);
1028 }
1029 mutex_unlock(&ipmi_interfaces_mutex);
1030
1031 kref_put(&intf->refcount, intf_free);
1032
1033 kref_put(&user->refcount, free_user);
1034
1035 return 0;
1036 }
1037 EXPORT_SYMBOL(ipmi_destroy_user);
1038
1039 void ipmi_get_version(ipmi_user_t user,
1040 unsigned char *major,
1041 unsigned char *minor)
1042 {
1043 *major = user->intf->ipmi_version_major;
1044 *minor = user->intf->ipmi_version_minor;
1045 }
1046 EXPORT_SYMBOL(ipmi_get_version);
1047
1048 int ipmi_set_my_address(ipmi_user_t user,
1049 unsigned int channel,
1050 unsigned char address)
1051 {
1052 if (channel >= IPMI_MAX_CHANNELS)
1053 return -EINVAL;
1054 user->intf->channels[channel].address = address;
1055 return 0;
1056 }
1057 EXPORT_SYMBOL(ipmi_set_my_address);
1058
1059 int ipmi_get_my_address(ipmi_user_t user,
1060 unsigned int channel,
1061 unsigned char *address)
1062 {
1063 if (channel >= IPMI_MAX_CHANNELS)
1064 return -EINVAL;
1065 *address = user->intf->channels[channel].address;
1066 return 0;
1067 }
1068 EXPORT_SYMBOL(ipmi_get_my_address);
1069
1070 int ipmi_set_my_LUN(ipmi_user_t user,
1071 unsigned int channel,
1072 unsigned char LUN)
1073 {
1074 if (channel >= IPMI_MAX_CHANNELS)
1075 return -EINVAL;
1076 user->intf->channels[channel].lun = LUN & 0x3;
1077 return 0;
1078 }
1079 EXPORT_SYMBOL(ipmi_set_my_LUN);
1080
1081 int ipmi_get_my_LUN(ipmi_user_t user,
1082 unsigned int channel,
1083 unsigned char *address)
1084 {
1085 if (channel >= IPMI_MAX_CHANNELS)
1086 return -EINVAL;
1087 *address = user->intf->channels[channel].lun;
1088 return 0;
1089 }
1090 EXPORT_SYMBOL(ipmi_get_my_LUN);
1091
1092 int ipmi_get_maintenance_mode(ipmi_user_t user)
1093 {
1094 int mode;
1095 unsigned long flags;
1096
1097 spin_lock_irqsave(&user->intf->maintenance_mode_lock, flags);
1098 mode = user->intf->maintenance_mode;
1099 spin_unlock_irqrestore(&user->intf->maintenance_mode_lock, flags);
1100
1101 return mode;
1102 }
1103 EXPORT_SYMBOL(ipmi_get_maintenance_mode);
1104
1105 static void maintenance_mode_update(ipmi_smi_t intf)
1106 {
1107 if (intf->handlers->set_maintenance_mode)
1108 intf->handlers->set_maintenance_mode(
1109 intf->send_info, intf->maintenance_mode_enable);
1110 }
1111
1112 int ipmi_set_maintenance_mode(ipmi_user_t user, int mode)
1113 {
1114 int rv = 0;
1115 unsigned long flags;
1116 ipmi_smi_t intf = user->intf;
1117
1118 spin_lock_irqsave(&intf->maintenance_mode_lock, flags);
1119 if (intf->maintenance_mode != mode) {
1120 switch (mode) {
1121 case IPMI_MAINTENANCE_MODE_AUTO:
1122 intf->maintenance_mode = mode;
1123 intf->maintenance_mode_enable
1124 = (intf->auto_maintenance_timeout > 0);
1125 break;
1126
1127 case IPMI_MAINTENANCE_MODE_OFF:
1128 intf->maintenance_mode = mode;
1129 intf->maintenance_mode_enable = 0;
1130 break;
1131
1132 case IPMI_MAINTENANCE_MODE_ON:
1133 intf->maintenance_mode = mode;
1134 intf->maintenance_mode_enable = 1;
1135 break;
1136
1137 default:
1138 rv = -EINVAL;
1139 goto out_unlock;
1140 }
1141
1142 maintenance_mode_update(intf);
1143 }
1144 out_unlock:
1145 spin_unlock_irqrestore(&intf->maintenance_mode_lock, flags);
1146
1147 return rv;
1148 }
1149 EXPORT_SYMBOL(ipmi_set_maintenance_mode);
1150
1151 int ipmi_set_gets_events(ipmi_user_t user, int val)
1152 {
1153 unsigned long flags;
1154 ipmi_smi_t intf = user->intf;
1155 struct ipmi_recv_msg *msg, *msg2;
1156 struct list_head msgs;
1157
1158 INIT_LIST_HEAD(&msgs);
1159
1160 spin_lock_irqsave(&intf->events_lock, flags);
1161 user->gets_events = val;
1162
1163 if (intf->delivering_events)
1164 /*
1165 * Another thread is delivering events for this, so
1166 * let it handle any new events.
1167 */
1168 goto out;
1169
1170 /* Deliver any queued events. */
1171 while (user->gets_events && !list_empty(&intf->waiting_events)) {
1172 list_for_each_entry_safe(msg, msg2, &intf->waiting_events, link)
1173 list_move_tail(&msg->link, &msgs);
1174 intf->waiting_events_count = 0;
1175 if (intf->event_msg_printed) {
1176 printk(KERN_WARNING PFX "Event queue no longer"
1177 " full\n");
1178 intf->event_msg_printed = 0;
1179 }
1180
1181 intf->delivering_events = 1;
1182 spin_unlock_irqrestore(&intf->events_lock, flags);
1183
1184 list_for_each_entry_safe(msg, msg2, &msgs, link) {
1185 msg->user = user;
1186 kref_get(&user->refcount);
1187 deliver_response(msg);
1188 }
1189
1190 spin_lock_irqsave(&intf->events_lock, flags);
1191 intf->delivering_events = 0;
1192 }
1193
1194 out:
1195 spin_unlock_irqrestore(&intf->events_lock, flags);
1196
1197 return 0;
1198 }
1199 EXPORT_SYMBOL(ipmi_set_gets_events);
1200
1201 static struct cmd_rcvr *find_cmd_rcvr(ipmi_smi_t intf,
1202 unsigned char netfn,
1203 unsigned char cmd,
1204 unsigned char chan)
1205 {
1206 struct cmd_rcvr *rcvr;
1207
1208 list_for_each_entry_rcu(rcvr, &intf->cmd_rcvrs, link) {
1209 if ((rcvr->netfn == netfn) && (rcvr->cmd == cmd)
1210 && (rcvr->chans & (1 << chan)))
1211 return rcvr;
1212 }
1213 return NULL;
1214 }
1215
1216 static int is_cmd_rcvr_exclusive(ipmi_smi_t intf,
1217 unsigned char netfn,
1218 unsigned char cmd,
1219 unsigned int chans)
1220 {
1221 struct cmd_rcvr *rcvr;
1222
1223 list_for_each_entry_rcu(rcvr, &intf->cmd_rcvrs, link) {
1224 if ((rcvr->netfn == netfn) && (rcvr->cmd == cmd)
1225 && (rcvr->chans & chans))
1226 return 0;
1227 }
1228 return 1;
1229 }
1230
1231 int ipmi_register_for_cmd(ipmi_user_t user,
1232 unsigned char netfn,
1233 unsigned char cmd,
1234 unsigned int chans)
1235 {
1236 ipmi_smi_t intf = user->intf;
1237 struct cmd_rcvr *rcvr;
1238 int rv = 0;
1239
1240
1241 rcvr = kmalloc(sizeof(*rcvr), GFP_KERNEL);
1242 if (!rcvr)
1243 return -ENOMEM;
1244 rcvr->cmd = cmd;
1245 rcvr->netfn = netfn;
1246 rcvr->chans = chans;
1247 rcvr->user = user;
1248
1249 mutex_lock(&intf->cmd_rcvrs_mutex);
1250 /* Make sure the command/netfn is not already registered. */
1251 if (!is_cmd_rcvr_exclusive(intf, netfn, cmd, chans)) {
1252 rv = -EBUSY;
1253 goto out_unlock;
1254 }
1255
1256 list_add_rcu(&rcvr->link, &intf->cmd_rcvrs);
1257
1258 out_unlock:
1259 mutex_unlock(&intf->cmd_rcvrs_mutex);
1260 if (rv)
1261 kfree(rcvr);
1262
1263 return rv;
1264 }
1265 EXPORT_SYMBOL(ipmi_register_for_cmd);
1266
1267 int ipmi_unregister_for_cmd(ipmi_user_t user,
1268 unsigned char netfn,
1269 unsigned char cmd,
1270 unsigned int chans)
1271 {
1272 ipmi_smi_t intf = user->intf;
1273 struct cmd_rcvr *rcvr;
1274 struct cmd_rcvr *rcvrs = NULL;
1275 int i, rv = -ENOENT;
1276
1277 mutex_lock(&intf->cmd_rcvrs_mutex);
1278 for (i = 0; i < IPMI_NUM_CHANNELS; i++) {
1279 if (((1 << i) & chans) == 0)
1280 continue;
1281 rcvr = find_cmd_rcvr(intf, netfn, cmd, i);
1282 if (rcvr == NULL)
1283 continue;
1284 if (rcvr->user == user) {
1285 rv = 0;
1286 rcvr->chans &= ~chans;
1287 if (rcvr->chans == 0) {
1288 list_del_rcu(&rcvr->link);
1289 rcvr->next = rcvrs;
1290 rcvrs = rcvr;
1291 }
1292 }
1293 }
1294 mutex_unlock(&intf->cmd_rcvrs_mutex);
1295 synchronize_rcu();
1296 while (rcvrs) {
1297 rcvr = rcvrs;
1298 rcvrs = rcvr->next;
1299 kfree(rcvr);
1300 }
1301 return rv;
1302 }
1303 EXPORT_SYMBOL(ipmi_unregister_for_cmd);
1304
1305 static unsigned char
1306 ipmb_checksum(unsigned char *data, int size)
1307 {
1308 unsigned char csum = 0;
1309
1310 for (; size > 0; size--, data++)
1311 csum += *data;
1312
1313 return -csum;
1314 }
1315
1316 static inline void format_ipmb_msg(struct ipmi_smi_msg *smi_msg,
1317 struct kernel_ipmi_msg *msg,
1318 struct ipmi_ipmb_addr *ipmb_addr,
1319 long msgid,
1320 unsigned char ipmb_seq,
1321 int broadcast,
1322 unsigned char source_address,
1323 unsigned char source_lun)
1324 {
1325 int i = broadcast;
1326
1327 /* Format the IPMB header data. */
1328 smi_msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
1329 smi_msg->data[1] = IPMI_SEND_MSG_CMD;
1330 smi_msg->data[2] = ipmb_addr->channel;
1331 if (broadcast)
1332 smi_msg->data[3] = 0;
1333 smi_msg->data[i+3] = ipmb_addr->slave_addr;
1334 smi_msg->data[i+4] = (msg->netfn << 2) | (ipmb_addr->lun & 0x3);
1335 smi_msg->data[i+5] = ipmb_checksum(&(smi_msg->data[i+3]), 2);
1336 smi_msg->data[i+6] = source_address;
1337 smi_msg->data[i+7] = (ipmb_seq << 2) | source_lun;
1338 smi_msg->data[i+8] = msg->cmd;
1339
1340 /* Now tack on the data to the message. */
1341 if (msg->data_len > 0)
1342 memcpy(&(smi_msg->data[i+9]), msg->data,
1343 msg->data_len);
1344 smi_msg->data_size = msg->data_len + 9;
1345
1346 /* Now calculate the checksum and tack it on. */
1347 smi_msg->data[i+smi_msg->data_size]
1348 = ipmb_checksum(&(smi_msg->data[i+6]),
1349 smi_msg->data_size-6);
1350
1351 /*
1352 * Add on the checksum size and the offset from the
1353 * broadcast.
1354 */
1355 smi_msg->data_size += 1 + i;
1356
1357 smi_msg->msgid = msgid;
1358 }
1359
1360 static inline void format_lan_msg(struct ipmi_smi_msg *smi_msg,
1361 struct kernel_ipmi_msg *msg,
1362 struct ipmi_lan_addr *lan_addr,
1363 long msgid,
1364 unsigned char ipmb_seq,
1365 unsigned char source_lun)
1366 {
1367 /* Format the IPMB header data. */
1368 smi_msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
1369 smi_msg->data[1] = IPMI_SEND_MSG_CMD;
1370 smi_msg->data[2] = lan_addr->channel;
1371 smi_msg->data[3] = lan_addr->session_handle;
1372 smi_msg->data[4] = lan_addr->remote_SWID;
1373 smi_msg->data[5] = (msg->netfn << 2) | (lan_addr->lun & 0x3);
1374 smi_msg->data[6] = ipmb_checksum(&(smi_msg->data[4]), 2);
1375 smi_msg->data[7] = lan_addr->local_SWID;
1376 smi_msg->data[8] = (ipmb_seq << 2) | source_lun;
1377 smi_msg->data[9] = msg->cmd;
1378
1379 /* Now tack on the data to the message. */
1380 if (msg->data_len > 0)
1381 memcpy(&(smi_msg->data[10]), msg->data,
1382 msg->data_len);
1383 smi_msg->data_size = msg->data_len + 10;
1384
1385 /* Now calculate the checksum and tack it on. */
1386 smi_msg->data[smi_msg->data_size]
1387 = ipmb_checksum(&(smi_msg->data[7]),
1388 smi_msg->data_size-7);
1389
1390 /*
1391 * Add on the checksum size and the offset from the
1392 * broadcast.
1393 */
1394 smi_msg->data_size += 1;
1395
1396 smi_msg->msgid = msgid;
1397 }
1398
1399 /*
1400 * Separate from ipmi_request so that the user does not have to be
1401 * supplied in certain circumstances (mainly at panic time). If
1402 * messages are supplied, they will be freed, even if an error
1403 * occurs.
1404 */
1405 static int i_ipmi_request(ipmi_user_t user,
1406 ipmi_smi_t intf,
1407 struct ipmi_addr *addr,
1408 long msgid,
1409 struct kernel_ipmi_msg *msg,
1410 void *user_msg_data,
1411 void *supplied_smi,
1412 struct ipmi_recv_msg *supplied_recv,
1413 int priority,
1414 unsigned char source_address,
1415 unsigned char source_lun,
1416 int retries,
1417 unsigned int retry_time_ms)
1418 {
1419 int rv = 0;
1420 struct ipmi_smi_msg *smi_msg;
1421 struct ipmi_recv_msg *recv_msg;
1422 unsigned long flags;
1423 struct ipmi_smi_handlers *handlers;
1424
1425
1426 if (supplied_recv)
1427 recv_msg = supplied_recv;
1428 else {
1429 recv_msg = ipmi_alloc_recv_msg();
1430 if (recv_msg == NULL)
1431 return -ENOMEM;
1432 }
1433 recv_msg->user_msg_data = user_msg_data;
1434
1435 if (supplied_smi)
1436 smi_msg = (struct ipmi_smi_msg *) supplied_smi;
1437 else {
1438 smi_msg = ipmi_alloc_smi_msg();
1439 if (smi_msg == NULL) {
1440 ipmi_free_recv_msg(recv_msg);
1441 return -ENOMEM;
1442 }
1443 }
1444
1445 rcu_read_lock();
1446 handlers = intf->handlers;
1447 if (!handlers) {
1448 rv = -ENODEV;
1449 goto out_err;
1450 }
1451
1452 recv_msg->user = user;
1453 if (user)
1454 kref_get(&user->refcount);
1455 recv_msg->msgid = msgid;
1456 /*
1457 * Store the message to send in the receive message so timeout
1458 * responses can get the proper response data.
1459 */
1460 recv_msg->msg = *msg;
1461
1462 if (addr->addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE) {
1463 struct ipmi_system_interface_addr *smi_addr;
1464
1465 if (msg->netfn & 1) {
1466 /* Responses are not allowed to the SMI. */
1467 rv = -EINVAL;
1468 goto out_err;
1469 }
1470
1471 smi_addr = (struct ipmi_system_interface_addr *) addr;
1472 if (smi_addr->lun > 3) {
1473 ipmi_inc_stat(intf, sent_invalid_commands);
1474 rv = -EINVAL;
1475 goto out_err;
1476 }
1477
1478 memcpy(&recv_msg->addr, smi_addr, sizeof(*smi_addr));
1479
1480 if ((msg->netfn == IPMI_NETFN_APP_REQUEST)
1481 && ((msg->cmd == IPMI_SEND_MSG_CMD)
1482 || (msg->cmd == IPMI_GET_MSG_CMD)
1483 || (msg->cmd == IPMI_READ_EVENT_MSG_BUFFER_CMD))) {
1484 /*
1485 * We don't let the user do these, since we manage
1486 * the sequence numbers.
1487 */
1488 ipmi_inc_stat(intf, sent_invalid_commands);
1489 rv = -EINVAL;
1490 goto out_err;
1491 }
1492
1493 if (((msg->netfn == IPMI_NETFN_APP_REQUEST)
1494 && ((msg->cmd == IPMI_COLD_RESET_CMD)
1495 || (msg->cmd == IPMI_WARM_RESET_CMD)))
1496 || (msg->netfn == IPMI_NETFN_FIRMWARE_REQUEST)) {
1497 spin_lock_irqsave(&intf->maintenance_mode_lock, flags);
1498 intf->auto_maintenance_timeout
1499 = IPMI_MAINTENANCE_MODE_TIMEOUT;
1500 if (!intf->maintenance_mode
1501 && !intf->maintenance_mode_enable) {
1502 intf->maintenance_mode_enable = 1;
1503 maintenance_mode_update(intf);
1504 }
1505 spin_unlock_irqrestore(&intf->maintenance_mode_lock,
1506 flags);
1507 }
1508
1509 if ((msg->data_len + 2) > IPMI_MAX_MSG_LENGTH) {
1510 ipmi_inc_stat(intf, sent_invalid_commands);
1511 rv = -EMSGSIZE;
1512 goto out_err;
1513 }
1514
1515 smi_msg->data[0] = (msg->netfn << 2) | (smi_addr->lun & 0x3);
1516 smi_msg->data[1] = msg->cmd;
1517 smi_msg->msgid = msgid;
1518 smi_msg->user_data = recv_msg;
1519 if (msg->data_len > 0)
1520 memcpy(&(smi_msg->data[2]), msg->data, msg->data_len);
1521 smi_msg->data_size = msg->data_len + 2;
1522 ipmi_inc_stat(intf, sent_local_commands);
1523 } else if (is_ipmb_addr(addr) || is_ipmb_bcast_addr(addr)) {
1524 struct ipmi_ipmb_addr *ipmb_addr;
1525 unsigned char ipmb_seq;
1526 long seqid;
1527 int broadcast = 0;
1528
1529 if (addr->channel >= IPMI_MAX_CHANNELS) {
1530 ipmi_inc_stat(intf, sent_invalid_commands);
1531 rv = -EINVAL;
1532 goto out_err;
1533 }
1534
1535 if (intf->channels[addr->channel].medium
1536 != IPMI_CHANNEL_MEDIUM_IPMB) {
1537 ipmi_inc_stat(intf, sent_invalid_commands);
1538 rv = -EINVAL;
1539 goto out_err;
1540 }
1541
1542 if (retries < 0) {
1543 if (addr->addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE)
1544 retries = 0; /* Don't retry broadcasts. */
1545 else
1546 retries = 4;
1547 }
1548 if (addr->addr_type == IPMI_IPMB_BROADCAST_ADDR_TYPE) {
1549 /*
1550 * Broadcasts add a zero at the beginning of the
1551 * message, but otherwise is the same as an IPMB
1552 * address.
1553 */
1554 addr->addr_type = IPMI_IPMB_ADDR_TYPE;
1555 broadcast = 1;
1556 }
1557
1558
1559 /* Default to 1 second retries. */
1560 if (retry_time_ms == 0)
1561 retry_time_ms = 1000;
1562
1563 /*
1564 * 9 for the header and 1 for the checksum, plus
1565 * possibly one for the broadcast.
1566 */
1567 if ((msg->data_len + 10 + broadcast) > IPMI_MAX_MSG_LENGTH) {
1568 ipmi_inc_stat(intf, sent_invalid_commands);
1569 rv = -EMSGSIZE;
1570 goto out_err;
1571 }
1572
1573 ipmb_addr = (struct ipmi_ipmb_addr *) addr;
1574 if (ipmb_addr->lun > 3) {
1575 ipmi_inc_stat(intf, sent_invalid_commands);
1576 rv = -EINVAL;
1577 goto out_err;
1578 }
1579
1580 memcpy(&recv_msg->addr, ipmb_addr, sizeof(*ipmb_addr));
1581
1582 if (recv_msg->msg.netfn & 0x1) {
1583 /*
1584 * It's a response, so use the user's sequence
1585 * from msgid.
1586 */
1587 ipmi_inc_stat(intf, sent_ipmb_responses);
1588 format_ipmb_msg(smi_msg, msg, ipmb_addr, msgid,
1589 msgid, broadcast,
1590 source_address, source_lun);
1591
1592 /*
1593 * Save the receive message so we can use it
1594 * to deliver the response.
1595 */
1596 smi_msg->user_data = recv_msg;
1597 } else {
1598 /* It's a command, so get a sequence for it. */
1599
1600 spin_lock_irqsave(&(intf->seq_lock), flags);
1601
1602 /*
1603 * Create a sequence number with a 1 second
1604 * timeout and 4 retries.
1605 */
1606 rv = intf_next_seq(intf,
1607 recv_msg,
1608 retry_time_ms,
1609 retries,
1610 broadcast,
1611 &ipmb_seq,
1612 &seqid);
1613 if (rv) {
1614 /*
1615 * We have used up all the sequence numbers,
1616 * probably, so abort.
1617 */
1618 spin_unlock_irqrestore(&(intf->seq_lock),
1619 flags);
1620 goto out_err;
1621 }
1622
1623 ipmi_inc_stat(intf, sent_ipmb_commands);
1624
1625 /*
1626 * Store the sequence number in the message,
1627 * so that when the send message response
1628 * comes back we can start the timer.
1629 */
1630 format_ipmb_msg(smi_msg, msg, ipmb_addr,
1631 STORE_SEQ_IN_MSGID(ipmb_seq, seqid),
1632 ipmb_seq, broadcast,
1633 source_address, source_lun);
1634
1635 /*
1636 * Copy the message into the recv message data, so we
1637 * can retransmit it later if necessary.
1638 */
1639 memcpy(recv_msg->msg_data, smi_msg->data,
1640 smi_msg->data_size);
1641 recv_msg->msg.data = recv_msg->msg_data;
1642 recv_msg->msg.data_len = smi_msg->data_size;
1643
1644 /*
1645 * We don't unlock until here, because we need
1646 * to copy the completed message into the
1647 * recv_msg before we release the lock.
1648 * Otherwise, race conditions may bite us. I
1649 * know that's pretty paranoid, but I prefer
1650 * to be correct.
1651 */
1652 spin_unlock_irqrestore(&(intf->seq_lock), flags);
1653 }
1654 } else if (is_lan_addr(addr)) {
1655 struct ipmi_lan_addr *lan_addr;
1656 unsigned char ipmb_seq;
1657 long seqid;
1658
1659 if (addr->channel >= IPMI_MAX_CHANNELS) {
1660 ipmi_inc_stat(intf, sent_invalid_commands);
1661 rv = -EINVAL;
1662 goto out_err;
1663 }
1664
1665 if ((intf->channels[addr->channel].medium
1666 != IPMI_CHANNEL_MEDIUM_8023LAN)
1667 && (intf->channels[addr->channel].medium
1668 != IPMI_CHANNEL_MEDIUM_ASYNC)) {
1669 ipmi_inc_stat(intf, sent_invalid_commands);
1670 rv = -EINVAL;
1671 goto out_err;
1672 }
1673
1674 retries = 4;
1675
1676 /* Default to 1 second retries. */
1677 if (retry_time_ms == 0)
1678 retry_time_ms = 1000;
1679
1680 /* 11 for the header and 1 for the checksum. */
1681 if ((msg->data_len + 12) > IPMI_MAX_MSG_LENGTH) {
1682 ipmi_inc_stat(intf, sent_invalid_commands);
1683 rv = -EMSGSIZE;
1684 goto out_err;
1685 }
1686
1687 lan_addr = (struct ipmi_lan_addr *) addr;
1688 if (lan_addr->lun > 3) {
1689 ipmi_inc_stat(intf, sent_invalid_commands);
1690 rv = -EINVAL;
1691 goto out_err;
1692 }
1693
1694 memcpy(&recv_msg->addr, lan_addr, sizeof(*lan_addr));
1695
1696 if (recv_msg->msg.netfn & 0x1) {
1697 /*
1698 * It's a response, so use the user's sequence
1699 * from msgid.
1700 */
1701 ipmi_inc_stat(intf, sent_lan_responses);
1702 format_lan_msg(smi_msg, msg, lan_addr, msgid,
1703 msgid, source_lun);
1704
1705 /*
1706 * Save the receive message so we can use it
1707 * to deliver the response.
1708 */
1709 smi_msg->user_data = recv_msg;
1710 } else {
1711 /* It's a command, so get a sequence for it. */
1712
1713 spin_lock_irqsave(&(intf->seq_lock), flags);
1714
1715 /*
1716 * Create a sequence number with a 1 second
1717 * timeout and 4 retries.
1718 */
1719 rv = intf_next_seq(intf,
1720 recv_msg,
1721 retry_time_ms,
1722 retries,
1723 0,
1724 &ipmb_seq,
1725 &seqid);
1726 if (rv) {
1727 /*
1728 * We have used up all the sequence numbers,
1729 * probably, so abort.
1730 */
1731 spin_unlock_irqrestore(&(intf->seq_lock),
1732 flags);
1733 goto out_err;
1734 }
1735
1736 ipmi_inc_stat(intf, sent_lan_commands);
1737
1738 /*
1739 * Store the sequence number in the message,
1740 * so that when the send message response
1741 * comes back we can start the timer.
1742 */
1743 format_lan_msg(smi_msg, msg, lan_addr,
1744 STORE_SEQ_IN_MSGID(ipmb_seq, seqid),
1745 ipmb_seq, source_lun);
1746
1747 /*
1748 * Copy the message into the recv message data, so we
1749 * can retransmit it later if necessary.
1750 */
1751 memcpy(recv_msg->msg_data, smi_msg->data,
1752 smi_msg->data_size);
1753 recv_msg->msg.data = recv_msg->msg_data;
1754 recv_msg->msg.data_len = smi_msg->data_size;
1755
1756 /*
1757 * We don't unlock until here, because we need
1758 * to copy the completed message into the
1759 * recv_msg before we release the lock.
1760 * Otherwise, race conditions may bite us. I
1761 * know that's pretty paranoid, but I prefer
1762 * to be correct.
1763 */
1764 spin_unlock_irqrestore(&(intf->seq_lock), flags);
1765 }
1766 } else {
1767 /* Unknown address type. */
1768 ipmi_inc_stat(intf, sent_invalid_commands);
1769 rv = -EINVAL;
1770 goto out_err;
1771 }
1772
1773 #ifdef DEBUG_MSGING
1774 {
1775 int m;
1776 for (m = 0; m < smi_msg->data_size; m++)
1777 printk(" %2.2x", smi_msg->data[m]);
1778 printk("\n");
1779 }
1780 #endif
1781
1782 handlers->sender(intf->send_info, smi_msg, priority);
1783 rcu_read_unlock();
1784
1785 return 0;
1786
1787 out_err:
1788 rcu_read_unlock();
1789 ipmi_free_smi_msg(smi_msg);
1790 ipmi_free_recv_msg(recv_msg);
1791 return rv;
1792 }
1793
1794 static int check_addr(ipmi_smi_t intf,
1795 struct ipmi_addr *addr,
1796 unsigned char *saddr,
1797 unsigned char *lun)
1798 {
1799 if (addr->channel >= IPMI_MAX_CHANNELS)
1800 return -EINVAL;
1801 *lun = intf->channels[addr->channel].lun;
1802 *saddr = intf->channels[addr->channel].address;
1803 return 0;
1804 }
1805
1806 int ipmi_request_settime(ipmi_user_t user,
1807 struct ipmi_addr *addr,
1808 long msgid,
1809 struct kernel_ipmi_msg *msg,
1810 void *user_msg_data,
1811 int priority,
1812 int retries,
1813 unsigned int retry_time_ms)
1814 {
1815 unsigned char saddr, lun;
1816 int rv;
1817
1818 if (!user)
1819 return -EINVAL;
1820 rv = check_addr(user->intf, addr, &saddr, &lun);
1821 if (rv)
1822 return rv;
1823 return i_ipmi_request(user,
1824 user->intf,
1825 addr,
1826 msgid,
1827 msg,
1828 user_msg_data,
1829 NULL, NULL,
1830 priority,
1831 saddr,
1832 lun,
1833 retries,
1834 retry_time_ms);
1835 }
1836 EXPORT_SYMBOL(ipmi_request_settime);
1837
1838 int ipmi_request_supply_msgs(ipmi_user_t user,
1839 struct ipmi_addr *addr,
1840 long msgid,
1841 struct kernel_ipmi_msg *msg,
1842 void *user_msg_data,
1843 void *supplied_smi,
1844 struct ipmi_recv_msg *supplied_recv,
1845 int priority)
1846 {
1847 unsigned char saddr, lun;
1848 int rv;
1849
1850 if (!user)
1851 return -EINVAL;
1852 rv = check_addr(user->intf, addr, &saddr, &lun);
1853 if (rv)
1854 return rv;
1855 return i_ipmi_request(user,
1856 user->intf,
1857 addr,
1858 msgid,
1859 msg,
1860 user_msg_data,
1861 supplied_smi,
1862 supplied_recv,
1863 priority,
1864 saddr,
1865 lun,
1866 -1, 0);
1867 }
1868 EXPORT_SYMBOL(ipmi_request_supply_msgs);
1869
1870 #ifdef CONFIG_PROC_FS
1871 static int ipmb_file_read_proc(char *page, char **start, off_t off,
1872 int count, int *eof, void *data)
1873 {
1874 char *out = (char *) page;
1875 ipmi_smi_t intf = data;
1876 int i;
1877 int rv = 0;
1878
1879 for (i = 0; i < IPMI_MAX_CHANNELS; i++)
1880 rv += sprintf(out+rv, "%x ", intf->channels[i].address);
1881 out[rv-1] = '\n'; /* Replace the final space with a newline */
1882 out[rv] = '\0';
1883 rv++;
1884 return rv;
1885 }
1886
1887 static int version_file_read_proc(char *page, char **start, off_t off,
1888 int count, int *eof, void *data)
1889 {
1890 char *out = (char *) page;
1891 ipmi_smi_t intf = data;
1892
1893 return sprintf(out, "%u.%u\n",
1894 ipmi_version_major(&intf->bmc->id),
1895 ipmi_version_minor(&intf->bmc->id));
1896 }
1897
1898 static int stat_file_read_proc(char *page, char **start, off_t off,
1899 int count, int *eof, void *data)
1900 {
1901 char *out = (char *) page;
1902 ipmi_smi_t intf = data;
1903
1904 out += sprintf(out, "sent_invalid_commands: %u\n",
1905 ipmi_get_stat(intf, sent_invalid_commands));
1906 out += sprintf(out, "sent_local_commands: %u\n",
1907 ipmi_get_stat(intf, sent_local_commands));
1908 out += sprintf(out, "handled_local_responses: %u\n",
1909 ipmi_get_stat(intf, handled_local_responses));
1910 out += sprintf(out, "unhandled_local_responses: %u\n",
1911 ipmi_get_stat(intf, unhandled_local_responses));
1912 out += sprintf(out, "sent_ipmb_commands: %u\n",
1913 ipmi_get_stat(intf, sent_ipmb_commands));
1914 out += sprintf(out, "sent_ipmb_command_errs: %u\n",
1915 ipmi_get_stat(intf, sent_ipmb_command_errs));
1916 out += sprintf(out, "retransmitted_ipmb_commands: %u\n",
1917 ipmi_get_stat(intf, retransmitted_ipmb_commands));
1918 out += sprintf(out, "timed_out_ipmb_commands: %u\n",
1919 ipmi_get_stat(intf, timed_out_ipmb_commands));
1920 out += sprintf(out, "timed_out_ipmb_broadcasts: %u\n",
1921 ipmi_get_stat(intf, timed_out_ipmb_broadcasts));
1922 out += sprintf(out, "sent_ipmb_responses: %u\n",
1923 ipmi_get_stat(intf, sent_ipmb_responses));
1924 out += sprintf(out, "handled_ipmb_responses: %u\n",
1925 ipmi_get_stat(intf, handled_ipmb_responses));
1926 out += sprintf(out, "invalid_ipmb_responses: %u\n",
1927 ipmi_get_stat(intf, invalid_ipmb_responses));
1928 out += sprintf(out, "unhandled_ipmb_responses: %u\n",
1929 ipmi_get_stat(intf, unhandled_ipmb_responses));
1930 out += sprintf(out, "sent_lan_commands: %u\n",
1931 ipmi_get_stat(intf, sent_lan_commands));
1932 out += sprintf(out, "sent_lan_command_errs: %u\n",
1933 ipmi_get_stat(intf, sent_lan_command_errs));
1934 out += sprintf(out, "retransmitted_lan_commands: %u\n",
1935 ipmi_get_stat(intf, retransmitted_lan_commands));
1936 out += sprintf(out, "timed_out_lan_commands: %u\n",
1937 ipmi_get_stat(intf, timed_out_lan_commands));
1938 out += sprintf(out, "sent_lan_responses: %u\n",
1939 ipmi_get_stat(intf, sent_lan_responses));
1940 out += sprintf(out, "handled_lan_responses: %u\n",
1941 ipmi_get_stat(intf, handled_lan_responses));
1942 out += sprintf(out, "invalid_lan_responses: %u\n",
1943 ipmi_get_stat(intf, invalid_lan_responses));
1944 out += sprintf(out, "unhandled_lan_responses: %u\n",
1945 ipmi_get_stat(intf, unhandled_lan_responses));
1946 out += sprintf(out, "handled_commands: %u\n",
1947 ipmi_get_stat(intf, handled_commands));
1948 out += sprintf(out, "invalid_commands: %u\n",
1949 ipmi_get_stat(intf, invalid_commands));
1950 out += sprintf(out, "unhandled_commands: %u\n",
1951 ipmi_get_stat(intf, unhandled_commands));
1952 out += sprintf(out, "invalid_events: %u\n",
1953 ipmi_get_stat(intf, invalid_events));
1954 out += sprintf(out, "events: %u\n",
1955 ipmi_get_stat(intf, events));
1956 out += sprintf(out, "failed rexmit LAN msgs: %u\n",
1957 ipmi_get_stat(intf, dropped_rexmit_lan_commands));
1958 out += sprintf(out, "failed rexmit IPMB msgs: %u\n",
1959 ipmi_get_stat(intf, dropped_rexmit_ipmb_commands));
1960
1961 return (out - ((char *) page));
1962 }
1963 #endif /* CONFIG_PROC_FS */
1964
1965 int ipmi_smi_add_proc_entry(ipmi_smi_t smi, char *name,
1966 read_proc_t *read_proc,
1967 void *data)
1968 {
1969 int rv = 0;
1970 #ifdef CONFIG_PROC_FS
1971 struct proc_dir_entry *file;
1972 struct ipmi_proc_entry *entry;
1973
1974 /* Create a list element. */
1975 entry = kmalloc(sizeof(*entry), GFP_KERNEL);
1976 if (!entry)
1977 return -ENOMEM;
1978 entry->name = kmalloc(strlen(name)+1, GFP_KERNEL);
1979 if (!entry->name) {
1980 kfree(entry);
1981 return -ENOMEM;
1982 }
1983 strcpy(entry->name, name);
1984
1985 file = create_proc_entry(name, 0, smi->proc_dir);
1986 if (!file) {
1987 kfree(entry->name);
1988 kfree(entry);
1989 rv = -ENOMEM;
1990 } else {
1991 file->data = data;
1992 file->read_proc = read_proc;
1993
1994 mutex_lock(&smi->proc_entry_lock);
1995 /* Stick it on the list. */
1996 entry->next = smi->proc_entries;
1997 smi->proc_entries = entry;
1998 mutex_unlock(&smi->proc_entry_lock);
1999 }
2000 #endif /* CONFIG_PROC_FS */
2001
2002 return rv;
2003 }
2004 EXPORT_SYMBOL(ipmi_smi_add_proc_entry);
2005
2006 static int add_proc_entries(ipmi_smi_t smi, int num)
2007 {
2008 int rv = 0;
2009
2010 #ifdef CONFIG_PROC_FS
2011 sprintf(smi->proc_dir_name, "%d", num);
2012 smi->proc_dir = proc_mkdir(smi->proc_dir_name, proc_ipmi_root);
2013 if (!smi->proc_dir)
2014 rv = -ENOMEM;
2015
2016 if (rv == 0)
2017 rv = ipmi_smi_add_proc_entry(smi, "stats",
2018 stat_file_read_proc,
2019 smi);
2020
2021 if (rv == 0)
2022 rv = ipmi_smi_add_proc_entry(smi, "ipmb",
2023 ipmb_file_read_proc,
2024 smi);
2025
2026 if (rv == 0)
2027 rv = ipmi_smi_add_proc_entry(smi, "version",
2028 version_file_read_proc,
2029 smi);
2030 #endif /* CONFIG_PROC_FS */
2031
2032 return rv;
2033 }
2034
2035 static void remove_proc_entries(ipmi_smi_t smi)
2036 {
2037 #ifdef CONFIG_PROC_FS
2038 struct ipmi_proc_entry *entry;
2039
2040 mutex_lock(&smi->proc_entry_lock);
2041 while (smi->proc_entries) {
2042 entry = smi->proc_entries;
2043 smi->proc_entries = entry->next;
2044
2045 remove_proc_entry(entry->name, smi->proc_dir);
2046 kfree(entry->name);
2047 kfree(entry);
2048 }
2049 mutex_unlock(&smi->proc_entry_lock);
2050 remove_proc_entry(smi->proc_dir_name, proc_ipmi_root);
2051 #endif /* CONFIG_PROC_FS */
2052 }
2053
2054 static int __find_bmc_guid(struct device *dev, void *data)
2055 {
2056 unsigned char *id = data;
2057 struct bmc_device *bmc = dev_get_drvdata(dev);
2058 return memcmp(bmc->guid, id, 16) == 0;
2059 }
2060
2061 static struct bmc_device *ipmi_find_bmc_guid(struct device_driver *drv,
2062 unsigned char *guid)
2063 {
2064 struct device *dev;
2065
2066 dev = driver_find_device(drv, NULL, guid, __find_bmc_guid);
2067 if (dev)
2068 return dev_get_drvdata(dev);
2069 else
2070 return NULL;
2071 }
2072
2073 struct prod_dev_id {
2074 unsigned int product_id;
2075 unsigned char device_id;
2076 };
2077
2078 static int __find_bmc_prod_dev_id(struct device *dev, void *data)
2079 {
2080 struct prod_dev_id *id = data;
2081 struct bmc_device *bmc = dev_get_drvdata(dev);
2082
2083 return (bmc->id.product_id == id->product_id
2084 && bmc->id.device_id == id->device_id);
2085 }
2086
2087 static struct bmc_device *ipmi_find_bmc_prod_dev_id(
2088 struct device_driver *drv,
2089 unsigned int product_id, unsigned char device_id)
2090 {
2091 struct prod_dev_id id = {
2092 .product_id = product_id,
2093 .device_id = device_id,
2094 };
2095 struct device *dev;
2096
2097 dev = driver_find_device(drv, NULL, &id, __find_bmc_prod_dev_id);
2098 if (dev)
2099 return dev_get_drvdata(dev);
2100 else
2101 return NULL;
2102 }
2103
2104 static ssize_t device_id_show(struct device *dev,
2105 struct device_attribute *attr,
2106 char *buf)
2107 {
2108 struct bmc_device *bmc = dev_get_drvdata(dev);
2109
2110 return snprintf(buf, 10, "%u\n", bmc->id.device_id);
2111 }
2112
2113 static ssize_t provides_dev_sdrs_show(struct device *dev,
2114 struct device_attribute *attr,
2115 char *buf)
2116 {
2117 struct bmc_device *bmc = dev_get_drvdata(dev);
2118
2119 return snprintf(buf, 10, "%u\n",
2120 (bmc->id.device_revision & 0x80) >> 7);
2121 }
2122
2123 static ssize_t revision_show(struct device *dev, struct device_attribute *attr,
2124 char *buf)
2125 {
2126 struct bmc_device *bmc = dev_get_drvdata(dev);
2127
2128 return snprintf(buf, 20, "%u\n",
2129 bmc->id.device_revision & 0x0F);
2130 }
2131
2132 static ssize_t firmware_rev_show(struct device *dev,
2133 struct device_attribute *attr,
2134 char *buf)
2135 {
2136 struct bmc_device *bmc = dev_get_drvdata(dev);
2137
2138 return snprintf(buf, 20, "%u.%x\n", bmc->id.firmware_revision_1,
2139 bmc->id.firmware_revision_2);
2140 }
2141
2142 static ssize_t ipmi_version_show(struct device *dev,
2143 struct device_attribute *attr,
2144 char *buf)
2145 {
2146 struct bmc_device *bmc = dev_get_drvdata(dev);
2147
2148 return snprintf(buf, 20, "%u.%u\n",
2149 ipmi_version_major(&bmc->id),
2150 ipmi_version_minor(&bmc->id));
2151 }
2152
2153 static ssize_t add_dev_support_show(struct device *dev,
2154 struct device_attribute *attr,
2155 char *buf)
2156 {
2157 struct bmc_device *bmc = dev_get_drvdata(dev);
2158
2159 return snprintf(buf, 10, "0x%02x\n",
2160 bmc->id.additional_device_support);
2161 }
2162
2163 static ssize_t manufacturer_id_show(struct device *dev,
2164 struct device_attribute *attr,
2165 char *buf)
2166 {
2167 struct bmc_device *bmc = dev_get_drvdata(dev);
2168
2169 return snprintf(buf, 20, "0x%6.6x\n", bmc->id.manufacturer_id);
2170 }
2171
2172 static ssize_t product_id_show(struct device *dev,
2173 struct device_attribute *attr,
2174 char *buf)
2175 {
2176 struct bmc_device *bmc = dev_get_drvdata(dev);
2177
2178 return snprintf(buf, 10, "0x%4.4x\n", bmc->id.product_id);
2179 }
2180
2181 static ssize_t aux_firmware_rev_show(struct device *dev,
2182 struct device_attribute *attr,
2183 char *buf)
2184 {
2185 struct bmc_device *bmc = dev_get_drvdata(dev);
2186
2187 return snprintf(buf, 21, "0x%02x 0x%02x 0x%02x 0x%02x\n",
2188 bmc->id.aux_firmware_revision[3],
2189 bmc->id.aux_firmware_revision[2],
2190 bmc->id.aux_firmware_revision[1],
2191 bmc->id.aux_firmware_revision[0]);
2192 }
2193
2194 static ssize_t guid_show(struct device *dev, struct device_attribute *attr,
2195 char *buf)
2196 {
2197 struct bmc_device *bmc = dev_get_drvdata(dev);
2198
2199 return snprintf(buf, 100, "%Lx%Lx\n",
2200 (long long) bmc->guid[0],
2201 (long long) bmc->guid[8]);
2202 }
2203
2204 static void remove_files(struct bmc_device *bmc)
2205 {
2206 if (!bmc->dev)
2207 return;
2208
2209 device_remove_file(&bmc->dev->dev,
2210 &bmc->device_id_attr);
2211 device_remove_file(&bmc->dev->dev,
2212 &bmc->provides_dev_sdrs_attr);
2213 device_remove_file(&bmc->dev->dev,
2214 &bmc->revision_attr);
2215 device_remove_file(&bmc->dev->dev,
2216 &bmc->firmware_rev_attr);
2217 device_remove_file(&bmc->dev->dev,
2218 &bmc->version_attr);
2219 device_remove_file(&bmc->dev->dev,
2220 &bmc->add_dev_support_attr);
2221 device_remove_file(&bmc->dev->dev,
2222 &bmc->manufacturer_id_attr);
2223 device_remove_file(&bmc->dev->dev,
2224 &bmc->product_id_attr);
2225
2226 if (bmc->id.aux_firmware_revision_set)
2227 device_remove_file(&bmc->dev->dev,
2228 &bmc->aux_firmware_rev_attr);
2229 if (bmc->guid_set)
2230 device_remove_file(&bmc->dev->dev,
2231 &bmc->guid_attr);
2232 }
2233
2234 static void
2235 cleanup_bmc_device(struct kref *ref)
2236 {
2237 struct bmc_device *bmc;
2238
2239 bmc = container_of(ref, struct bmc_device, refcount);
2240
2241 remove_files(bmc);
2242 platform_device_unregister(bmc->dev);
2243 kfree(bmc);
2244 }
2245
2246 static void ipmi_bmc_unregister(ipmi_smi_t intf)
2247 {
2248 struct bmc_device *bmc = intf->bmc;
2249
2250 if (intf->sysfs_name) {
2251 sysfs_remove_link(&intf->si_dev->kobj, intf->sysfs_name);
2252 kfree(intf->sysfs_name);
2253 intf->sysfs_name = NULL;
2254 }
2255 if (intf->my_dev_name) {
2256 sysfs_remove_link(&bmc->dev->dev.kobj, intf->my_dev_name);
2257 kfree(intf->my_dev_name);
2258 intf->my_dev_name = NULL;
2259 }
2260
2261 mutex_lock(&ipmidriver_mutex);
2262 kref_put(&bmc->refcount, cleanup_bmc_device);
2263 intf->bmc = NULL;
2264 mutex_unlock(&ipmidriver_mutex);
2265 }
2266
2267 static int create_files(struct bmc_device *bmc)
2268 {
2269 int err;
2270
2271 bmc->device_id_attr.attr.name = "device_id";
2272 bmc->device_id_attr.attr.mode = S_IRUGO;
2273 bmc->device_id_attr.show = device_id_show;
2274
2275 bmc->provides_dev_sdrs_attr.attr.name = "provides_device_sdrs";
2276 bmc->provides_dev_sdrs_attr.attr.mode = S_IRUGO;
2277 bmc->provides_dev_sdrs_attr.show = provides_dev_sdrs_show;
2278
2279 bmc->revision_attr.attr.name = "revision";
2280 bmc->revision_attr.attr.mode = S_IRUGO;
2281 bmc->revision_attr.show = revision_show;
2282
2283 bmc->firmware_rev_attr.attr.name = "firmware_revision";
2284 bmc->firmware_rev_attr.attr.mode = S_IRUGO;
2285 bmc->firmware_rev_attr.show = firmware_rev_show;
2286
2287 bmc->version_attr.attr.name = "ipmi_version";
2288 bmc->version_attr.attr.mode = S_IRUGO;
2289 bmc->version_attr.show = ipmi_version_show;
2290
2291 bmc->add_dev_support_attr.attr.name = "additional_device_support";
2292 bmc->add_dev_support_attr.attr.mode = S_IRUGO;
2293 bmc->add_dev_support_attr.show = add_dev_support_show;
2294
2295 bmc->manufacturer_id_attr.attr.name = "manufacturer_id";
2296 bmc->manufacturer_id_attr.attr.mode = S_IRUGO;
2297 bmc->manufacturer_id_attr.show = manufacturer_id_show;
2298
2299 bmc->product_id_attr.attr.name = "product_id";
2300 bmc->product_id_attr.attr.mode = S_IRUGO;
2301 bmc->product_id_attr.show = product_id_show;
2302
2303 bmc->guid_attr.attr.name = "guid";
2304 bmc->guid_attr.attr.mode = S_IRUGO;
2305 bmc->guid_attr.show = guid_show;
2306
2307 bmc->aux_firmware_rev_attr.attr.name = "aux_firmware_revision";
2308 bmc->aux_firmware_rev_attr.attr.mode = S_IRUGO;
2309 bmc->aux_firmware_rev_attr.show = aux_firmware_rev_show;
2310
2311 err = device_create_file(&bmc->dev->dev,
2312 &bmc->device_id_attr);
2313 if (err)
2314 goto out;
2315 err = device_create_file(&bmc->dev->dev,
2316 &bmc->provides_dev_sdrs_attr);
2317 if (err)
2318 goto out_devid;
2319 err = device_create_file(&bmc->dev->dev,
2320 &bmc->revision_attr);
2321 if (err)
2322 goto out_sdrs;
2323 err = device_create_file(&bmc->dev->dev,
2324 &bmc->firmware_rev_attr);
2325 if (err)
2326 goto out_rev;
2327 err = device_create_file(&bmc->dev->dev,
2328 &bmc->version_attr);
2329 if (err)
2330 goto out_firm;
2331 err = device_create_file(&bmc->dev->dev,
2332 &bmc->add_dev_support_attr);
2333 if (err)
2334 goto out_version;
2335 err = device_create_file(&bmc->dev->dev,
2336 &bmc->manufacturer_id_attr);
2337 if (err)
2338 goto out_add_dev;
2339 err = device_create_file(&bmc->dev->dev,
2340 &bmc->product_id_attr);
2341 if (err)
2342 goto out_manu;
2343 if (bmc->id.aux_firmware_revision_set) {
2344 err = device_create_file(&bmc->dev->dev,
2345 &bmc->aux_firmware_rev_attr);
2346 if (err)
2347 goto out_prod_id;
2348 }
2349 if (bmc->guid_set) {
2350 err = device_create_file(&bmc->dev->dev,
2351 &bmc->guid_attr);
2352 if (err)
2353 goto out_aux_firm;
2354 }
2355
2356 return 0;
2357
2358 out_aux_firm:
2359 if (bmc->id.aux_firmware_revision_set)
2360 device_remove_file(&bmc->dev->dev,
2361 &bmc->aux_firmware_rev_attr);
2362 out_prod_id:
2363 device_remove_file(&bmc->dev->dev,
2364 &bmc->product_id_attr);
2365 out_manu:
2366 device_remove_file(&bmc->dev->dev,
2367 &bmc->manufacturer_id_attr);
2368 out_add_dev:
2369 device_remove_file(&bmc->dev->dev,
2370 &bmc->add_dev_support_attr);
2371 out_version:
2372 device_remove_file(&bmc->dev->dev,
2373 &bmc->version_attr);
2374 out_firm:
2375 device_remove_file(&bmc->dev->dev,
2376 &bmc->firmware_rev_attr);
2377 out_rev:
2378 device_remove_file(&bmc->dev->dev,
2379 &bmc->revision_attr);
2380 out_sdrs:
2381 device_remove_file(&bmc->dev->dev,
2382 &bmc->provides_dev_sdrs_attr);
2383 out_devid:
2384 device_remove_file(&bmc->dev->dev,
2385 &bmc->device_id_attr);
2386 out:
2387 return err;
2388 }
2389
2390 static int ipmi_bmc_register(ipmi_smi_t intf, int ifnum,
2391 const char *sysfs_name)
2392 {
2393 int rv;
2394 struct bmc_device *bmc = intf->bmc;
2395 struct bmc_device *old_bmc;
2396 int size;
2397 char dummy[1];
2398
2399 mutex_lock(&ipmidriver_mutex);
2400
2401 /*
2402 * Try to find if there is an bmc_device struct
2403 * representing the interfaced BMC already
2404 */
2405 if (bmc->guid_set)
2406 old_bmc = ipmi_find_bmc_guid(&ipmidriver.driver, bmc->guid);
2407 else
2408 old_bmc = ipmi_find_bmc_prod_dev_id(&ipmidriver.driver,
2409 bmc->id.product_id,
2410 bmc->id.device_id);
2411
2412 /*
2413 * If there is already an bmc_device, free the new one,
2414 * otherwise register the new BMC device
2415 */
2416 if (old_bmc) {
2417 kfree(bmc);
2418 intf->bmc = old_bmc;
2419 bmc = old_bmc;
2420
2421 kref_get(&bmc->refcount);
2422 mutex_unlock(&ipmidriver_mutex);
2423
2424 printk(KERN_INFO
2425 "ipmi: interfacing existing BMC (man_id: 0x%6.6x,"
2426 " prod_id: 0x%4.4x, dev_id: 0x%2.2x)\n",
2427 bmc->id.manufacturer_id,
2428 bmc->id.product_id,
2429 bmc->id.device_id);
2430 } else {
2431 char name[14];
2432 unsigned char orig_dev_id = bmc->id.device_id;
2433 int warn_printed = 0;
2434
2435 snprintf(name, sizeof(name),
2436 "ipmi_bmc.%4.4x", bmc->id.product_id);
2437
2438 while (ipmi_find_bmc_prod_dev_id(&ipmidriver.driver,
2439 bmc->id.product_id,
2440 bmc->id.device_id)) {
2441 if (!warn_printed) {
2442 printk(KERN_WARNING PFX
2443 "This machine has two different BMCs"
2444 " with the same product id and device"
2445 " id. This is an error in the"
2446 " firmware, but incrementing the"
2447 " device id to work around the problem."
2448 " Prod ID = 0x%x, Dev ID = 0x%x\n",
2449 bmc->id.product_id, bmc->id.device_id);
2450 warn_printed = 1;
2451 }
2452 bmc->id.device_id++; /* Wraps at 255 */
2453 if (bmc->id.device_id == orig_dev_id) {
2454 printk(KERN_ERR PFX
2455 "Out of device ids!\n");
2456 break;
2457 }
2458 }
2459
2460 bmc->dev = platform_device_alloc(name, bmc->id.device_id);
2461 if (!bmc->dev) {
2462 mutex_unlock(&ipmidriver_mutex);
2463 printk(KERN_ERR
2464 "ipmi_msghandler:"
2465 " Unable to allocate platform device\n");
2466 return -ENOMEM;
2467 }
2468 bmc->dev->dev.driver = &ipmidriver.driver;
2469 dev_set_drvdata(&bmc->dev->dev, bmc);
2470 kref_init(&bmc->refcount);
2471
2472 rv = platform_device_add(bmc->dev);
2473 mutex_unlock(&ipmidriver_mutex);
2474 if (rv) {
2475 platform_device_put(bmc->dev);
2476 bmc->dev = NULL;
2477 printk(KERN_ERR
2478 "ipmi_msghandler:"
2479 " Unable to register bmc device: %d\n",
2480 rv);
2481 /*
2482 * Don't go to out_err, you can only do that if
2483 * the device is registered already.
2484 */
2485 return rv;
2486 }
2487
2488 rv = create_files(bmc);
2489 if (rv) {
2490 mutex_lock(&ipmidriver_mutex);
2491 platform_device_unregister(bmc->dev);
2492 mutex_unlock(&ipmidriver_mutex);
2493
2494 return rv;
2495 }
2496
2497 printk(KERN_INFO
2498 "ipmi: Found new BMC (man_id: 0x%6.6x, "
2499 " prod_id: 0x%4.4x, dev_id: 0x%2.2x)\n",
2500 bmc->id.manufacturer_id,
2501 bmc->id.product_id,
2502 bmc->id.device_id);
2503 }
2504
2505 /*
2506 * create symlink from system interface device to bmc device
2507 * and back.
2508 */
2509 intf->sysfs_name = kstrdup(sysfs_name, GFP_KERNEL);
2510 if (!intf->sysfs_name) {
2511 rv = -ENOMEM;
2512 printk(KERN_ERR
2513 "ipmi_msghandler: allocate link to BMC: %d\n",
2514 rv);
2515 goto out_err;
2516 }
2517
2518 rv = sysfs_create_link(&intf->si_dev->kobj,
2519 &bmc->dev->dev.kobj, intf->sysfs_name);
2520 if (rv) {
2521 kfree(intf->sysfs_name);
2522 intf->sysfs_name = NULL;
2523 printk(KERN_ERR
2524 "ipmi_msghandler: Unable to create bmc symlink: %d\n",
2525 rv);
2526 goto out_err;
2527 }
2528
2529 size = snprintf(dummy, 0, "ipmi%d", ifnum);
2530 intf->my_dev_name = kmalloc(size+1, GFP_KERNEL);
2531 if (!intf->my_dev_name) {
2532 kfree(intf->sysfs_name);
2533 intf->sysfs_name = NULL;
2534 rv = -ENOMEM;
2535 printk(KERN_ERR
2536 "ipmi_msghandler: allocate link from BMC: %d\n",
2537 rv);
2538 goto out_err;
2539 }
2540 snprintf(intf->my_dev_name, size+1, "ipmi%d", ifnum);
2541
2542 rv = sysfs_create_link(&bmc->dev->dev.kobj, &intf->si_dev->kobj,
2543 intf->my_dev_name);
2544 if (rv) {
2545 kfree(intf->sysfs_name);
2546 intf->sysfs_name = NULL;
2547 kfree(intf->my_dev_name);
2548 intf->my_dev_name = NULL;
2549 printk(KERN_ERR
2550 "ipmi_msghandler:"
2551 " Unable to create symlink to bmc: %d\n",
2552 rv);
2553 goto out_err;
2554 }
2555
2556 return 0;
2557
2558 out_err:
2559 ipmi_bmc_unregister(intf);
2560 return rv;
2561 }
2562
2563 static int
2564 send_guid_cmd(ipmi_smi_t intf, int chan)
2565 {
2566 struct kernel_ipmi_msg msg;
2567 struct ipmi_system_interface_addr si;
2568
2569 si.addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
2570 si.channel = IPMI_BMC_CHANNEL;
2571 si.lun = 0;
2572
2573 msg.netfn = IPMI_NETFN_APP_REQUEST;
2574 msg.cmd = IPMI_GET_DEVICE_GUID_CMD;
2575 msg.data = NULL;
2576 msg.data_len = 0;
2577 return i_ipmi_request(NULL,
2578 intf,
2579 (struct ipmi_addr *) &si,
2580 0,
2581 &msg,
2582 intf,
2583 NULL,
2584 NULL,
2585 0,
2586 intf->channels[0].address,
2587 intf->channels[0].lun,
2588 -1, 0);
2589 }
2590
2591 static void
2592 guid_handler(ipmi_smi_t intf, struct ipmi_recv_msg *msg)
2593 {
2594 if ((msg->addr.addr_type != IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
2595 || (msg->msg.netfn != IPMI_NETFN_APP_RESPONSE)
2596 || (msg->msg.cmd != IPMI_GET_DEVICE_GUID_CMD))
2597 /* Not for me */
2598 return;
2599
2600 if (msg->msg.data[0] != 0) {
2601 /* Error from getting the GUID, the BMC doesn't have one. */
2602 intf->bmc->guid_set = 0;
2603 goto out;
2604 }
2605
2606 if (msg->msg.data_len < 17) {
2607 intf->bmc->guid_set = 0;
2608 printk(KERN_WARNING PFX
2609 "guid_handler: The GUID response from the BMC was too"
2610 " short, it was %d but should have been 17. Assuming"
2611 " GUID is not available.\n",
2612 msg->msg.data_len);
2613 goto out;
2614 }
2615
2616 memcpy(intf->bmc->guid, msg->msg.data, 16);
2617 intf->bmc->guid_set = 1;
2618 out:
2619 wake_up(&intf->waitq);
2620 }
2621
2622 static void
2623 get_guid(ipmi_smi_t intf)
2624 {
2625 int rv;
2626
2627 intf->bmc->guid_set = 0x2;
2628 intf->null_user_handler = guid_handler;
2629 rv = send_guid_cmd(intf, 0);
2630 if (rv)
2631 /* Send failed, no GUID available. */
2632 intf->bmc->guid_set = 0;
2633 wait_event(intf->waitq, intf->bmc->guid_set != 2);
2634 intf->null_user_handler = NULL;
2635 }
2636
2637 static int
2638 send_channel_info_cmd(ipmi_smi_t intf, int chan)
2639 {
2640 struct kernel_ipmi_msg msg;
2641 unsigned char data[1];
2642 struct ipmi_system_interface_addr si;
2643
2644 si.addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
2645 si.channel = IPMI_BMC_CHANNEL;
2646 si.lun = 0;
2647
2648 msg.netfn = IPMI_NETFN_APP_REQUEST;
2649 msg.cmd = IPMI_GET_CHANNEL_INFO_CMD;
2650 msg.data = data;
2651 msg.data_len = 1;
2652 data[0] = chan;
2653 return i_ipmi_request(NULL,
2654 intf,
2655 (struct ipmi_addr *) &si,
2656 0,
2657 &msg,
2658 intf,
2659 NULL,
2660 NULL,
2661 0,
2662 intf->channels[0].address,
2663 intf->channels[0].lun,
2664 -1, 0);
2665 }
2666
2667 static void
2668 channel_handler(ipmi_smi_t intf, struct ipmi_recv_msg *msg)
2669 {
2670 int rv = 0;
2671 int chan;
2672
2673 if ((msg->addr.addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
2674 && (msg->msg.netfn == IPMI_NETFN_APP_RESPONSE)
2675 && (msg->msg.cmd == IPMI_GET_CHANNEL_INFO_CMD)) {
2676 /* It's the one we want */
2677 if (msg->msg.data[0] != 0) {
2678 /* Got an error from the channel, just go on. */
2679
2680 if (msg->msg.data[0] == IPMI_INVALID_COMMAND_ERR) {
2681 /*
2682 * If the MC does not support this
2683 * command, that is legal. We just
2684 * assume it has one IPMB at channel
2685 * zero.
2686 */
2687 intf->channels[0].medium
2688 = IPMI_CHANNEL_MEDIUM_IPMB;
2689 intf->channels[0].protocol
2690 = IPMI_CHANNEL_PROTOCOL_IPMB;
2691 rv = -ENOSYS;
2692
2693 intf->curr_channel = IPMI_MAX_CHANNELS;
2694 wake_up(&intf->waitq);
2695 goto out;
2696 }
2697 goto next_channel;
2698 }
2699 if (msg->msg.data_len < 4) {
2700 /* Message not big enough, just go on. */
2701 goto next_channel;
2702 }
2703 chan = intf->curr_channel;
2704 intf->channels[chan].medium = msg->msg.data[2] & 0x7f;
2705 intf->channels[chan].protocol = msg->msg.data[3] & 0x1f;
2706
2707 next_channel:
2708 intf->curr_channel++;
2709 if (intf->curr_channel >= IPMI_MAX_CHANNELS)
2710 wake_up(&intf->waitq);
2711 else
2712 rv = send_channel_info_cmd(intf, intf->curr_channel);
2713
2714 if (rv) {
2715 /* Got an error somehow, just give up. */
2716 intf->curr_channel = IPMI_MAX_CHANNELS;
2717 wake_up(&intf->waitq);
2718
2719 printk(KERN_WARNING PFX
2720 "Error sending channel information: %d\n",
2721 rv);
2722 }
2723 }
2724 out:
2725 return;
2726 }
2727
2728 void ipmi_poll_interface(ipmi_user_t user)
2729 {
2730 ipmi_smi_t intf = user->intf;
2731
2732 if (intf->handlers->poll)
2733 intf->handlers->poll(intf->send_info);
2734 }
2735 EXPORT_SYMBOL(ipmi_poll_interface);
2736
2737 int ipmi_register_smi(struct ipmi_smi_handlers *handlers,
2738 void *send_info,
2739 struct ipmi_device_id *device_id,
2740 struct device *si_dev,
2741 const char *sysfs_name,
2742 unsigned char slave_addr)
2743 {
2744 int i, j;
2745 int rv;
2746 ipmi_smi_t intf;
2747 ipmi_smi_t tintf;
2748 struct list_head *link;
2749
2750 /*
2751 * Make sure the driver is actually initialized, this handles
2752 * problems with initialization order.
2753 */
2754 if (!initialized) {
2755 rv = ipmi_init_msghandler();
2756 if (rv)
2757 return rv;
2758 /*
2759 * The init code doesn't return an error if it was turned
2760 * off, but it won't initialize. Check that.
2761 */
2762 if (!initialized)
2763 return -ENODEV;
2764 }
2765
2766 intf = kzalloc(sizeof(*intf), GFP_KERNEL);
2767 if (!intf)
2768 return -ENOMEM;
2769
2770 intf->ipmi_version_major = ipmi_version_major(device_id);
2771 intf->ipmi_version_minor = ipmi_version_minor(device_id);
2772
2773 intf->bmc = kzalloc(sizeof(*intf->bmc), GFP_KERNEL);
2774 if (!intf->bmc) {
2775 kfree(intf);
2776 return -ENOMEM;
2777 }
2778 intf->intf_num = -1; /* Mark it invalid for now. */
2779 kref_init(&intf->refcount);
2780 intf->bmc->id = *device_id;
2781 intf->si_dev = si_dev;
2782 for (j = 0; j < IPMI_MAX_CHANNELS; j++) {
2783 intf->channels[j].address = IPMI_BMC_SLAVE_ADDR;
2784 intf->channels[j].lun = 2;
2785 }
2786 if (slave_addr != 0)
2787 intf->channels[0].address = slave_addr;
2788 INIT_LIST_HEAD(&intf->users);
2789 intf->handlers = handlers;
2790 intf->send_info = send_info;
2791 spin_lock_init(&intf->seq_lock);
2792 for (j = 0; j < IPMI_IPMB_NUM_SEQ; j++) {
2793 intf->seq_table[j].inuse = 0;
2794 intf->seq_table[j].seqid = 0;
2795 }
2796 intf->curr_seq = 0;
2797 #ifdef CONFIG_PROC_FS
2798 mutex_init(&intf->proc_entry_lock);
2799 #endif
2800 spin_lock_init(&intf->waiting_msgs_lock);
2801 INIT_LIST_HEAD(&intf->waiting_msgs);
2802 spin_lock_init(&intf->events_lock);
2803 INIT_LIST_HEAD(&intf->waiting_events);
2804 intf->waiting_events_count = 0;
2805 mutex_init(&intf->cmd_rcvrs_mutex);
2806 spin_lock_init(&intf->maintenance_mode_lock);
2807 INIT_LIST_HEAD(&intf->cmd_rcvrs);
2808 init_waitqueue_head(&intf->waitq);
2809 for (i = 0; i < IPMI_NUM_STATS; i++)
2810 atomic_set(&intf->stats[i], 0);
2811
2812 intf->proc_dir = NULL;
2813
2814 mutex_lock(&smi_watchers_mutex);
2815 mutex_lock(&ipmi_interfaces_mutex);
2816 /* Look for a hole in the numbers. */
2817 i = 0;
2818 link = &ipmi_interfaces;
2819 list_for_each_entry_rcu(tintf, &ipmi_interfaces, link) {
2820 if (tintf->intf_num != i) {
2821 link = &tintf->link;
2822 break;
2823 }
2824 i++;
2825 }
2826 /* Add the new interface in numeric order. */
2827 if (i == 0)
2828 list_add_rcu(&intf->link, &ipmi_interfaces);
2829 else
2830 list_add_tail_rcu(&intf->link, link);
2831
2832 rv = handlers->start_processing(send_info, intf);
2833 if (rv)
2834 goto out;
2835
2836 get_guid(intf);
2837
2838 if ((intf->ipmi_version_major > 1)
2839 || ((intf->ipmi_version_major == 1)
2840 && (intf->ipmi_version_minor >= 5))) {
2841 /*
2842 * Start scanning the channels to see what is
2843 * available.
2844 */
2845 intf->null_user_handler = channel_handler;
2846 intf->curr_channel = 0;
2847 rv = send_channel_info_cmd(intf, 0);
2848 if (rv)
2849 goto out;
2850
2851 /* Wait for the channel info to be read. */
2852 wait_event(intf->waitq,
2853 intf->curr_channel >= IPMI_MAX_CHANNELS);
2854 intf->null_user_handler = NULL;
2855 } else {
2856 /* Assume a single IPMB channel at zero. */
2857 intf->channels[0].medium = IPMI_CHANNEL_MEDIUM_IPMB;
2858 intf->channels[0].protocol = IPMI_CHANNEL_PROTOCOL_IPMB;
2859 intf->curr_channel = IPMI_MAX_CHANNELS;
2860 }
2861
2862 if (rv == 0)
2863 rv = add_proc_entries(intf, i);
2864
2865 rv = ipmi_bmc_register(intf, i, sysfs_name);
2866
2867 out:
2868 if (rv) {
2869 if (intf->proc_dir)
2870 remove_proc_entries(intf);
2871 intf->handlers = NULL;
2872 list_del_rcu(&intf->link);
2873 mutex_unlock(&ipmi_interfaces_mutex);
2874 mutex_unlock(&smi_watchers_mutex);
2875 synchronize_rcu();
2876 kref_put(&intf->refcount, intf_free);
2877 } else {
2878 /*
2879 * Keep memory order straight for RCU readers. Make
2880 * sure everything else is committed to memory before
2881 * setting intf_num to mark the interface valid.
2882 */
2883 smp_wmb();
2884 intf->intf_num = i;
2885 mutex_unlock(&ipmi_interfaces_mutex);
2886 /* After this point the interface is legal to use. */
2887 call_smi_watchers(i, intf->si_dev);
2888 mutex_unlock(&smi_watchers_mutex);
2889 }
2890
2891 return rv;
2892 }
2893 EXPORT_SYMBOL(ipmi_register_smi);
2894
2895 static void cleanup_smi_msgs(ipmi_smi_t intf)
2896 {
2897 int i;
2898 struct seq_table *ent;
2899
2900 /* No need for locks, the interface is down. */
2901 for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++) {
2902 ent = &(intf->seq_table[i]);
2903 if (!ent->inuse)
2904 continue;
2905 deliver_err_response(ent->recv_msg, IPMI_ERR_UNSPECIFIED);
2906 }
2907 }
2908
2909 int ipmi_unregister_smi(ipmi_smi_t intf)
2910 {
2911 struct ipmi_smi_watcher *w;
2912 int intf_num = intf->intf_num;
2913
2914 ipmi_bmc_unregister(intf);
2915
2916 mutex_lock(&smi_watchers_mutex);
2917 mutex_lock(&ipmi_interfaces_mutex);
2918 intf->intf_num = -1;
2919 intf->handlers = NULL;
2920 list_del_rcu(&intf->link);
2921 mutex_unlock(&ipmi_interfaces_mutex);
2922 synchronize_rcu();
2923
2924 cleanup_smi_msgs(intf);
2925
2926 remove_proc_entries(intf);
2927
2928 /*
2929 * Call all the watcher interfaces to tell them that
2930 * an interface is gone.
2931 */
2932 list_for_each_entry(w, &smi_watchers, link)
2933 w->smi_gone(intf_num);
2934 mutex_unlock(&smi_watchers_mutex);
2935
2936 kref_put(&intf->refcount, intf_free);
2937 return 0;
2938 }
2939 EXPORT_SYMBOL(ipmi_unregister_smi);
2940
2941 static int handle_ipmb_get_msg_rsp(ipmi_smi_t intf,
2942 struct ipmi_smi_msg *msg)
2943 {
2944 struct ipmi_ipmb_addr ipmb_addr;
2945 struct ipmi_recv_msg *recv_msg;
2946
2947 /*
2948 * This is 11, not 10, because the response must contain a
2949 * completion code.
2950 */
2951 if (msg->rsp_size < 11) {
2952 /* Message not big enough, just ignore it. */
2953 ipmi_inc_stat(intf, invalid_ipmb_responses);
2954 return 0;
2955 }
2956
2957 if (msg->rsp[2] != 0) {
2958 /* An error getting the response, just ignore it. */
2959 return 0;
2960 }
2961
2962 ipmb_addr.addr_type = IPMI_IPMB_ADDR_TYPE;
2963 ipmb_addr.slave_addr = msg->rsp[6];
2964 ipmb_addr.channel = msg->rsp[3] & 0x0f;
2965 ipmb_addr.lun = msg->rsp[7] & 3;
2966
2967 /*
2968 * It's a response from a remote entity. Look up the sequence
2969 * number and handle the response.
2970 */
2971 if (intf_find_seq(intf,
2972 msg->rsp[7] >> 2,
2973 msg->rsp[3] & 0x0f,
2974 msg->rsp[8],
2975 (msg->rsp[4] >> 2) & (~1),
2976 (struct ipmi_addr *) &(ipmb_addr),
2977 &recv_msg)) {
2978 /*
2979 * We were unable to find the sequence number,
2980 * so just nuke the message.
2981 */
2982 ipmi_inc_stat(intf, unhandled_ipmb_responses);
2983 return 0;
2984 }
2985
2986 memcpy(recv_msg->msg_data,
2987 &(msg->rsp[9]),
2988 msg->rsp_size - 9);
2989 /*
2990 * The other fields matched, so no need to set them, except
2991 * for netfn, which needs to be the response that was
2992 * returned, not the request value.
2993 */
2994 recv_msg->msg.netfn = msg->rsp[4] >> 2;
2995 recv_msg->msg.data = recv_msg->msg_data;
2996 recv_msg->msg.data_len = msg->rsp_size - 10;
2997 recv_msg->recv_type = IPMI_RESPONSE_RECV_TYPE;
2998 ipmi_inc_stat(intf, handled_ipmb_responses);
2999 deliver_response(recv_msg);
3000
3001 return 0;
3002 }
3003
3004 static int handle_ipmb_get_msg_cmd(ipmi_smi_t intf,
3005 struct ipmi_smi_msg *msg)
3006 {
3007 struct cmd_rcvr *rcvr;
3008 int rv = 0;
3009 unsigned char netfn;
3010 unsigned char cmd;
3011 unsigned char chan;
3012 ipmi_user_t user = NULL;
3013 struct ipmi_ipmb_addr *ipmb_addr;
3014 struct ipmi_recv_msg *recv_msg;
3015 struct ipmi_smi_handlers *handlers;
3016
3017 if (msg->rsp_size < 10) {
3018 /* Message not big enough, just ignore it. */
3019 ipmi_inc_stat(intf, invalid_commands);
3020 return 0;
3021 }
3022
3023 if (msg->rsp[2] != 0) {
3024 /* An error getting the response, just ignore it. */
3025 return 0;
3026 }
3027
3028 netfn = msg->rsp[4] >> 2;
3029 cmd = msg->rsp[8];
3030 chan = msg->rsp[3] & 0xf;
3031
3032 rcu_read_lock();
3033 rcvr = find_cmd_rcvr(intf, netfn, cmd, chan);
3034 if (rcvr) {
3035 user = rcvr->user;
3036 kref_get(&user->refcount);
3037 } else
3038 user = NULL;
3039 rcu_read_unlock();
3040
3041 if (user == NULL) {
3042 /* We didn't find a user, deliver an error response. */
3043 ipmi_inc_stat(intf, unhandled_commands);
3044
3045 msg->data[0] = (IPMI_NETFN_APP_REQUEST << 2);
3046 msg->data[1] = IPMI_SEND_MSG_CMD;
3047 msg->data[2] = msg->rsp[3];
3048 msg->data[3] = msg->rsp[6];
3049 msg->data[4] = ((netfn + 1) << 2) | (msg->rsp[7] & 0x3);
3050 msg->data[5] = ipmb_checksum(&(msg->data[3]), 2);
3051 msg->data[6] = intf->channels[msg->rsp[3] & 0xf].address;
3052 /* rqseq/lun */
3053 msg->data[7] = (msg->rsp[7] & 0xfc) | (msg->rsp[4] & 0x3);
3054 msg->data[8] = msg->rsp[8]; /* cmd */
3055 msg->data[9] = IPMI_INVALID_CMD_COMPLETION_CODE;
3056 msg->data[10] = ipmb_checksum(&(msg->data[6]), 4);
3057 msg->data_size = 11;
3058
3059 #ifdef DEBUG_MSGING
3060 {
3061 int m;
3062 printk("Invalid command:");
3063 for (m = 0; m < msg->data_size; m++)
3064 printk(" %2.2x", msg->data[m]);
3065 printk("\n");
3066 }
3067 #endif
3068 rcu_read_lock();
3069 handlers = intf->handlers;
3070 if (handlers) {
3071 handlers->sender(intf->send_info, msg, 0);
3072 /*
3073 * We used the message, so return the value
3074 * that causes it to not be freed or
3075 * queued.
3076 */
3077 rv = -1;
3078 }
3079 rcu_read_unlock();
3080 } else {
3081 /* Deliver the message to the user. */
3082 ipmi_inc_stat(intf, handled_commands);
3083
3084 recv_msg = ipmi_alloc_recv_msg();
3085 if (!recv_msg) {
3086 /*
3087 * We couldn't allocate memory for the
3088 * message, so requeue it for handling
3089 * later.
3090 */
3091 rv = 1;
3092 kref_put(&user->refcount, free_user);
3093 } else {
3094 /* Extract the source address from the data. */
3095 ipmb_addr = (struct ipmi_ipmb_addr *) &recv_msg->addr;
3096 ipmb_addr->addr_type = IPMI_IPMB_ADDR_TYPE;
3097 ipmb_addr->slave_addr = msg->rsp[6];
3098 ipmb_addr->lun = msg->rsp[7] & 3;
3099 ipmb_addr->channel = msg->rsp[3] & 0xf;
3100
3101 /*
3102 * Extract the rest of the message information
3103 * from the IPMB header.
3104 */
3105 recv_msg->user = user;
3106 recv_msg->recv_type = IPMI_CMD_RECV_TYPE;
3107 recv_msg->msgid = msg->rsp[7] >> 2;
3108 recv_msg->msg.netfn = msg->rsp[4] >> 2;
3109 recv_msg->msg.cmd = msg->rsp[8];
3110 recv_msg->msg.data = recv_msg->msg_data;
3111
3112 /*
3113 * We chop off 10, not 9 bytes because the checksum
3114 * at the end also needs to be removed.
3115 */
3116 recv_msg->msg.data_len = msg->rsp_size - 10;
3117 memcpy(recv_msg->msg_data,
3118 &(msg->rsp[9]),
3119 msg->rsp_size - 10);
3120 deliver_response(recv_msg);
3121 }
3122 }
3123
3124 return rv;
3125 }
3126
3127 static int handle_lan_get_msg_rsp(ipmi_smi_t intf,
3128 struct ipmi_smi_msg *msg)
3129 {
3130 struct ipmi_lan_addr lan_addr;
3131 struct ipmi_recv_msg *recv_msg;
3132
3133
3134 /*
3135 * This is 13, not 12, because the response must contain a
3136 * completion code.
3137 */
3138 if (msg->rsp_size < 13) {
3139 /* Message not big enough, just ignore it. */
3140 ipmi_inc_stat(intf, invalid_lan_responses);
3141 return 0;
3142 }
3143
3144 if (msg->rsp[2] != 0) {
3145 /* An error getting the response, just ignore it. */
3146 return 0;
3147 }
3148
3149 lan_addr.addr_type = IPMI_LAN_ADDR_TYPE;
3150 lan_addr.session_handle = msg->rsp[4];
3151 lan_addr.remote_SWID = msg->rsp[8];
3152 lan_addr.local_SWID = msg->rsp[5];
3153 lan_addr.channel = msg->rsp[3] & 0x0f;
3154 lan_addr.privilege = msg->rsp[3] >> 4;
3155 lan_addr.lun = msg->rsp[9] & 3;
3156
3157 /*
3158 * It's a response from a remote entity. Look up the sequence
3159 * number and handle the response.
3160 */
3161 if (intf_find_seq(intf,
3162 msg->rsp[9] >> 2,
3163 msg->rsp[3] & 0x0f,
3164 msg->rsp[10],
3165 (msg->rsp[6] >> 2) & (~1),
3166 (struct ipmi_addr *) &(lan_addr),
3167 &recv_msg)) {
3168 /*
3169 * We were unable to find the sequence number,
3170 * so just nuke the message.
3171 */
3172 ipmi_inc_stat(intf, unhandled_lan_responses);
3173 return 0;
3174 }
3175
3176 memcpy(recv_msg->msg_data,
3177 &(msg->rsp[11]),
3178 msg->rsp_size - 11);
3179 /*
3180 * The other fields matched, so no need to set them, except
3181 * for netfn, which needs to be the response that was
3182 * returned, not the request value.
3183 */
3184 recv_msg->msg.netfn = msg->rsp[6] >> 2;
3185 recv_msg->msg.data = recv_msg->msg_data;
3186 recv_msg->msg.data_len = msg->rsp_size - 12;
3187 recv_msg->recv_type = IPMI_RESPONSE_RECV_TYPE;
3188 ipmi_inc_stat(intf, handled_lan_responses);
3189 deliver_response(recv_msg);
3190
3191 return 0;
3192 }
3193
3194 static int handle_lan_get_msg_cmd(ipmi_smi_t intf,
3195 struct ipmi_smi_msg *msg)
3196 {
3197 struct cmd_rcvr *rcvr;
3198 int rv = 0;
3199 unsigned char netfn;
3200 unsigned char cmd;
3201 unsigned char chan;
3202 ipmi_user_t user = NULL;
3203 struct ipmi_lan_addr *lan_addr;
3204 struct ipmi_recv_msg *recv_msg;
3205
3206 if (msg->rsp_size < 12) {
3207 /* Message not big enough, just ignore it. */
3208 ipmi_inc_stat(intf, invalid_commands);
3209 return 0;
3210 }
3211
3212 if (msg->rsp[2] != 0) {
3213 /* An error getting the response, just ignore it. */
3214 return 0;
3215 }
3216
3217 netfn = msg->rsp[6] >> 2;
3218 cmd = msg->rsp[10];
3219 chan = msg->rsp[3] & 0xf;
3220
3221 rcu_read_lock();
3222 rcvr = find_cmd_rcvr(intf, netfn, cmd, chan);
3223 if (rcvr) {
3224 user = rcvr->user;
3225 kref_get(&user->refcount);
3226 } else
3227 user = NULL;
3228 rcu_read_unlock();
3229
3230 if (user == NULL) {
3231 /* We didn't find a user, just give up. */
3232 ipmi_inc_stat(intf, unhandled_commands);
3233
3234 /*
3235 * Don't do anything with these messages, just allow
3236 * them to be freed.
3237 */
3238 rv = 0;
3239 } else {
3240 /* Deliver the message to the user. */
3241 ipmi_inc_stat(intf, handled_commands);
3242
3243 recv_msg = ipmi_alloc_recv_msg();
3244 if (!recv_msg) {
3245 /*
3246 * We couldn't allocate memory for the
3247 * message, so requeue it for handling later.
3248 */
3249 rv = 1;
3250 kref_put(&user->refcount, free_user);
3251 } else {
3252 /* Extract the source address from the data. */
3253 lan_addr = (struct ipmi_lan_addr *) &recv_msg->addr;
3254 lan_addr->addr_type = IPMI_LAN_ADDR_TYPE;
3255 lan_addr->session_handle = msg->rsp[4];
3256 lan_addr->remote_SWID = msg->rsp[8];
3257 lan_addr->local_SWID = msg->rsp[5];
3258 lan_addr->lun = msg->rsp[9] & 3;
3259 lan_addr->channel = msg->rsp[3] & 0xf;
3260 lan_addr->privilege = msg->rsp[3] >> 4;
3261
3262 /*
3263 * Extract the rest of the message information
3264 * from the IPMB header.
3265 */
3266 recv_msg->user = user;
3267 recv_msg->recv_type = IPMI_CMD_RECV_TYPE;
3268 recv_msg->msgid = msg->rsp[9] >> 2;
3269 recv_msg->msg.netfn = msg->rsp[6] >> 2;
3270 recv_msg->msg.cmd = msg->rsp[10];
3271 recv_msg->msg.data = recv_msg->msg_data;
3272
3273 /*
3274 * We chop off 12, not 11 bytes because the checksum
3275 * at the end also needs to be removed.
3276 */
3277 recv_msg->msg.data_len = msg->rsp_size - 12;
3278 memcpy(recv_msg->msg_data,
3279 &(msg->rsp[11]),
3280 msg->rsp_size - 12);
3281 deliver_response(recv_msg);
3282 }
3283 }
3284
3285 return rv;
3286 }
3287
3288 /*
3289 * This routine will handle "Get Message" command responses with
3290 * channels that use an OEM Medium. The message format belongs to
3291 * the OEM. See IPMI 2.0 specification, Chapter 6 and
3292 * Chapter 22, sections 22.6 and 22.24 for more details.
3293 */
3294 static int handle_oem_get_msg_cmd(ipmi_smi_t intf,
3295 struct ipmi_smi_msg *msg)
3296 {
3297 struct cmd_rcvr *rcvr;
3298 int rv = 0;
3299 unsigned char netfn;
3300 unsigned char cmd;
3301 unsigned char chan;
3302 ipmi_user_t user = NULL;
3303 struct ipmi_system_interface_addr *smi_addr;
3304 struct ipmi_recv_msg *recv_msg;
3305
3306 /*
3307 * We expect the OEM SW to perform error checking
3308 * so we just do some basic sanity checks
3309 */
3310 if (msg->rsp_size < 4) {
3311 /* Message not big enough, just ignore it. */
3312 ipmi_inc_stat(intf, invalid_commands);
3313 return 0;
3314 }
3315
3316 if (msg->rsp[2] != 0) {
3317 /* An error getting the response, just ignore it. */
3318 return 0;
3319 }
3320
3321 /*
3322 * This is an OEM Message so the OEM needs to know how
3323 * handle the message. We do no interpretation.
3324 */
3325 netfn = msg->rsp[0] >> 2;
3326 cmd = msg->rsp[1];
3327 chan = msg->rsp[3] & 0xf;
3328
3329 rcu_read_lock();
3330 rcvr = find_cmd_rcvr(intf, netfn, cmd, chan);
3331 if (rcvr) {
3332 user = rcvr->user;
3333 kref_get(&user->refcount);
3334 } else
3335 user = NULL;
3336 rcu_read_unlock();
3337
3338 if (user == NULL) {
3339 /* We didn't find a user, just give up. */
3340 ipmi_inc_stat(intf, unhandled_commands);
3341
3342 /*
3343 * Don't do anything with these messages, just allow
3344 * them to be freed.
3345 */
3346
3347 rv = 0;
3348 } else {
3349 /* Deliver the message to the user. */
3350 ipmi_inc_stat(intf, handled_commands);
3351
3352 recv_msg = ipmi_alloc_recv_msg();
3353 if (!recv_msg) {
3354 /*
3355 * We couldn't allocate memory for the
3356 * message, so requeue it for handling
3357 * later.
3358 */
3359 rv = 1;
3360 kref_put(&user->refcount, free_user);
3361 } else {
3362 /*
3363 * OEM Messages are expected to be delivered via
3364 * the system interface to SMS software. We might
3365 * need to visit this again depending on OEM
3366 * requirements
3367 */
3368 smi_addr = ((struct ipmi_system_interface_addr *)
3369 &(recv_msg->addr));
3370 smi_addr->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
3371 smi_addr->channel = IPMI_BMC_CHANNEL;
3372 smi_addr->lun = msg->rsp[0] & 3;
3373
3374 recv_msg->user = user;
3375 recv_msg->user_msg_data = NULL;
3376 recv_msg->recv_type = IPMI_OEM_RECV_TYPE;
3377 recv_msg->msg.netfn = msg->rsp[0] >> 2;
3378 recv_msg->msg.cmd = msg->rsp[1];
3379 recv_msg->msg.data = recv_msg->msg_data;
3380
3381 /*
3382 * The message starts at byte 4 which follows the
3383 * the Channel Byte in the "GET MESSAGE" command
3384 */
3385 recv_msg->msg.data_len = msg->rsp_size - 4;
3386 memcpy(recv_msg->msg_data,
3387 &(msg->rsp[4]),
3388 msg->rsp_size - 4);
3389 deliver_response(recv_msg);
3390 }
3391 }
3392
3393 return rv;
3394 }
3395
3396 static void copy_event_into_recv_msg(struct ipmi_recv_msg *recv_msg,
3397 struct ipmi_smi_msg *msg)
3398 {
3399 struct ipmi_system_interface_addr *smi_addr;
3400
3401 recv_msg->msgid = 0;
3402 smi_addr = (struct ipmi_system_interface_addr *) &(recv_msg->addr);
3403 smi_addr->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
3404 smi_addr->channel = IPMI_BMC_CHANNEL;
3405 smi_addr->lun = msg->rsp[0] & 3;
3406 recv_msg->recv_type = IPMI_ASYNC_EVENT_RECV_TYPE;
3407 recv_msg->msg.netfn = msg->rsp[0] >> 2;
3408 recv_msg->msg.cmd = msg->rsp[1];
3409 memcpy(recv_msg->msg_data, &(msg->rsp[3]), msg->rsp_size - 3);
3410 recv_msg->msg.data = recv_msg->msg_data;
3411 recv_msg->msg.data_len = msg->rsp_size - 3;
3412 }
3413
3414 static int handle_read_event_rsp(ipmi_smi_t intf,
3415 struct ipmi_smi_msg *msg)
3416 {
3417 struct ipmi_recv_msg *recv_msg, *recv_msg2;
3418 struct list_head msgs;
3419 ipmi_user_t user;
3420 int rv = 0;
3421 int deliver_count = 0;
3422 unsigned long flags;
3423
3424 if (msg->rsp_size < 19) {
3425 /* Message is too small to be an IPMB event. */
3426 ipmi_inc_stat(intf, invalid_events);
3427 return 0;
3428 }
3429
3430 if (msg->rsp[2] != 0) {
3431 /* An error getting the event, just ignore it. */
3432 return 0;
3433 }
3434
3435 INIT_LIST_HEAD(&msgs);
3436
3437 spin_lock_irqsave(&intf->events_lock, flags);
3438
3439 ipmi_inc_stat(intf, events);
3440
3441 /*
3442 * Allocate and fill in one message for every user that is
3443 * getting events.
3444 */
3445 rcu_read_lock();
3446 list_for_each_entry_rcu(user, &intf->users, link) {
3447 if (!user->gets_events)
3448 continue;
3449
3450 recv_msg = ipmi_alloc_recv_msg();
3451 if (!recv_msg) {
3452 rcu_read_unlock();
3453 list_for_each_entry_safe(recv_msg, recv_msg2, &msgs,
3454 link) {
3455 list_del(&recv_msg->link);
3456 ipmi_free_recv_msg(recv_msg);
3457 }
3458 /*
3459 * We couldn't allocate memory for the
3460 * message, so requeue it for handling
3461 * later.
3462 */
3463 rv = 1;
3464 goto out;
3465 }
3466
3467 deliver_count++;
3468
3469 copy_event_into_recv_msg(recv_msg, msg);
3470 recv_msg->user = user;
3471 kref_get(&user->refcount);
3472 list_add_tail(&(recv_msg->link), &msgs);
3473 }
3474 rcu_read_unlock();
3475
3476 if (deliver_count) {
3477 /* Now deliver all the messages. */
3478 list_for_each_entry_safe(recv_msg, recv_msg2, &msgs, link) {
3479 list_del(&recv_msg->link);
3480 deliver_response(recv_msg);
3481 }
3482 } else if (intf->waiting_events_count < MAX_EVENTS_IN_QUEUE) {
3483 /*
3484 * No one to receive the message, put it in queue if there's
3485 * not already too many things in the queue.
3486 */
3487 recv_msg = ipmi_alloc_recv_msg();
3488 if (!recv_msg) {
3489 /*
3490 * We couldn't allocate memory for the
3491 * message, so requeue it for handling
3492 * later.
3493 */
3494 rv = 1;
3495 goto out;
3496 }
3497
3498 copy_event_into_recv_msg(recv_msg, msg);
3499 list_add_tail(&(recv_msg->link), &(intf->waiting_events));
3500 intf->waiting_events_count++;
3501 } else if (!intf->event_msg_printed) {
3502 /*
3503 * There's too many things in the queue, discard this
3504 * message.
3505 */
3506 printk(KERN_WARNING PFX "Event queue full, discarding"
3507 " incoming events\n");
3508 intf->event_msg_printed = 1;
3509 }
3510
3511 out:
3512 spin_unlock_irqrestore(&(intf->events_lock), flags);
3513
3514 return rv;
3515 }
3516
3517 static int handle_bmc_rsp(ipmi_smi_t intf,
3518 struct ipmi_smi_msg *msg)
3519 {
3520 struct ipmi_recv_msg *recv_msg;
3521 struct ipmi_user *user;
3522
3523 recv_msg = (struct ipmi_recv_msg *) msg->user_data;
3524 if (recv_msg == NULL) {
3525 printk(KERN_WARNING
3526 "IPMI message received with no owner. This\n"
3527 "could be because of a malformed message, or\n"
3528 "because of a hardware error. Contact your\n"
3529 "hardware vender for assistance\n");
3530 return 0;
3531 }
3532
3533 user = recv_msg->user;
3534 /* Make sure the user still exists. */
3535 if (user && !user->valid) {
3536 /* The user for the message went away, so give up. */
3537 ipmi_inc_stat(intf, unhandled_local_responses);
3538 ipmi_free_recv_msg(recv_msg);
3539 } else {
3540 struct ipmi_system_interface_addr *smi_addr;
3541
3542 ipmi_inc_stat(intf, handled_local_responses);
3543 recv_msg->recv_type = IPMI_RESPONSE_RECV_TYPE;
3544 recv_msg->msgid = msg->msgid;
3545 smi_addr = ((struct ipmi_system_interface_addr *)
3546 &(recv_msg->addr));
3547 smi_addr->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
3548 smi_addr->channel = IPMI_BMC_CHANNEL;
3549 smi_addr->lun = msg->rsp[0] & 3;
3550 recv_msg->msg.netfn = msg->rsp[0] >> 2;
3551 recv_msg->msg.cmd = msg->rsp[1];
3552 memcpy(recv_msg->msg_data,
3553 &(msg->rsp[2]),
3554 msg->rsp_size - 2);
3555 recv_msg->msg.data = recv_msg->msg_data;
3556 recv_msg->msg.data_len = msg->rsp_size - 2;
3557 deliver_response(recv_msg);
3558 }
3559
3560 return 0;
3561 }
3562
3563 /*
3564 * Handle a new message. Return 1 if the message should be requeued,
3565 * 0 if the message should be freed, or -1 if the message should not
3566 * be freed or requeued.
3567 */
3568 static int handle_new_recv_msg(ipmi_smi_t intf,
3569 struct ipmi_smi_msg *msg)
3570 {
3571 int requeue;
3572 int chan;
3573
3574 #ifdef DEBUG_MSGING
3575 int m;
3576 printk("Recv:");
3577 for (m = 0; m < msg->rsp_size; m++)
3578 printk(" %2.2x", msg->rsp[m]);
3579 printk("\n");
3580 #endif
3581 if (msg->rsp_size < 2) {
3582 /* Message is too small to be correct. */
3583 printk(KERN_WARNING PFX "BMC returned to small a message"
3584 " for netfn %x cmd %x, got %d bytes\n",
3585 (msg->data[0] >> 2) | 1, msg->data[1], msg->rsp_size);
3586
3587 /* Generate an error response for the message. */
3588 msg->rsp[0] = msg->data[0] | (1 << 2);
3589 msg->rsp[1] = msg->data[1];
3590 msg->rsp[2] = IPMI_ERR_UNSPECIFIED;
3591 msg->rsp_size = 3;
3592 } else if (((msg->rsp[0] >> 2) != ((msg->data[0] >> 2) | 1))
3593 || (msg->rsp[1] != msg->data[1])) {
3594 /*
3595 * The NetFN and Command in the response is not even
3596 * marginally correct.
3597 */
3598 printk(KERN_WARNING PFX "BMC returned incorrect response,"
3599 " expected netfn %x cmd %x, got netfn %x cmd %x\n",
3600 (msg->data[0] >> 2) | 1, msg->data[1],
3601 msg->rsp[0] >> 2, msg->rsp[1]);
3602
3603 /* Generate an error response for the message. */
3604 msg->rsp[0] = msg->data[0] | (1 << 2);
3605 msg->rsp[1] = msg->data[1];
3606 msg->rsp[2] = IPMI_ERR_UNSPECIFIED;
3607 msg->rsp_size = 3;
3608 }
3609
3610 if ((msg->rsp[0] == ((IPMI_NETFN_APP_REQUEST|1) << 2))
3611 && (msg->rsp[1] == IPMI_SEND_MSG_CMD)
3612 && (msg->user_data != NULL)) {
3613 /*
3614 * It's a response to a response we sent. For this we
3615 * deliver a send message response to the user.
3616 */
3617 struct ipmi_recv_msg *recv_msg = msg->user_data;
3618
3619 requeue = 0;
3620 if (msg->rsp_size < 2)
3621 /* Message is too small to be correct. */
3622 goto out;
3623
3624 chan = msg->data[2] & 0x0f;
3625 if (chan >= IPMI_MAX_CHANNELS)
3626 /* Invalid channel number */
3627 goto out;
3628
3629 if (!recv_msg)
3630 goto out;
3631
3632 /* Make sure the user still exists. */
3633 if (!recv_msg->user || !recv_msg->user->valid)
3634 goto out;
3635
3636 recv_msg->recv_type = IPMI_RESPONSE_RESPONSE_TYPE;
3637 recv_msg->msg.data = recv_msg->msg_data;
3638 recv_msg->msg.data_len = 1;
3639 recv_msg->msg_data[0] = msg->rsp[2];
3640 deliver_response(recv_msg);
3641 } else if ((msg->rsp[0] == ((IPMI_NETFN_APP_REQUEST|1) << 2))
3642 && (msg->rsp[1] == IPMI_GET_MSG_CMD)) {
3643 /* It's from the receive queue. */
3644 chan = msg->rsp[3] & 0xf;
3645 if (chan >= IPMI_MAX_CHANNELS) {
3646 /* Invalid channel number */
3647 requeue = 0;
3648 goto out;
3649 }
3650
3651 /*
3652 * We need to make sure the channels have been initialized.
3653 * The channel_handler routine will set the "curr_channel"
3654 * equal to or greater than IPMI_MAX_CHANNELS when all the
3655 * channels for this interface have been initialized.
3656 */
3657 if (intf->curr_channel < IPMI_MAX_CHANNELS) {
3658 requeue = 0; /* Throw the message away */
3659 goto out;
3660 }
3661
3662 switch (intf->channels[chan].medium) {
3663 case IPMI_CHANNEL_MEDIUM_IPMB:
3664 if (msg->rsp[4] & 0x04) {
3665 /*
3666 * It's a response, so find the
3667 * requesting message and send it up.
3668 */
3669 requeue = handle_ipmb_get_msg_rsp(intf, msg);
3670 } else {
3671 /*
3672 * It's a command to the SMS from some other
3673 * entity. Handle that.
3674 */
3675 requeue = handle_ipmb_get_msg_cmd(intf, msg);
3676 }
3677 break;
3678
3679 case IPMI_CHANNEL_MEDIUM_8023LAN:
3680 case IPMI_CHANNEL_MEDIUM_ASYNC:
3681 if (msg->rsp[6] & 0x04) {
3682 /*
3683 * It's a response, so find the
3684 * requesting message and send it up.
3685 */
3686 requeue = handle_lan_get_msg_rsp(intf, msg);
3687 } else {
3688 /*
3689 * It's a command to the SMS from some other
3690 * entity. Handle that.
3691 */
3692 requeue = handle_lan_get_msg_cmd(intf, msg);
3693 }
3694 break;
3695
3696 default:
3697 /* Check for OEM Channels. Clients had better
3698 register for these commands. */
3699 if ((intf->channels[chan].medium
3700 >= IPMI_CHANNEL_MEDIUM_OEM_MIN)
3701 && (intf->channels[chan].medium
3702 <= IPMI_CHANNEL_MEDIUM_OEM_MAX)) {
3703 requeue = handle_oem_get_msg_cmd(intf, msg);
3704 } else {
3705 /*
3706 * We don't handle the channel type, so just
3707 * free the message.
3708 */
3709 requeue = 0;
3710 }
3711 }
3712
3713 } else if ((msg->rsp[0] == ((IPMI_NETFN_APP_REQUEST|1) << 2))
3714 && (msg->rsp[1] == IPMI_READ_EVENT_MSG_BUFFER_CMD)) {
3715 /* It's an asyncronous event. */
3716 requeue = handle_read_event_rsp(intf, msg);
3717 } else {
3718 /* It's a response from the local BMC. */
3719 requeue = handle_bmc_rsp(intf, msg);
3720 }
3721
3722 out:
3723 return requeue;
3724 }
3725
3726 /* Handle a new message from the lower layer. */
3727 void ipmi_smi_msg_received(ipmi_smi_t intf,
3728 struct ipmi_smi_msg *msg)
3729 {
3730 unsigned long flags = 0; /* keep us warning-free. */
3731 int rv;
3732 int run_to_completion;
3733
3734
3735 if ((msg->data_size >= 2)
3736 && (msg->data[0] == (IPMI_NETFN_APP_REQUEST << 2))
3737 && (msg->data[1] == IPMI_SEND_MSG_CMD)
3738 && (msg->user_data == NULL)) {
3739 /*
3740 * This is the local response to a command send, start
3741 * the timer for these. The user_data will not be
3742 * NULL if this is a response send, and we will let
3743 * response sends just go through.
3744 */
3745
3746 /*
3747 * Check for errors, if we get certain errors (ones
3748 * that mean basically we can try again later), we
3749 * ignore them and start the timer. Otherwise we
3750 * report the error immediately.
3751 */
3752 if ((msg->rsp_size >= 3) && (msg->rsp[2] != 0)
3753 && (msg->rsp[2] != IPMI_NODE_BUSY_ERR)
3754 && (msg->rsp[2] != IPMI_LOST_ARBITRATION_ERR)
3755 && (msg->rsp[2] != IPMI_BUS_ERR)
3756 && (msg->rsp[2] != IPMI_NAK_ON_WRITE_ERR)) {
3757 int chan = msg->rsp[3] & 0xf;
3758
3759 /* Got an error sending the message, handle it. */
3760 if (chan >= IPMI_MAX_CHANNELS)
3761 ; /* This shouldn't happen */
3762 else if ((intf->channels[chan].medium
3763 == IPMI_CHANNEL_MEDIUM_8023LAN)
3764 || (intf->channels[chan].medium
3765 == IPMI_CHANNEL_MEDIUM_ASYNC))
3766 ipmi_inc_stat(intf, sent_lan_command_errs);
3767 else
3768 ipmi_inc_stat(intf, sent_ipmb_command_errs);
3769 intf_err_seq(intf, msg->msgid, msg->rsp[2]);
3770 } else
3771 /* The message was sent, start the timer. */
3772 intf_start_seq_timer(intf, msg->msgid);
3773
3774 ipmi_free_smi_msg(msg);
3775 goto out;
3776 }
3777
3778 /*
3779 * To preserve message order, if the list is not empty, we
3780 * tack this message onto the end of the list.
3781 */
3782 run_to_completion = intf->run_to_completion;
3783 if (!run_to_completion)
3784 spin_lock_irqsave(&intf->waiting_msgs_lock, flags);
3785 if (!list_empty(&intf->waiting_msgs)) {
3786 list_add_tail(&msg->link, &intf->waiting_msgs);
3787 if (!run_to_completion)
3788 spin_unlock_irqrestore(&intf->waiting_msgs_lock, flags);
3789 goto out;
3790 }
3791 if (!run_to_completion)
3792 spin_unlock_irqrestore(&intf->waiting_msgs_lock, flags);
3793
3794 rv = handle_new_recv_msg(intf, msg);
3795 if (rv > 0) {
3796 /*
3797 * Could not handle the message now, just add it to a
3798 * list to handle later.
3799 */
3800 run_to_completion = intf->run_to_completion;
3801 if (!run_to_completion)
3802 spin_lock_irqsave(&intf->waiting_msgs_lock, flags);
3803 list_add_tail(&msg->link, &intf->waiting_msgs);
3804 if (!run_to_completion)
3805 spin_unlock_irqrestore(&intf->waiting_msgs_lock, flags);
3806 } else if (rv == 0) {
3807 ipmi_free_smi_msg(msg);
3808 }
3809
3810 out:
3811 return;
3812 }
3813 EXPORT_SYMBOL(ipmi_smi_msg_received);
3814
3815 void ipmi_smi_watchdog_pretimeout(ipmi_smi_t intf)
3816 {
3817 ipmi_user_t user;
3818
3819 rcu_read_lock();
3820 list_for_each_entry_rcu(user, &intf->users, link) {
3821 if (!user->handler->ipmi_watchdog_pretimeout)
3822 continue;
3823
3824 user->handler->ipmi_watchdog_pretimeout(user->handler_data);
3825 }
3826 rcu_read_unlock();
3827 }
3828 EXPORT_SYMBOL(ipmi_smi_watchdog_pretimeout);
3829
3830 static struct ipmi_smi_msg *
3831 smi_from_recv_msg(ipmi_smi_t intf, struct ipmi_recv_msg *recv_msg,
3832 unsigned char seq, long seqid)
3833 {
3834 struct ipmi_smi_msg *smi_msg = ipmi_alloc_smi_msg();
3835 if (!smi_msg)
3836 /*
3837 * If we can't allocate the message, then just return, we
3838 * get 4 retries, so this should be ok.
3839 */
3840 return NULL;
3841
3842 memcpy(smi_msg->data, recv_msg->msg.data, recv_msg->msg.data_len);
3843 smi_msg->data_size = recv_msg->msg.data_len;
3844 smi_msg->msgid = STORE_SEQ_IN_MSGID(seq, seqid);
3845
3846 #ifdef DEBUG_MSGING
3847 {
3848 int m;
3849 printk("Resend: ");
3850 for (m = 0; m < smi_msg->data_size; m++)
3851 printk(" %2.2x", smi_msg->data[m]);
3852 printk("\n");
3853 }
3854 #endif
3855 return smi_msg;
3856 }
3857
3858 static void check_msg_timeout(ipmi_smi_t intf, struct seq_table *ent,
3859 struct list_head *timeouts, long timeout_period,
3860 int slot, unsigned long *flags)
3861 {
3862 struct ipmi_recv_msg *msg;
3863 struct ipmi_smi_handlers *handlers;
3864
3865 if (intf->intf_num == -1)
3866 return;
3867
3868 if (!ent->inuse)
3869 return;
3870
3871 ent->timeout -= timeout_period;
3872 if (ent->timeout > 0)
3873 return;
3874
3875 if (ent->retries_left == 0) {
3876 /* The message has used all its retries. */
3877 ent->inuse = 0;
3878 msg = ent->recv_msg;
3879 list_add_tail(&msg->link, timeouts);
3880 if (ent->broadcast)
3881 ipmi_inc_stat(intf, timed_out_ipmb_broadcasts);
3882 else if (is_lan_addr(&ent->recv_msg->addr))
3883 ipmi_inc_stat(intf, timed_out_lan_commands);
3884 else
3885 ipmi_inc_stat(intf, timed_out_ipmb_commands);
3886 } else {
3887 struct ipmi_smi_msg *smi_msg;
3888 /* More retries, send again. */
3889
3890 /*
3891 * Start with the max timer, set to normal timer after
3892 * the message is sent.
3893 */
3894 ent->timeout = MAX_MSG_TIMEOUT;
3895 ent->retries_left--;
3896 smi_msg = smi_from_recv_msg(intf, ent->recv_msg, slot,
3897 ent->seqid);
3898 if (!smi_msg) {
3899 if (is_lan_addr(&ent->recv_msg->addr))
3900 ipmi_inc_stat(intf,
3901 dropped_rexmit_lan_commands);
3902 else
3903 ipmi_inc_stat(intf,
3904 dropped_rexmit_ipmb_commands);
3905 return;
3906 }
3907
3908 spin_unlock_irqrestore(&intf->seq_lock, *flags);
3909
3910 /*
3911 * Send the new message. We send with a zero
3912 * priority. It timed out, I doubt time is that
3913 * critical now, and high priority messages are really
3914 * only for messages to the local MC, which don't get
3915 * resent.
3916 */
3917 handlers = intf->handlers;
3918 if (handlers) {
3919 if (is_lan_addr(&ent->recv_msg->addr))
3920 ipmi_inc_stat(intf,
3921 retransmitted_lan_commands);
3922 else
3923 ipmi_inc_stat(intf,
3924 retransmitted_ipmb_commands);
3925
3926 intf->handlers->sender(intf->send_info,
3927 smi_msg, 0);
3928 } else
3929 ipmi_free_smi_msg(smi_msg);
3930
3931 spin_lock_irqsave(&intf->seq_lock, *flags);
3932 }
3933 }
3934
3935 static void ipmi_timeout_handler(long timeout_period)
3936 {
3937 ipmi_smi_t intf;
3938 struct list_head timeouts;
3939 struct ipmi_recv_msg *msg, *msg2;
3940 struct ipmi_smi_msg *smi_msg, *smi_msg2;
3941 unsigned long flags;
3942 int i;
3943
3944 rcu_read_lock();
3945 list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
3946 /* See if any waiting messages need to be processed. */
3947 spin_lock_irqsave(&intf->waiting_msgs_lock, flags);
3948 list_for_each_entry_safe(smi_msg, smi_msg2,
3949 &intf->waiting_msgs, link) {
3950 if (!handle_new_recv_msg(intf, smi_msg)) {
3951 list_del(&smi_msg->link);
3952 ipmi_free_smi_msg(smi_msg);
3953 } else {
3954 /*
3955 * To preserve message order, quit if we
3956 * can't handle a message.
3957 */
3958 break;
3959 }
3960 }
3961 spin_unlock_irqrestore(&intf->waiting_msgs_lock, flags);
3962
3963 /*
3964 * Go through the seq table and find any messages that
3965 * have timed out, putting them in the timeouts
3966 * list.
3967 */
3968 INIT_LIST_HEAD(&timeouts);
3969 spin_lock_irqsave(&intf->seq_lock, flags);
3970 for (i = 0; i < IPMI_IPMB_NUM_SEQ; i++)
3971 check_msg_timeout(intf, &(intf->seq_table[i]),
3972 &timeouts, timeout_period, i,
3973 &flags);
3974 spin_unlock_irqrestore(&intf->seq_lock, flags);
3975
3976 list_for_each_entry_safe(msg, msg2, &timeouts, link)
3977 deliver_err_response(msg, IPMI_TIMEOUT_COMPLETION_CODE);
3978
3979 /*
3980 * Maintenance mode handling. Check the timeout
3981 * optimistically before we claim the lock. It may
3982 * mean a timeout gets missed occasionally, but that
3983 * only means the timeout gets extended by one period
3984 * in that case. No big deal, and it avoids the lock
3985 * most of the time.
3986 */
3987 if (intf->auto_maintenance_timeout > 0) {
3988 spin_lock_irqsave(&intf->maintenance_mode_lock, flags);
3989 if (intf->auto_maintenance_timeout > 0) {
3990 intf->auto_maintenance_timeout
3991 -= timeout_period;
3992 if (!intf->maintenance_mode
3993 && (intf->auto_maintenance_timeout <= 0)) {
3994 intf->maintenance_mode_enable = 0;
3995 maintenance_mode_update(intf);
3996 }
3997 }
3998 spin_unlock_irqrestore(&intf->maintenance_mode_lock,
3999 flags);
4000 }
4001 }
4002 rcu_read_unlock();
4003 }
4004
4005 static void ipmi_request_event(void)
4006 {
4007 ipmi_smi_t intf;
4008 struct ipmi_smi_handlers *handlers;
4009
4010 rcu_read_lock();
4011 /*
4012 * Called from the timer, no need to check if handlers is
4013 * valid.
4014 */
4015 list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
4016 /* No event requests when in maintenance mode. */
4017 if (intf->maintenance_mode_enable)
4018 continue;
4019
4020 handlers = intf->handlers;
4021 if (handlers)
4022 handlers->request_events(intf->send_info);
4023 }
4024 rcu_read_unlock();
4025 }
4026
4027 static struct timer_list ipmi_timer;
4028
4029 /* Call every ~100 ms. */
4030 #define IPMI_TIMEOUT_TIME 100
4031
4032 /* How many jiffies does it take to get to the timeout time. */
4033 #define IPMI_TIMEOUT_JIFFIES ((IPMI_TIMEOUT_TIME * HZ) / 1000)
4034
4035 /*
4036 * Request events from the queue every second (this is the number of
4037 * IPMI_TIMEOUT_TIMES between event requests). Hopefully, in the
4038 * future, IPMI will add a way to know immediately if an event is in
4039 * the queue and this silliness can go away.
4040 */
4041 #define IPMI_REQUEST_EV_TIME (1000 / (IPMI_TIMEOUT_TIME))
4042
4043 static atomic_t stop_operation;
4044 static unsigned int ticks_to_req_ev = IPMI_REQUEST_EV_TIME;
4045
4046 static void ipmi_timeout(unsigned long data)
4047 {
4048 if (atomic_read(&stop_operation))
4049 return;
4050
4051 ticks_to_req_ev--;
4052 if (ticks_to_req_ev == 0) {
4053 ipmi_request_event();
4054 ticks_to_req_ev = IPMI_REQUEST_EV_TIME;
4055 }
4056
4057 ipmi_timeout_handler(IPMI_TIMEOUT_TIME);
4058
4059 mod_timer(&ipmi_timer, jiffies + IPMI_TIMEOUT_JIFFIES);
4060 }
4061
4062
4063 static atomic_t smi_msg_inuse_count = ATOMIC_INIT(0);
4064 static atomic_t recv_msg_inuse_count = ATOMIC_INIT(0);
4065
4066 /* FIXME - convert these to slabs. */
4067 static void free_smi_msg(struct ipmi_smi_msg *msg)
4068 {
4069 atomic_dec(&smi_msg_inuse_count);
4070 kfree(msg);
4071 }
4072
4073 struct ipmi_smi_msg *ipmi_alloc_smi_msg(void)
4074 {
4075 struct ipmi_smi_msg *rv;
4076 rv = kmalloc(sizeof(struct ipmi_smi_msg), GFP_ATOMIC);
4077 if (rv) {
4078 rv->done = free_smi_msg;
4079 rv->user_data = NULL;
4080 atomic_inc(&smi_msg_inuse_count);
4081 }
4082 return rv;
4083 }
4084 EXPORT_SYMBOL(ipmi_alloc_smi_msg);
4085
4086 static void free_recv_msg(struct ipmi_recv_msg *msg)
4087 {
4088 atomic_dec(&recv_msg_inuse_count);
4089 kfree(msg);
4090 }
4091
4092 static struct ipmi_recv_msg *ipmi_alloc_recv_msg(void)
4093 {
4094 struct ipmi_recv_msg *rv;
4095
4096 rv = kmalloc(sizeof(struct ipmi_recv_msg), GFP_ATOMIC);
4097 if (rv) {
4098 rv->user = NULL;
4099 rv->done = free_recv_msg;
4100 atomic_inc(&recv_msg_inuse_count);
4101 }
4102 return rv;
4103 }
4104
4105 void ipmi_free_recv_msg(struct ipmi_recv_msg *msg)
4106 {
4107 if (msg->user)
4108 kref_put(&msg->user->refcount, free_user);
4109 msg->done(msg);
4110 }
4111 EXPORT_SYMBOL(ipmi_free_recv_msg);
4112
4113 #ifdef CONFIG_IPMI_PANIC_EVENT
4114
4115 static void dummy_smi_done_handler(struct ipmi_smi_msg *msg)
4116 {
4117 }
4118
4119 static void dummy_recv_done_handler(struct ipmi_recv_msg *msg)
4120 {
4121 }
4122
4123 #ifdef CONFIG_IPMI_PANIC_STRING
4124 static void event_receiver_fetcher(ipmi_smi_t intf, struct ipmi_recv_msg *msg)
4125 {
4126 if ((msg->addr.addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
4127 && (msg->msg.netfn == IPMI_NETFN_SENSOR_EVENT_RESPONSE)
4128 && (msg->msg.cmd == IPMI_GET_EVENT_RECEIVER_CMD)
4129 && (msg->msg.data[0] == IPMI_CC_NO_ERROR)) {
4130 /* A get event receiver command, save it. */
4131 intf->event_receiver = msg->msg.data[1];
4132 intf->event_receiver_lun = msg->msg.data[2] & 0x3;
4133 }
4134 }
4135
4136 static void device_id_fetcher(ipmi_smi_t intf, struct ipmi_recv_msg *msg)
4137 {
4138 if ((msg->addr.addr_type == IPMI_SYSTEM_INTERFACE_ADDR_TYPE)
4139 && (msg->msg.netfn == IPMI_NETFN_APP_RESPONSE)
4140 && (msg->msg.cmd == IPMI_GET_DEVICE_ID_CMD)
4141 && (msg->msg.data[0] == IPMI_CC_NO_ERROR)) {
4142 /*
4143 * A get device id command, save if we are an event
4144 * receiver or generator.
4145 */
4146 intf->local_sel_device = (msg->msg.data[6] >> 2) & 1;
4147 intf->local_event_generator = (msg->msg.data[6] >> 5) & 1;
4148 }
4149 }
4150 #endif
4151
4152 static void send_panic_events(char *str)
4153 {
4154 struct kernel_ipmi_msg msg;
4155 ipmi_smi_t intf;
4156 unsigned char data[16];
4157 struct ipmi_system_interface_addr *si;
4158 struct ipmi_addr addr;
4159 struct ipmi_smi_msg smi_msg;
4160 struct ipmi_recv_msg recv_msg;
4161
4162 si = (struct ipmi_system_interface_addr *) &addr;
4163 si->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
4164 si->channel = IPMI_BMC_CHANNEL;
4165 si->lun = 0;
4166
4167 /* Fill in an event telling that we have failed. */
4168 msg.netfn = 0x04; /* Sensor or Event. */
4169 msg.cmd = 2; /* Platform event command. */
4170 msg.data = data;
4171 msg.data_len = 8;
4172 data[0] = 0x41; /* Kernel generator ID, IPMI table 5-4 */
4173 data[1] = 0x03; /* This is for IPMI 1.0. */
4174 data[2] = 0x20; /* OS Critical Stop, IPMI table 36-3 */
4175 data[4] = 0x6f; /* Sensor specific, IPMI table 36-1 */
4176 data[5] = 0xa1; /* Runtime stop OEM bytes 2 & 3. */
4177
4178 /*
4179 * Put a few breadcrumbs in. Hopefully later we can add more things
4180 * to make the panic events more useful.
4181 */
4182 if (str) {
4183 data[3] = str[0];
4184 data[6] = str[1];
4185 data[7] = str[2];
4186 }
4187
4188 smi_msg.done = dummy_smi_done_handler;
4189 recv_msg.done = dummy_recv_done_handler;
4190
4191 /* For every registered interface, send the event. */
4192 list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
4193 if (!intf->handlers)
4194 /* Interface is not ready. */
4195 continue;
4196
4197 intf->run_to_completion = 1;
4198 /* Send the event announcing the panic. */
4199 intf->handlers->set_run_to_completion(intf->send_info, 1);
4200 i_ipmi_request(NULL,
4201 intf,
4202 &addr,
4203 0,
4204 &msg,
4205 intf,
4206 &smi_msg,
4207 &recv_msg,
4208 0,
4209 intf->channels[0].address,
4210 intf->channels[0].lun,
4211 0, 1); /* Don't retry, and don't wait. */
4212 }
4213
4214 #ifdef CONFIG_IPMI_PANIC_STRING
4215 /*
4216 * On every interface, dump a bunch of OEM event holding the
4217 * string.
4218 */
4219 if (!str)
4220 return;
4221
4222 /* For every registered interface, send the event. */
4223 list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
4224 char *p = str;
4225 struct ipmi_ipmb_addr *ipmb;
4226 int j;
4227
4228 if (intf->intf_num == -1)
4229 /* Interface was not ready yet. */
4230 continue;
4231
4232 /*
4233 * intf_num is used as an marker to tell if the
4234 * interface is valid. Thus we need a read barrier to
4235 * make sure data fetched before checking intf_num
4236 * won't be used.
4237 */
4238 smp_rmb();
4239
4240 /*
4241 * First job here is to figure out where to send the
4242 * OEM events. There's no way in IPMI to send OEM
4243 * events using an event send command, so we have to
4244 * find the SEL to put them in and stick them in
4245 * there.
4246 */
4247
4248 /* Get capabilities from the get device id. */
4249 intf->local_sel_device = 0;
4250 intf->local_event_generator = 0;
4251 intf->event_receiver = 0;
4252
4253 /* Request the device info from the local MC. */
4254 msg.netfn = IPMI_NETFN_APP_REQUEST;
4255 msg.cmd = IPMI_GET_DEVICE_ID_CMD;
4256 msg.data = NULL;
4257 msg.data_len = 0;
4258 intf->null_user_handler = device_id_fetcher;
4259 i_ipmi_request(NULL,
4260 intf,
4261 &addr,
4262 0,
4263 &msg,
4264 intf,
4265 &smi_msg,
4266 &recv_msg,
4267 0,
4268 intf->channels[0].address,
4269 intf->channels[0].lun,
4270 0, 1); /* Don't retry, and don't wait. */
4271
4272 if (intf->local_event_generator) {
4273 /* Request the event receiver from the local MC. */
4274 msg.netfn = IPMI_NETFN_SENSOR_EVENT_REQUEST;
4275 msg.cmd = IPMI_GET_EVENT_RECEIVER_CMD;
4276 msg.data = NULL;
4277 msg.data_len = 0;
4278 intf->null_user_handler = event_receiver_fetcher;
4279 i_ipmi_request(NULL,
4280 intf,
4281 &addr,
4282 0,
4283 &msg,
4284 intf,
4285 &smi_msg,
4286 &recv_msg,
4287 0,
4288 intf->channels[0].address,
4289 intf->channels[0].lun,
4290 0, 1); /* no retry, and no wait. */
4291 }
4292 intf->null_user_handler = NULL;
4293
4294 /*
4295 * Validate the event receiver. The low bit must not
4296 * be 1 (it must be a valid IPMB address), it cannot
4297 * be zero, and it must not be my address.
4298 */
4299 if (((intf->event_receiver & 1) == 0)
4300 && (intf->event_receiver != 0)
4301 && (intf->event_receiver != intf->channels[0].address)) {
4302 /*
4303 * The event receiver is valid, send an IPMB
4304 * message.
4305 */
4306 ipmb = (struct ipmi_ipmb_addr *) &addr;
4307 ipmb->addr_type = IPMI_IPMB_ADDR_TYPE;
4308 ipmb->channel = 0; /* FIXME - is this right? */
4309 ipmb->lun = intf->event_receiver_lun;
4310 ipmb->slave_addr = intf->event_receiver;
4311 } else if (intf->local_sel_device) {
4312 /*
4313 * The event receiver was not valid (or was
4314 * me), but I am an SEL device, just dump it
4315 * in my SEL.
4316 */
4317 si = (struct ipmi_system_interface_addr *) &addr;
4318 si->addr_type = IPMI_SYSTEM_INTERFACE_ADDR_TYPE;
4319 si->channel = IPMI_BMC_CHANNEL;
4320 si->lun = 0;
4321 } else
4322 continue; /* No where to send the event. */
4323
4324 msg.netfn = IPMI_NETFN_STORAGE_REQUEST; /* Storage. */
4325 msg.cmd = IPMI_ADD_SEL_ENTRY_CMD;
4326 msg.data = data;
4327 msg.data_len = 16;
4328
4329 j = 0;
4330 while (*p) {
4331 int size = strlen(p);
4332
4333 if (size > 11)
4334 size = 11;
4335 data[0] = 0;
4336 data[1] = 0;
4337 data[2] = 0xf0; /* OEM event without timestamp. */
4338 data[3] = intf->channels[0].address;
4339 data[4] = j++; /* sequence # */
4340 /*
4341 * Always give 11 bytes, so strncpy will fill
4342 * it with zeroes for me.
4343 */
4344 strncpy(data+5, p, 11);
4345 p += size;
4346
4347 i_ipmi_request(NULL,
4348 intf,
4349 &addr,
4350 0,
4351 &msg,
4352 intf,
4353 &smi_msg,
4354 &recv_msg,
4355 0,
4356 intf->channels[0].address,
4357 intf->channels[0].lun,
4358 0, 1); /* no retry, and no wait. */
4359 }
4360 }
4361 #endif /* CONFIG_IPMI_PANIC_STRING */
4362 }
4363 #endif /* CONFIG_IPMI_PANIC_EVENT */
4364
4365 static int has_panicked;
4366
4367 static int panic_event(struct notifier_block *this,
4368 unsigned long event,
4369 void *ptr)
4370 {
4371 ipmi_smi_t intf;
4372
4373 if (has_panicked)
4374 return NOTIFY_DONE;
4375 has_panicked = 1;
4376
4377 /* For every registered interface, set it to run to completion. */
4378 list_for_each_entry_rcu(intf, &ipmi_interfaces, link) {
4379 if (!intf->handlers)
4380 /* Interface is not ready. */
4381 continue;
4382
4383 intf->run_to_completion = 1;
4384 intf->handlers->set_run_to_completion(intf->send_info, 1);
4385 }
4386
4387 #ifdef CONFIG_IPMI_PANIC_EVENT
4388 send_panic_events(ptr);
4389 #endif
4390
4391 return NOTIFY_DONE;
4392 }
4393
4394 static struct notifier_block panic_block = {
4395 .notifier_call = panic_event,
4396 .next = NULL,
4397 .priority = 200 /* priority: INT_MAX >= x >= 0 */
4398 };
4399
4400 static int ipmi_init_msghandler(void)
4401 {
4402 int rv;
4403
4404 if (initialized)
4405 return 0;
4406
4407 rv = driver_register(&ipmidriver.driver);
4408 if (rv) {
4409 printk(KERN_ERR PFX "Could not register IPMI driver\n");
4410 return rv;
4411 }
4412
4413 printk(KERN_INFO "ipmi message handler version "
4414 IPMI_DRIVER_VERSION "\n");
4415
4416 #ifdef CONFIG_PROC_FS
4417 proc_ipmi_root = proc_mkdir("ipmi", NULL);
4418 if (!proc_ipmi_root) {
4419 printk(KERN_ERR PFX "Unable to create IPMI proc dir");
4420 return -ENOMEM;
4421 }
4422
4423 #endif /* CONFIG_PROC_FS */
4424
4425 setup_timer(&ipmi_timer, ipmi_timeout, 0);
4426 mod_timer(&ipmi_timer, jiffies + IPMI_TIMEOUT_JIFFIES);
4427
4428 atomic_notifier_chain_register(&panic_notifier_list, &panic_block);
4429
4430 initialized = 1;
4431
4432 return 0;
4433 }
4434
4435 static __init int ipmi_init_msghandler_mod(void)
4436 {
4437 ipmi_init_msghandler();
4438 return 0;
4439 }
4440
4441 static __exit void cleanup_ipmi(void)
4442 {
4443 int count;
4444
4445 if (!initialized)
4446 return;
4447
4448 atomic_notifier_chain_unregister(&panic_notifier_list, &panic_block);
4449
4450 /*
4451 * This can't be called if any interfaces exist, so no worry
4452 * about shutting down the interfaces.
4453 */
4454
4455 /*
4456 * Tell the timer to stop, then wait for it to stop. This
4457 * avoids problems with race conditions removing the timer
4458 * here.
4459 */
4460 atomic_inc(&stop_operation);
4461 del_timer_sync(&ipmi_timer);
4462
4463 #ifdef CONFIG_PROC_FS
4464 remove_proc_entry(proc_ipmi_root->name, NULL);
4465 #endif /* CONFIG_PROC_FS */
4466
4467 driver_unregister(&ipmidriver.driver);
4468
4469 initialized = 0;
4470
4471 /* Check for buffer leaks. */
4472 count = atomic_read(&smi_msg_inuse_count);
4473 if (count != 0)
4474 printk(KERN_WARNING PFX "SMI message count %d at exit\n",
4475 count);
4476 count = atomic_read(&recv_msg_inuse_count);
4477 if (count != 0)
4478 printk(KERN_WARNING PFX "recv message count %d at exit\n",
4479 count);
4480 }
4481 module_exit(cleanup_ipmi);
4482
4483 module_init(ipmi_init_msghandler_mod);
4484 MODULE_LICENSE("GPL");
4485 MODULE_AUTHOR("Corey Minyard <minyard@mvista.com>");
4486 MODULE_DESCRIPTION("Incoming and outgoing message routing for an IPMI"
4487 " interface.");
4488 MODULE_VERSION(IPMI_DRIVER_VERSION);
kernel source for telekom puls (alcatel/mediatek)