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