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