1 /* 2 * Driver for HP iLO/iLO2 management processor. 3 * 4 * Copyright (C) 2008 Hewlett-Packard Development Company, L.P. 5 * David Altobelli <david.altobelli@hp.com> 6 * 7 * This program is free software; you can redistribute it and/or modify 8 * it under the terms of the GNU General Public License version 2 as 9 * published by the Free Software Foundation. 10 */ 11 #include <linux/kernel.h> 12 #include <linux/types.h> 13 #include <linux/module.h> 14 #include <linux/fs.h> 15 #include <linux/pci.h> 16 #include <linux/interrupt.h> 17 #include <linux/ioport.h> 18 #include <linux/device.h> 19 #include <linux/file.h> 20 #include <linux/cdev.h> 21 #include <linux/sched.h> 22 #include <linux/spinlock.h> 23 #include <linux/delay.h> 24 #include <linux/uaccess.h> 25 #include <linux/io.h> 26 #include <linux/wait.h> 27 #include <linux/poll.h> 28 #include <linux/slab.h> 29 #include "hpilo.h" 30 31 static struct class *ilo_class; 32 static unsigned int ilo_major; 33 static char ilo_hwdev[MAX_ILO_DEV]; 34 35 static inline int get_entry_id(int entry) 36 { 37 return (entry & ENTRY_MASK_DESCRIPTOR) >> ENTRY_BITPOS_DESCRIPTOR; 38 } 39 40 static inline int get_entry_len(int entry) 41 { 42 return ((entry & ENTRY_MASK_QWORDS) >> ENTRY_BITPOS_QWORDS) << 3; 43 } 44 45 static inline int mk_entry(int id, int len) 46 { 47 int qlen = len & 7 ? (len >> 3) + 1 : len >> 3; 48 return id << ENTRY_BITPOS_DESCRIPTOR | qlen << ENTRY_BITPOS_QWORDS; 49 } 50 51 static inline int desc_mem_sz(int nr_entry) 52 { 53 return nr_entry << L2_QENTRY_SZ; 54 } 55 56 /* 57 * FIFO queues, shared with hardware. 58 * 59 * If a queue has empty slots, an entry is added to the queue tail, 60 * and that entry is marked as occupied. 61 * Entries can be dequeued from the head of the list, when the device 62 * has marked the entry as consumed. 63 * 64 * Returns true on successful queue/dequeue, false on failure. 65 */ 66 static int fifo_enqueue(struct ilo_hwinfo *hw, char *fifobar, int entry) 67 { 68 struct fifo *fifo_q = FIFOBARTOHANDLE(fifobar); 69 unsigned long flags; 70 int ret = 0; 71 72 spin_lock_irqsave(&hw->fifo_lock, flags); 73 if (!(fifo_q->fifobar[(fifo_q->tail + 1) & fifo_q->imask] 74 & ENTRY_MASK_O)) { 75 fifo_q->fifobar[fifo_q->tail & fifo_q->imask] |= 76 (entry & ENTRY_MASK_NOSTATE) | fifo_q->merge; 77 fifo_q->tail += 1; 78 ret = 1; 79 } 80 spin_unlock_irqrestore(&hw->fifo_lock, flags); 81 82 return ret; 83 } 84 85 static int fifo_dequeue(struct ilo_hwinfo *hw, char *fifobar, int *entry) 86 { 87 struct fifo *fifo_q = FIFOBARTOHANDLE(fifobar); 88 unsigned long flags; 89 int ret = 0; 90 u64 c; 91 92 spin_lock_irqsave(&hw->fifo_lock, flags); 93 c = fifo_q->fifobar[fifo_q->head & fifo_q->imask]; 94 if (c & ENTRY_MASK_C) { 95 if (entry) 96 *entry = c & ENTRY_MASK_NOSTATE; 97 98 fifo_q->fifobar[fifo_q->head & fifo_q->imask] = 99 (c | ENTRY_MASK) + 1; 100 fifo_q->head += 1; 101 ret = 1; 102 } 103 spin_unlock_irqrestore(&hw->fifo_lock, flags); 104 105 return ret; 106 } 107 108 static int fifo_check_recv(struct ilo_hwinfo *hw, char *fifobar) 109 { 110 struct fifo *fifo_q = FIFOBARTOHANDLE(fifobar); 111 unsigned long flags; 112 int ret = 0; 113 u64 c; 114 115 spin_lock_irqsave(&hw->fifo_lock, flags); 116 c = fifo_q->fifobar[fifo_q->head & fifo_q->imask]; 117 if (c & ENTRY_MASK_C) 118 ret = 1; 119 spin_unlock_irqrestore(&hw->fifo_lock, flags); 120 121 return ret; 122 } 123 124 static int ilo_pkt_enqueue(struct ilo_hwinfo *hw, struct ccb *ccb, 125 int dir, int id, int len) 126 { 127 char *fifobar; 128 int entry; 129 130 if (dir == SENDQ) 131 fifobar = ccb->ccb_u1.send_fifobar; 132 else 133 fifobar = ccb->ccb_u3.recv_fifobar; 134 135 entry = mk_entry(id, len); 136 return fifo_enqueue(hw, fifobar, entry); 137 } 138 139 static int ilo_pkt_dequeue(struct ilo_hwinfo *hw, struct ccb *ccb, 140 int dir, int *id, int *len, void **pkt) 141 { 142 char *fifobar, *desc; 143 int entry = 0, pkt_id = 0; 144 int ret; 145 146 if (dir == SENDQ) { 147 fifobar = ccb->ccb_u1.send_fifobar; 148 desc = ccb->ccb_u2.send_desc; 149 } else { 150 fifobar = ccb->ccb_u3.recv_fifobar; 151 desc = ccb->ccb_u4.recv_desc; 152 } 153 154 ret = fifo_dequeue(hw, fifobar, &entry); 155 if (ret) { 156 pkt_id = get_entry_id(entry); 157 if (id) 158 *id = pkt_id; 159 if (len) 160 *len = get_entry_len(entry); 161 if (pkt) 162 *pkt = (void *)(desc + desc_mem_sz(pkt_id)); 163 } 164 165 return ret; 166 } 167 168 static int ilo_pkt_recv(struct ilo_hwinfo *hw, struct ccb *ccb) 169 { 170 char *fifobar = ccb->ccb_u3.recv_fifobar; 171 172 return fifo_check_recv(hw, fifobar); 173 } 174 175 static inline void doorbell_set(struct ccb *ccb) 176 { 177 iowrite8(1, ccb->ccb_u5.db_base); 178 } 179 180 static inline void doorbell_clr(struct ccb *ccb) 181 { 182 iowrite8(2, ccb->ccb_u5.db_base); 183 } 184 185 static inline int ctrl_set(int l2sz, int idxmask, int desclim) 186 { 187 int active = 0, go = 1; 188 return l2sz << CTRL_BITPOS_L2SZ | 189 idxmask << CTRL_BITPOS_FIFOINDEXMASK | 190 desclim << CTRL_BITPOS_DESCLIMIT | 191 active << CTRL_BITPOS_A | 192 go << CTRL_BITPOS_G; 193 } 194 195 static void ctrl_setup(struct ccb *ccb, int nr_desc, int l2desc_sz) 196 { 197 /* for simplicity, use the same parameters for send and recv ctrls */ 198 ccb->send_ctrl = ctrl_set(l2desc_sz, nr_desc-1, nr_desc-1); 199 ccb->recv_ctrl = ctrl_set(l2desc_sz, nr_desc-1, nr_desc-1); 200 } 201 202 static inline int fifo_sz(int nr_entry) 203 { 204 /* size of a fifo is determined by the number of entries it contains */ 205 return (nr_entry * sizeof(u64)) + FIFOHANDLESIZE; 206 } 207 208 static void fifo_setup(void *base_addr, int nr_entry) 209 { 210 struct fifo *fifo_q = base_addr; 211 int i; 212 213 /* set up an empty fifo */ 214 fifo_q->head = 0; 215 fifo_q->tail = 0; 216 fifo_q->reset = 0; 217 fifo_q->nrents = nr_entry; 218 fifo_q->imask = nr_entry - 1; 219 fifo_q->merge = ENTRY_MASK_O; 220 221 for (i = 0; i < nr_entry; i++) 222 fifo_q->fifobar[i] = 0; 223 } 224 225 static void ilo_ccb_close(struct pci_dev *pdev, struct ccb_data *data) 226 { 227 struct ccb *driver_ccb = &data->driver_ccb; 228 struct ccb __iomem *device_ccb = data->mapped_ccb; 229 int retries; 230 231 /* complicated dance to tell the hw we are stopping */ 232 doorbell_clr(driver_ccb); 233 iowrite32(ioread32(&device_ccb->send_ctrl) & ~(1 << CTRL_BITPOS_G), 234 &device_ccb->send_ctrl); 235 iowrite32(ioread32(&device_ccb->recv_ctrl) & ~(1 << CTRL_BITPOS_G), 236 &device_ccb->recv_ctrl); 237 238 /* give iLO some time to process stop request */ 239 for (retries = MAX_WAIT; retries > 0; retries--) { 240 doorbell_set(driver_ccb); 241 udelay(WAIT_TIME); 242 if (!(ioread32(&device_ccb->send_ctrl) & (1 << CTRL_BITPOS_A)) 243 && 244 !(ioread32(&device_ccb->recv_ctrl) & (1 << CTRL_BITPOS_A))) 245 break; 246 } 247 if (retries == 0) 248 dev_err(&pdev->dev, "Closing, but controller still active\n"); 249 250 /* clear the hw ccb */ 251 memset_io(device_ccb, 0, sizeof(struct ccb)); 252 253 /* free resources used to back send/recv queues */ 254 pci_free_consistent(pdev, data->dma_size, data->dma_va, data->dma_pa); 255 } 256 257 static int ilo_ccb_setup(struct ilo_hwinfo *hw, struct ccb_data *data, int slot) 258 { 259 char *dma_va, *dma_pa; 260 struct ccb *driver_ccb, *ilo_ccb; 261 262 driver_ccb = &data->driver_ccb; 263 ilo_ccb = &data->ilo_ccb; 264 265 data->dma_size = 2 * fifo_sz(NR_QENTRY) + 266 2 * desc_mem_sz(NR_QENTRY) + 267 ILO_START_ALIGN + ILO_CACHE_SZ; 268 269 data->dma_va = pci_alloc_consistent(hw->ilo_dev, data->dma_size, 270 &data->dma_pa); 271 if (!data->dma_va) 272 return -ENOMEM; 273 274 dma_va = (char *)data->dma_va; 275 dma_pa = (char *)data->dma_pa; 276 277 memset(dma_va, 0, data->dma_size); 278 279 dma_va = (char *)roundup((unsigned long)dma_va, ILO_START_ALIGN); 280 dma_pa = (char *)roundup((unsigned long)dma_pa, ILO_START_ALIGN); 281 282 /* 283 * Create two ccb's, one with virt addrs, one with phys addrs. 284 * Copy the phys addr ccb to device shared mem. 285 */ 286 ctrl_setup(driver_ccb, NR_QENTRY, L2_QENTRY_SZ); 287 ctrl_setup(ilo_ccb, NR_QENTRY, L2_QENTRY_SZ); 288 289 fifo_setup(dma_va, NR_QENTRY); 290 driver_ccb->ccb_u1.send_fifobar = dma_va + FIFOHANDLESIZE; 291 ilo_ccb->ccb_u1.send_fifobar = dma_pa + FIFOHANDLESIZE; 292 dma_va += fifo_sz(NR_QENTRY); 293 dma_pa += fifo_sz(NR_QENTRY); 294 295 dma_va = (char *)roundup((unsigned long)dma_va, ILO_CACHE_SZ); 296 dma_pa = (char *)roundup((unsigned long)dma_pa, ILO_CACHE_SZ); 297 298 fifo_setup(dma_va, NR_QENTRY); 299 driver_ccb->ccb_u3.recv_fifobar = dma_va + FIFOHANDLESIZE; 300 ilo_ccb->ccb_u3.recv_fifobar = dma_pa + FIFOHANDLESIZE; 301 dma_va += fifo_sz(NR_QENTRY); 302 dma_pa += fifo_sz(NR_QENTRY); 303 304 driver_ccb->ccb_u2.send_desc = dma_va; 305 ilo_ccb->ccb_u2.send_desc = dma_pa; 306 dma_pa += desc_mem_sz(NR_QENTRY); 307 dma_va += desc_mem_sz(NR_QENTRY); 308 309 driver_ccb->ccb_u4.recv_desc = dma_va; 310 ilo_ccb->ccb_u4.recv_desc = dma_pa; 311 312 driver_ccb->channel = slot; 313 ilo_ccb->channel = slot; 314 315 driver_ccb->ccb_u5.db_base = hw->db_vaddr + (slot << L2_DB_SIZE); 316 ilo_ccb->ccb_u5.db_base = NULL; /* hw ccb's doorbell is not used */ 317 318 return 0; 319 } 320 321 static void ilo_ccb_open(struct ilo_hwinfo *hw, struct ccb_data *data, int slot) 322 { 323 int pkt_id, pkt_sz; 324 struct ccb *driver_ccb = &data->driver_ccb; 325 326 /* copy the ccb with physical addrs to device memory */ 327 data->mapped_ccb = (struct ccb __iomem *) 328 (hw->ram_vaddr + (slot * ILOHW_CCB_SZ)); 329 memcpy_toio(data->mapped_ccb, &data->ilo_ccb, sizeof(struct ccb)); 330 331 /* put packets on the send and receive queues */ 332 pkt_sz = 0; 333 for (pkt_id = 0; pkt_id < NR_QENTRY; pkt_id++) { 334 ilo_pkt_enqueue(hw, driver_ccb, SENDQ, pkt_id, pkt_sz); 335 doorbell_set(driver_ccb); 336 } 337 338 pkt_sz = desc_mem_sz(1); 339 for (pkt_id = 0; pkt_id < NR_QENTRY; pkt_id++) 340 ilo_pkt_enqueue(hw, driver_ccb, RECVQ, pkt_id, pkt_sz); 341 342 /* the ccb is ready to use */ 343 doorbell_clr(driver_ccb); 344 } 345 346 static int ilo_ccb_verify(struct ilo_hwinfo *hw, struct ccb_data *data) 347 { 348 int pkt_id, i; 349 struct ccb *driver_ccb = &data->driver_ccb; 350 351 /* make sure iLO is really handling requests */ 352 for (i = MAX_WAIT; i > 0; i--) { 353 if (ilo_pkt_dequeue(hw, driver_ccb, SENDQ, &pkt_id, NULL, NULL)) 354 break; 355 udelay(WAIT_TIME); 356 } 357 358 if (i == 0) { 359 dev_err(&hw->ilo_dev->dev, "Open could not dequeue a packet\n"); 360 return -EBUSY; 361 } 362 363 ilo_pkt_enqueue(hw, driver_ccb, SENDQ, pkt_id, 0); 364 doorbell_set(driver_ccb); 365 return 0; 366 } 367 368 static inline int is_channel_reset(struct ccb *ccb) 369 { 370 /* check for this particular channel needing a reset */ 371 return FIFOBARTOHANDLE(ccb->ccb_u1.send_fifobar)->reset; 372 } 373 374 static inline void set_channel_reset(struct ccb *ccb) 375 { 376 /* set a flag indicating this channel needs a reset */ 377 FIFOBARTOHANDLE(ccb->ccb_u1.send_fifobar)->reset = 1; 378 } 379 380 static inline int get_device_outbound(struct ilo_hwinfo *hw) 381 { 382 return ioread32(&hw->mmio_vaddr[DB_OUT]); 383 } 384 385 static inline int is_db_reset(int db_out) 386 { 387 return db_out & (1 << DB_RESET); 388 } 389 390 static inline int is_device_reset(struct ilo_hwinfo *hw) 391 { 392 /* check for global reset condition */ 393 return is_db_reset(get_device_outbound(hw)); 394 } 395 396 static inline void clear_pending_db(struct ilo_hwinfo *hw, int clr) 397 { 398 iowrite32(clr, &hw->mmio_vaddr[DB_OUT]); 399 } 400 401 static inline void clear_device(struct ilo_hwinfo *hw) 402 { 403 /* clear the device (reset bits, pending channel entries) */ 404 clear_pending_db(hw, -1); 405 } 406 407 static inline void ilo_enable_interrupts(struct ilo_hwinfo *hw) 408 { 409 iowrite8(ioread8(&hw->mmio_vaddr[DB_IRQ]) | 1, &hw->mmio_vaddr[DB_IRQ]); 410 } 411 412 static inline void ilo_disable_interrupts(struct ilo_hwinfo *hw) 413 { 414 iowrite8(ioread8(&hw->mmio_vaddr[DB_IRQ]) & ~1, 415 &hw->mmio_vaddr[DB_IRQ]); 416 } 417 418 static void ilo_set_reset(struct ilo_hwinfo *hw) 419 { 420 int slot; 421 422 /* 423 * Mapped memory is zeroed on ilo reset, so set a per ccb flag 424 * to indicate that this ccb needs to be closed and reopened. 425 */ 426 for (slot = 0; slot < MAX_CCB; slot++) { 427 if (!hw->ccb_alloc[slot]) 428 continue; 429 set_channel_reset(&hw->ccb_alloc[slot]->driver_ccb); 430 } 431 } 432 433 static ssize_t ilo_read(struct file *fp, char __user *buf, 434 size_t len, loff_t *off) 435 { 436 int err, found, cnt, pkt_id, pkt_len; 437 struct ccb_data *data = fp->private_data; 438 struct ccb *driver_ccb = &data->driver_ccb; 439 struct ilo_hwinfo *hw = data->ilo_hw; 440 void *pkt; 441 442 if (is_channel_reset(driver_ccb)) { 443 /* 444 * If the device has been reset, applications 445 * need to close and reopen all ccbs. 446 */ 447 return -ENODEV; 448 } 449 450 /* 451 * This function is to be called when data is expected 452 * in the channel, and will return an error if no packet is found 453 * during the loop below. The sleep/retry logic is to allow 454 * applications to call read() immediately post write(), 455 * and give iLO some time to process the sent packet. 456 */ 457 cnt = 20; 458 do { 459 /* look for a received packet */ 460 found = ilo_pkt_dequeue(hw, driver_ccb, RECVQ, &pkt_id, 461 &pkt_len, &pkt); 462 if (found) 463 break; 464 cnt--; 465 msleep(100); 466 } while (!found && cnt); 467 468 if (!found) 469 return -EAGAIN; 470 471 /* only copy the length of the received packet */ 472 if (pkt_len < len) 473 len = pkt_len; 474 475 err = copy_to_user(buf, pkt, len); 476 477 /* return the received packet to the queue */ 478 ilo_pkt_enqueue(hw, driver_ccb, RECVQ, pkt_id, desc_mem_sz(1)); 479 480 return err ? -EFAULT : len; 481 } 482 483 static ssize_t ilo_write(struct file *fp, const char __user *buf, 484 size_t len, loff_t *off) 485 { 486 int err, pkt_id, pkt_len; 487 struct ccb_data *data = fp->private_data; 488 struct ccb *driver_ccb = &data->driver_ccb; 489 struct ilo_hwinfo *hw = data->ilo_hw; 490 void *pkt; 491 492 if (is_channel_reset(driver_ccb)) 493 return -ENODEV; 494 495 /* get a packet to send the user command */ 496 if (!ilo_pkt_dequeue(hw, driver_ccb, SENDQ, &pkt_id, &pkt_len, &pkt)) 497 return -EBUSY; 498 499 /* limit the length to the length of the packet */ 500 if (pkt_len < len) 501 len = pkt_len; 502 503 /* on failure, set the len to 0 to return empty packet to the device */ 504 err = copy_from_user(pkt, buf, len); 505 if (err) 506 len = 0; 507 508 /* send the packet */ 509 ilo_pkt_enqueue(hw, driver_ccb, SENDQ, pkt_id, len); 510 doorbell_set(driver_ccb); 511 512 return err ? -EFAULT : len; 513 } 514 515 static unsigned int ilo_poll(struct file *fp, poll_table *wait) 516 { 517 struct ccb_data *data = fp->private_data; 518 struct ccb *driver_ccb = &data->driver_ccb; 519 520 poll_wait(fp, &data->ccb_waitq, wait); 521 522 if (is_channel_reset(driver_ccb)) 523 return POLLERR; 524 else if (ilo_pkt_recv(data->ilo_hw, driver_ccb)) 525 return POLLIN | POLLRDNORM; 526 527 return 0; 528 } 529 530 static int ilo_close(struct inode *ip, struct file *fp) 531 { 532 int slot; 533 struct ccb_data *data; 534 struct ilo_hwinfo *hw; 535 unsigned long flags; 536 537 slot = iminor(ip) % MAX_CCB; 538 hw = container_of(ip->i_cdev, struct ilo_hwinfo, cdev); 539 540 spin_lock(&hw->open_lock); 541 542 if (hw->ccb_alloc[slot]->ccb_cnt == 1) { 543 544 data = fp->private_data; 545 546 spin_lock_irqsave(&hw->alloc_lock, flags); 547 hw->ccb_alloc[slot] = NULL; 548 spin_unlock_irqrestore(&hw->alloc_lock, flags); 549 550 ilo_ccb_close(hw->ilo_dev, data); 551 552 kfree(data); 553 } else 554 hw->ccb_alloc[slot]->ccb_cnt--; 555 556 spin_unlock(&hw->open_lock); 557 558 return 0; 559 } 560 561 static int ilo_open(struct inode *ip, struct file *fp) 562 { 563 int slot, error; 564 struct ccb_data *data; 565 struct ilo_hwinfo *hw; 566 unsigned long flags; 567 568 slot = iminor(ip) % MAX_CCB; 569 hw = container_of(ip->i_cdev, struct ilo_hwinfo, cdev); 570 571 /* new ccb allocation */ 572 data = kzalloc(sizeof(*data), GFP_KERNEL); 573 if (!data) 574 return -ENOMEM; 575 576 spin_lock(&hw->open_lock); 577 578 /* each fd private_data holds sw/hw view of ccb */ 579 if (hw->ccb_alloc[slot] == NULL) { 580 /* create a channel control block for this minor */ 581 error = ilo_ccb_setup(hw, data, slot); 582 if (error) { 583 kfree(data); 584 goto out; 585 } 586 587 data->ccb_cnt = 1; 588 data->ccb_excl = fp->f_flags & O_EXCL; 589 data->ilo_hw = hw; 590 init_waitqueue_head(&data->ccb_waitq); 591 592 /* write the ccb to hw */ 593 spin_lock_irqsave(&hw->alloc_lock, flags); 594 ilo_ccb_open(hw, data, slot); 595 hw->ccb_alloc[slot] = data; 596 spin_unlock_irqrestore(&hw->alloc_lock, flags); 597 598 /* make sure the channel is functional */ 599 error = ilo_ccb_verify(hw, data); 600 if (error) { 601 602 spin_lock_irqsave(&hw->alloc_lock, flags); 603 hw->ccb_alloc[slot] = NULL; 604 spin_unlock_irqrestore(&hw->alloc_lock, flags); 605 606 ilo_ccb_close(hw->ilo_dev, data); 607 608 kfree(data); 609 goto out; 610 } 611 612 } else { 613 kfree(data); 614 if (fp->f_flags & O_EXCL || hw->ccb_alloc[slot]->ccb_excl) { 615 /* 616 * The channel exists, and either this open 617 * or a previous open of this channel wants 618 * exclusive access. 619 */ 620 error = -EBUSY; 621 } else { 622 hw->ccb_alloc[slot]->ccb_cnt++; 623 error = 0; 624 } 625 } 626 out: 627 spin_unlock(&hw->open_lock); 628 629 if (!error) 630 fp->private_data = hw->ccb_alloc[slot]; 631 632 return error; 633 } 634 635 static const struct file_operations ilo_fops = { 636 .owner = THIS_MODULE, 637 .read = ilo_read, 638 .write = ilo_write, 639 .poll = ilo_poll, 640 .open = ilo_open, 641 .release = ilo_close, 642 }; 643 644 static irqreturn_t ilo_isr(int irq, void *data) 645 { 646 struct ilo_hwinfo *hw = data; 647 int pending, i; 648 649 spin_lock(&hw->alloc_lock); 650 651 /* check for ccbs which have data */ 652 pending = get_device_outbound(hw); 653 if (!pending) { 654 spin_unlock(&hw->alloc_lock); 655 return IRQ_NONE; 656 } 657 658 if (is_db_reset(pending)) { 659 /* wake up all ccbs if the device was reset */ 660 pending = -1; 661 ilo_set_reset(hw); 662 } 663 664 for (i = 0; i < MAX_CCB; i++) { 665 if (!hw->ccb_alloc[i]) 666 continue; 667 if (pending & (1 << i)) 668 wake_up_interruptible(&hw->ccb_alloc[i]->ccb_waitq); 669 } 670 671 /* clear the device of the channels that have been handled */ 672 clear_pending_db(hw, pending); 673 674 spin_unlock(&hw->alloc_lock); 675 676 return IRQ_HANDLED; 677 } 678 679 static void ilo_unmap_device(struct pci_dev *pdev, struct ilo_hwinfo *hw) 680 { 681 pci_iounmap(pdev, hw->db_vaddr); 682 pci_iounmap(pdev, hw->ram_vaddr); 683 pci_iounmap(pdev, hw->mmio_vaddr); 684 } 685 686 static int __devinit ilo_map_device(struct pci_dev *pdev, struct ilo_hwinfo *hw) 687 { 688 int error = -ENOMEM; 689 690 /* map the memory mapped i/o registers */ 691 hw->mmio_vaddr = pci_iomap(pdev, 1, 0); 692 if (hw->mmio_vaddr == NULL) { 693 dev_err(&pdev->dev, "Error mapping mmio\n"); 694 goto out; 695 } 696 697 /* map the adapter shared memory region */ 698 hw->ram_vaddr = pci_iomap(pdev, 2, MAX_CCB * ILOHW_CCB_SZ); 699 if (hw->ram_vaddr == NULL) { 700 dev_err(&pdev->dev, "Error mapping shared mem\n"); 701 goto mmio_free; 702 } 703 704 /* map the doorbell aperture */ 705 hw->db_vaddr = pci_iomap(pdev, 3, MAX_CCB * ONE_DB_SIZE); 706 if (hw->db_vaddr == NULL) { 707 dev_err(&pdev->dev, "Error mapping doorbell\n"); 708 goto ram_free; 709 } 710 711 return 0; 712 ram_free: 713 pci_iounmap(pdev, hw->ram_vaddr); 714 mmio_free: 715 pci_iounmap(pdev, hw->mmio_vaddr); 716 out: 717 return error; 718 } 719 720 static void ilo_remove(struct pci_dev *pdev) 721 { 722 int i, minor; 723 struct ilo_hwinfo *ilo_hw = pci_get_drvdata(pdev); 724 725 clear_device(ilo_hw); 726 727 minor = MINOR(ilo_hw->cdev.dev); 728 for (i = minor; i < minor + MAX_CCB; i++) 729 device_destroy(ilo_class, MKDEV(ilo_major, i)); 730 731 cdev_del(&ilo_hw->cdev); 732 ilo_disable_interrupts(ilo_hw); 733 free_irq(pdev->irq, ilo_hw); 734 ilo_unmap_device(pdev, ilo_hw); 735 pci_release_regions(pdev); 736 pci_disable_device(pdev); 737 kfree(ilo_hw); 738 ilo_hwdev[(minor / MAX_CCB)] = 0; 739 } 740 741 static int __devinit ilo_probe(struct pci_dev *pdev, 742 const struct pci_device_id *ent) 743 { 744 int devnum, minor, start, error; 745 struct ilo_hwinfo *ilo_hw; 746 747 /* find a free range for device files */ 748 for (devnum = 0; devnum < MAX_ILO_DEV; devnum++) { 749 if (ilo_hwdev[devnum] == 0) { 750 ilo_hwdev[devnum] = 1; 751 break; 752 } 753 } 754 755 if (devnum == MAX_ILO_DEV) { 756 dev_err(&pdev->dev, "Error finding free device\n"); 757 return -ENODEV; 758 } 759 760 /* track global allocations for this device */ 761 error = -ENOMEM; 762 ilo_hw = kzalloc(sizeof(*ilo_hw), GFP_KERNEL); 763 if (!ilo_hw) 764 goto out; 765 766 ilo_hw->ilo_dev = pdev; 767 spin_lock_init(&ilo_hw->alloc_lock); 768 spin_lock_init(&ilo_hw->fifo_lock); 769 spin_lock_init(&ilo_hw->open_lock); 770 771 error = pci_enable_device(pdev); 772 if (error) 773 goto free; 774 775 pci_set_master(pdev); 776 777 error = pci_request_regions(pdev, ILO_NAME); 778 if (error) 779 goto disable; 780 781 error = ilo_map_device(pdev, ilo_hw); 782 if (error) 783 goto free_regions; 784 785 pci_set_drvdata(pdev, ilo_hw); 786 clear_device(ilo_hw); 787 788 error = request_irq(pdev->irq, ilo_isr, IRQF_SHARED, "hpilo", ilo_hw); 789 if (error) 790 goto unmap; 791 792 ilo_enable_interrupts(ilo_hw); 793 794 cdev_init(&ilo_hw->cdev, &ilo_fops); 795 ilo_hw->cdev.owner = THIS_MODULE; 796 start = devnum * MAX_CCB; 797 error = cdev_add(&ilo_hw->cdev, MKDEV(ilo_major, start), MAX_CCB); 798 if (error) { 799 dev_err(&pdev->dev, "Could not add cdev\n"); 800 goto remove_isr; 801 } 802 803 for (minor = 0 ; minor < MAX_CCB; minor++) { 804 struct device *dev; 805 dev = device_create(ilo_class, &pdev->dev, 806 MKDEV(ilo_major, minor), NULL, 807 "hpilo!d%dccb%d", devnum, minor); 808 if (IS_ERR(dev)) 809 dev_err(&pdev->dev, "Could not create files\n"); 810 } 811 812 return 0; 813 remove_isr: 814 ilo_disable_interrupts(ilo_hw); 815 free_irq(pdev->irq, ilo_hw); 816 unmap: 817 ilo_unmap_device(pdev, ilo_hw); 818 free_regions: 819 pci_release_regions(pdev); 820 disable: 821 pci_disable_device(pdev); 822 free: 823 kfree(ilo_hw); 824 out: 825 ilo_hwdev[devnum] = 0; 826 return error; 827 } 828 829 static struct pci_device_id ilo_devices[] = { 830 { PCI_DEVICE(PCI_VENDOR_ID_COMPAQ, 0xB204) }, 831 { PCI_DEVICE(PCI_VENDOR_ID_HP, 0x3307) }, 832 { } 833 }; 834 MODULE_DEVICE_TABLE(pci, ilo_devices); 835 836 static struct pci_driver ilo_driver = { 837 .name = ILO_NAME, 838 .id_table = ilo_devices, 839 .probe = ilo_probe, 840 .remove = __devexit_p(ilo_remove), 841 }; 842 843 static int __init ilo_init(void) 844 { 845 int error; 846 dev_t dev; 847 848 ilo_class = class_create(THIS_MODULE, "iLO"); 849 if (IS_ERR(ilo_class)) { 850 error = PTR_ERR(ilo_class); 851 goto out; 852 } 853 854 error = alloc_chrdev_region(&dev, 0, MAX_OPEN, ILO_NAME); 855 if (error) 856 goto class_destroy; 857 858 ilo_major = MAJOR(dev); 859 860 error = pci_register_driver(&ilo_driver); 861 if (error) 862 goto chr_remove; 863 864 return 0; 865 chr_remove: 866 unregister_chrdev_region(dev, MAX_OPEN); 867 class_destroy: 868 class_destroy(ilo_class); 869 out: 870 return error; 871 } 872 873 static void __exit ilo_exit(void) 874 { 875 pci_unregister_driver(&ilo_driver); 876 unregister_chrdev_region(MKDEV(ilo_major, 0), MAX_OPEN); 877 class_destroy(ilo_class); 878 } 879 880 MODULE_VERSION("1.2"); 881 MODULE_ALIAS(ILO_NAME); 882 MODULE_DESCRIPTION(ILO_NAME); 883 MODULE_AUTHOR("David Altobelli <david.altobelli@hp.com>"); 884 MODULE_LICENSE("GPL v2"); 885 886 module_init(ilo_init); 887 module_exit(ilo_exit); 888