xref: /dragonfly/sys/bus/firewire/fwdev.c (revision 28c26f7e)
1 /*
2  * Copyright (c) 2003 Hidetoshi Shimokawa
3  * Copyright (c) 1998-2002 Katsushi Kobayashi and Hidetoshi Shimokawa
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. All advertising materials mentioning features or use of this software
15  *    must display the acknowledgement as bellow:
16  *
17  *    This product includes software developed by K. Kobayashi and H. Shimokawa
18  *
19  * 4. The name of the author may not be used to endorse or promote products
20  *    derived from this software without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
24  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
25  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
26  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
27  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
28  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
30  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
31  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32  * POSSIBILITY OF SUCH DAMAGE.
33  *
34  * $FreeBSD: src/sys/dev/firewire/fwdev.c,v 1.36 2004/01/22 14:41:17 simokawa Exp $
35  * $DragonFly: src/sys/bus/firewire/fwdev.c,v 1.20 2008/01/06 16:55:49 swildner Exp $
36  *
37  */
38 
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/types.h>
42 #include <sys/mbuf.h>
43 #if defined(__DragonFly__) || __FreeBSD_version < 500000
44 #include <sys/buf.h>
45 #else
46 #include <sys/bio.h>
47 #endif
48 
49 #include <sys/kernel.h>
50 #include <sys/malloc.h>
51 #include <sys/conf.h>
52 #include <sys/poll.h>
53 
54 #include <sys/bus.h>
55 #include <sys/ctype.h>
56 
57 #include <sys/thread2.h>
58 
59 #ifdef __DragonFly__
60 #include "firewire.h"
61 #include "firewirereg.h"
62 #include "fwdma.h"
63 #include "fwmem.h"
64 #include "iec68113.h"
65 #else
66 #include <dev/firewire/firewire.h>
67 #include <dev/firewire/firewirereg.h>
68 #include <dev/firewire/fwdma.h>
69 #include <dev/firewire/fwmem.h>
70 #include <dev/firewire/iec68113.h>
71 #endif
72 
73 #define CDEV_MAJOR 127
74 #define	FWNODE_INVAL 0xffff
75 
76 static	d_open_t	fw_open;
77 static	d_close_t	fw_close;
78 static	d_ioctl_t	fw_ioctl;
79 static	d_poll_t	fw_poll;
80 static	d_read_t	fw_read;	/* for Isochronous packet */
81 static	d_write_t	fw_write;
82 static	d_mmap_t	fw_mmap;
83 static	d_strategy_t	fw_strategy;
84 
85 struct dev_ops firewire_ops =
86 {
87 	{ "fw", CDEV_MAJOR, D_MEM },
88 	.d_open =	fw_open,
89 	.d_close =	fw_close,
90 	.d_read =	fw_read,
91 	.d_write =	fw_write,
92 	.d_ioctl =	fw_ioctl,
93 	.d_poll =	fw_poll,
94 	.d_mmap =	fw_mmap,
95 	.d_strategy =	fw_strategy,
96 };
97 
98 struct fw_drv1 {
99 	struct fw_xferq *ir;
100 	struct fw_xferq *it;
101 	struct fw_isobufreq bufreq;
102 };
103 
104 static int
105 fwdev_allocbuf(struct firewire_comm *fc, struct fw_xferq *q,
106 	struct fw_bufspec *b)
107 {
108 	int i;
109 
110 	if (q->flag & (FWXFERQ_RUNNING | FWXFERQ_EXTBUF))
111 		return(EBUSY);
112 
113 	q->bulkxfer = (struct fw_bulkxfer *) kmalloc(
114 		sizeof(struct fw_bulkxfer) * b->nchunk,
115 		M_FW, M_WAITOK);
116 
117 	b->psize = roundup2(b->psize, sizeof(u_int32_t));
118 	q->buf = fwdma_malloc_multiseg(fc, sizeof(u_int32_t),
119 			b->psize, b->nchunk * b->npacket, BUS_DMA_WAITOK);
120 
121 	if (q->buf == NULL) {
122 		kfree(q->bulkxfer, M_FW);
123 		q->bulkxfer = NULL;
124 		return(ENOMEM);
125 	}
126 	q->bnchunk = b->nchunk;
127 	q->bnpacket = b->npacket;
128 	q->psize = (b->psize + 3) & ~3;
129 	q->queued = 0;
130 
131 	STAILQ_INIT(&q->stvalid);
132 	STAILQ_INIT(&q->stfree);
133 	STAILQ_INIT(&q->stdma);
134 	q->stproc = NULL;
135 
136 	for(i = 0 ; i < q->bnchunk; i++){
137 		q->bulkxfer[i].poffset = i * q->bnpacket;
138 		q->bulkxfer[i].mbuf = NULL;
139 		STAILQ_INSERT_TAIL(&q->stfree, &q->bulkxfer[i], link);
140 	}
141 
142 	q->flag &= ~FWXFERQ_MODEMASK;
143 	q->flag |= FWXFERQ_STREAM;
144 	q->flag |= FWXFERQ_EXTBUF;
145 
146 	return (0);
147 }
148 
149 static int
150 fwdev_freebuf(struct fw_xferq *q)
151 {
152 	if (q->flag & FWXFERQ_EXTBUF) {
153 		if (q->buf != NULL)
154 			fwdma_free_multiseg(q->buf);
155 		q->buf = NULL;
156 		kfree(q->bulkxfer, M_FW);
157 		q->bulkxfer = NULL;
158 		q->flag &= ~FWXFERQ_EXTBUF;
159 		q->psize = 0;
160 		q->maxq = FWMAXQUEUE;
161 	}
162 	return (0);
163 }
164 
165 
166 static int
167 fw_open (struct dev_open_args *ap)
168 {
169 	cdev_t dev = ap->a_head.a_dev;
170 	int err = 0;
171 
172 	if (DEV_FWMEM(dev))
173 		return fwmem_open(ap);
174 
175 	if (dev->si_drv1 != NULL)
176 		return (EBUSY);
177 
178 #if defined(__FreeBSD__) && __FreeBSD_version >= 500000
179 	if ((dev->si_flags & SI_NAMED) == 0) {
180 		int unit = DEV2UNIT(dev);
181 		int sub = DEV2SUB(dev);
182 
183 		make_dev(&firewire_ops, minor(dev),
184 			UID_ROOT, GID_OPERATOR, 0660,
185 			"fw%d.%d", unit, sub);
186 	}
187 #endif
188 
189 	dev->si_drv1 = kmalloc(sizeof(struct fw_drv1), M_FW, M_WAITOK | M_ZERO);
190 
191 	return err;
192 }
193 
194 static int
195 fw_close (struct dev_close_args *ap)
196 {
197 	cdev_t dev = ap->a_head.a_dev;
198 	struct firewire_softc *sc;
199 	struct firewire_comm *fc;
200 	struct fw_drv1 *d;
201 	int unit = DEV2UNIT(dev);
202 	struct fw_xfer *xfer;
203 	struct fw_bind *fwb;
204 	int err = 0;
205 
206 	if (DEV_FWMEM(dev))
207 		return fwmem_close(ap);
208 
209 	sc = devclass_get_softc(firewire_devclass, unit);
210 	fc = sc->fc;
211 	d = (struct fw_drv1 *)dev->si_drv1;
212 
213 	if (d->ir != NULL) {
214 		struct fw_xferq *ir = d->ir;
215 
216 		if ((ir->flag & FWXFERQ_OPEN) == 0)
217 			return (EINVAL);
218 		if (ir->flag & FWXFERQ_RUNNING) {
219 			ir->flag &= ~FWXFERQ_RUNNING;
220 			fc->irx_disable(fc, ir->dmach);
221 		}
222 		/* free extbuf */
223 		fwdev_freebuf(ir);
224 		/* drain receiving buffer */
225 		for (xfer = STAILQ_FIRST(&ir->q);
226 			xfer != NULL; xfer = STAILQ_FIRST(&ir->q)) {
227 			ir->queued --;
228 			STAILQ_REMOVE_HEAD(&ir->q, link);
229 
230 			xfer->resp = 0;
231 			fw_xfer_done(xfer);
232 		}
233 		/* remove binding */
234 		for (fwb = STAILQ_FIRST(&ir->binds); fwb != NULL;
235 				fwb = STAILQ_FIRST(&ir->binds)) {
236 			STAILQ_REMOVE(&fc->binds, fwb, fw_bind, fclist);
237 			STAILQ_REMOVE_HEAD(&ir->binds, chlist);
238 			kfree(fwb, M_FW);
239 		}
240 		ir->flag &= ~(FWXFERQ_OPEN |
241 			FWXFERQ_MODEMASK | FWXFERQ_CHTAGMASK);
242 		d->ir = NULL;
243 
244 	}
245 	if (d->it != NULL) {
246 		struct fw_xferq *it = d->it;
247 
248 		if ((it->flag & FWXFERQ_OPEN) == 0)
249 			return (EINVAL);
250 		if (it->flag & FWXFERQ_RUNNING) {
251 			it->flag &= ~FWXFERQ_RUNNING;
252 			fc->itx_disable(fc, it->dmach);
253 		}
254 		/* free extbuf */
255 		fwdev_freebuf(it);
256 		it->flag &= ~(FWXFERQ_OPEN |
257 			FWXFERQ_MODEMASK | FWXFERQ_CHTAGMASK);
258 		d->it = NULL;
259 	}
260 	kfree(dev->si_drv1, M_FW);
261 	dev->si_drv1 = NULL;
262 
263 	return err;
264 }
265 
266 /*
267  * read request.
268  */
269 static int
270 fw_read (struct dev_read_args *ap)
271 {
272 	cdev_t dev = ap->a_head.a_dev;
273 	struct uio *uio = ap->a_uio;
274 	struct firewire_softc *sc;
275 	struct fw_xferq *ir;
276 	struct fw_xfer *xfer;
277 	int err = 0, slept = 0;
278 	int unit = DEV2UNIT(dev);
279 	struct fw_pkt *fp;
280 
281 	if (DEV_FWMEM(dev))
282 		return physread(ap);
283 
284 	sc = devclass_get_softc(firewire_devclass, unit);
285 
286 	ir = ((struct fw_drv1 *)dev->si_drv1)->ir;
287 	if (ir == NULL || ir->buf == NULL)
288 		return (EIO);
289 
290 readloop:
291 	xfer = STAILQ_FIRST(&ir->q);
292 	if (ir->stproc == NULL) {
293 		/* iso bulkxfer */
294 		ir->stproc = STAILQ_FIRST(&ir->stvalid);
295 		if (ir->stproc != NULL) {
296 			crit_enter();
297 			STAILQ_REMOVE_HEAD(&ir->stvalid, link);
298 			crit_exit();
299 			ir->queued = 0;
300 		}
301 	}
302 	if (xfer == NULL && ir->stproc == NULL) {
303 		/* no data avaliable */
304 		if (slept == 0) {
305 			slept = 1;
306 			ir->flag |= FWXFERQ_WAKEUP;
307 			err = tsleep(ir, FWPRI, "fw_read", hz);
308 			ir->flag &= ~FWXFERQ_WAKEUP;
309 			if (err == 0)
310 				goto readloop;
311 		} else if (slept == 1)
312 			err = EIO;
313 		return err;
314 	} else if(xfer != NULL) {
315 #if 0 /* XXX broken */
316 		/* per packet mode or FWACT_CH bind?*/
317 		crit_enter();
318 		ir->queued --;
319 		STAILQ_REMOVE_HEAD(&ir->q, link);
320 		crit_exit();
321 		fp = &xfer->recv.hdr;
322 		if (sc->fc->irx_post != NULL)
323 			sc->fc->irx_post(sc->fc, fp->mode.ld);
324 		err = uiomove((void *)fp, 1 /* XXX header size */, uio);
325 		/* XXX copy payload too */
326 		/* XXX we should recycle this xfer */
327 #endif
328 		fw_xfer_free( xfer);
329 	} else if(ir->stproc != NULL) {
330 		/* iso bulkxfer */
331 		fp = (struct fw_pkt *)fwdma_v_addr(ir->buf,
332 				ir->stproc->poffset + ir->queued);
333 		if(sc->fc->irx_post != NULL)
334 			sc->fc->irx_post(sc->fc, fp->mode.ld);
335 		if(fp->mode.stream.len == 0){
336 			err = EIO;
337 			return err;
338 		}
339 		err = uiomove((caddr_t)fp,
340 			fp->mode.stream.len + sizeof(u_int32_t), uio);
341 		ir->queued ++;
342 		if(ir->queued >= ir->bnpacket){
343 			crit_enter();
344 			STAILQ_INSERT_TAIL(&ir->stfree, ir->stproc, link);
345 			crit_exit();
346 			sc->fc->irx_enable(sc->fc, ir->dmach);
347 			ir->stproc = NULL;
348 		}
349 		if (uio->uio_resid >= ir->psize) {
350 			slept = -1;
351 			goto readloop;
352 		}
353 	}
354 	return err;
355 }
356 
357 static int
358 fw_write (struct dev_write_args *ap)
359 {
360 	cdev_t dev = ap->a_head.a_dev;
361 	struct uio *uio = ap->a_uio;
362 	int err = 0;
363 	struct firewire_softc *sc;
364 	int unit = DEV2UNIT(dev);
365 	int slept = 0;
366 	struct fw_pkt *fp;
367 	struct firewire_comm *fc;
368 	struct fw_xferq *it;
369 
370 	if (DEV_FWMEM(dev))
371 		return physwrite(ap);
372 
373 	sc = devclass_get_softc(firewire_devclass, unit);
374 	fc = sc->fc;
375 	it = ((struct fw_drv1 *)dev->si_drv1)->it;
376 	if (it == NULL || it->buf == NULL)
377 		return (EIO);
378 isoloop:
379 	if (it->stproc == NULL) {
380 		it->stproc = STAILQ_FIRST(&it->stfree);
381 		if (it->stproc != NULL) {
382 			crit_enter();
383 			STAILQ_REMOVE_HEAD(&it->stfree, link);
384 			crit_exit();
385 			it->queued = 0;
386 		} else if (slept == 0) {
387 			slept = 1;
388 			err = sc->fc->itx_enable(sc->fc, it->dmach);
389 			if (err)
390 				return err;
391 			err = tsleep(it, FWPRI, "fw_write", hz);
392 			if (err)
393 				return err;
394 			goto isoloop;
395 		} else {
396 			err = EIO;
397 			return err;
398 		}
399 	}
400 	fp = (struct fw_pkt *)fwdma_v_addr(it->buf,
401 			it->stproc->poffset + it->queued);
402 	err = uiomove((caddr_t)fp, sizeof(struct fw_isohdr), uio);
403 	err = uiomove((caddr_t)fp->mode.stream.payload,
404 				fp->mode.stream.len, uio);
405 	it->queued ++;
406 	if (it->queued >= it->bnpacket) {
407 		crit_enter();
408 		STAILQ_INSERT_TAIL(&it->stvalid, it->stproc, link);
409 		crit_exit();
410 		it->stproc = NULL;
411 		err = sc->fc->itx_enable(sc->fc, it->dmach);
412 	}
413 	if (uio->uio_resid >= sizeof(struct fw_isohdr)) {
414 		slept = 0;
415 		goto isoloop;
416 	}
417 	return err;
418 }
419 /*
420  * ioctl support.
421  */
422 int
423 fw_ioctl (struct dev_ioctl_args *ap)
424 {
425 	cdev_t dev = ap->a_head.a_dev;
426 	struct firewire_softc *sc;
427 	struct firewire_comm *fc;
428 	struct fw_drv1 *d;
429 	int unit = DEV2UNIT(dev);
430 	int i, len, err = 0;
431 	struct fw_device *fwdev;
432 	struct fw_bind *fwb;
433 	struct fw_xferq *ir, *it;
434 	struct fw_xfer *xfer;
435 	struct fw_pkt *fp;
436 	struct fw_devinfo *devinfo;
437 	void *ptr;
438 
439 	struct fw_devlstreq *fwdevlst = (struct fw_devlstreq *)ap->a_data;
440 	struct fw_asyreq *asyreq = (struct fw_asyreq *)ap->a_data;
441 	struct fw_isochreq *ichreq = (struct fw_isochreq *)ap->a_data;
442 	struct fw_isobufreq *ibufreq = (struct fw_isobufreq *)ap->a_data;
443 	struct fw_asybindreq *bindreq = (struct fw_asybindreq *)ap->a_data;
444 	struct fw_crom_buf *crom_buf = (struct fw_crom_buf *)ap->a_data;
445 
446 	if (DEV_FWMEM(dev))
447 		return fwmem_ioctl(ap);
448 
449 	if (!ap->a_data)
450 		return(EINVAL);
451 
452 	sc = devclass_get_softc(firewire_devclass, unit);
453 	fc = sc->fc;
454 	d = (struct fw_drv1 *)dev->si_drv1;
455 	ir = d->ir;
456 	it = d->it;
457 
458 	switch (ap->a_cmd) {
459 	case FW_STSTREAM:
460 		if (it == NULL) {
461 			for (i = 0; i < fc->nisodma; i ++) {
462 				it = fc->it[i];
463 				if ((it->flag & FWXFERQ_OPEN) == 0)
464 					 break;
465 	                }
466 			if (i >= fc->nisodma) {
467 				err = EBUSY;
468 				break;
469 			}
470 			err = fwdev_allocbuf(fc, it, &d->bufreq.tx);
471 			if (err)
472 				break;
473 			it->flag |=  FWXFERQ_OPEN;
474 		}
475 		it->flag &= ~0xff;
476 		it->flag |= (0x3f & ichreq->ch);
477 		it->flag |= ((0x3 & ichreq->tag) << 6);
478 		d->it = it;
479 		break;
480 	case FW_GTSTREAM:
481 		if (it != NULL) {
482 			ichreq->ch = it->flag & 0x3f;
483 			ichreq->tag = it->flag >> 2 & 0x3;
484 		} else
485 			err = EINVAL;
486 		break;
487 	case FW_SRSTREAM:
488 		if (ir == NULL) {
489 			for (i = 0; i < fc->nisodma; i ++) {
490 				ir = fc->ir[i];
491 				if ((ir->flag & FWXFERQ_OPEN) == 0)
492 					break;
493 			}
494 			if (i >= fc->nisodma) {
495 				err = EBUSY;
496 				break;
497 			}
498 			err = fwdev_allocbuf(fc, ir, &d->bufreq.rx);
499 			if (err)
500 				break;
501 			ir->flag |=  FWXFERQ_OPEN;
502 		}
503 		ir->flag &= ~0xff;
504 		ir->flag |= (0x3f & ichreq->ch);
505 		ir->flag |= ((0x3 & ichreq->tag) << 6);
506 		d->ir = ir;
507 		err = fc->irx_enable(fc, ir->dmach);
508 		break;
509 	case FW_GRSTREAM:
510 		if (d->ir != NULL) {
511 			ichreq->ch = ir->flag & 0x3f;
512 			ichreq->tag = ir->flag >> 2 & 0x3;
513 		} else
514 			err = EINVAL;
515 		break;
516 	case FW_SSTBUF:
517 		bcopy(ibufreq, &d->bufreq, sizeof(d->bufreq));
518 		break;
519 	case FW_GSTBUF:
520 		bzero(&ibufreq->rx, sizeof(ibufreq->rx));
521 		if (ir != NULL) {
522 			ibufreq->rx.nchunk = ir->bnchunk;
523 			ibufreq->rx.npacket = ir->bnpacket;
524 			ibufreq->rx.psize = ir->psize;
525 		}
526 		bzero(&ibufreq->tx, sizeof(ibufreq->tx));
527 		if (it != NULL) {
528 			ibufreq->tx.nchunk = it->bnchunk;
529 			ibufreq->tx.npacket = it->bnpacket;
530 			ibufreq->tx.psize = it->psize;
531 		}
532 		break;
533 	case FW_ASYREQ:
534 	{
535 		struct tcode_info *tinfo;
536 		int pay_len = 0;
537 
538 		fp = &asyreq->pkt;
539 		tinfo = &sc->fc->tcode[fp->mode.hdr.tcode];
540 
541 		if ((tinfo->flag & FWTI_BLOCK_ASY) != 0)
542 			pay_len = MAX(0, asyreq->req.len - tinfo->hdr_len);
543 
544 		xfer = fw_xfer_alloc_buf(M_FWXFER, pay_len, PAGE_SIZE/*XXX*/);
545 		if (xfer == NULL)
546 			return (ENOMEM);
547 
548 		switch (asyreq->req.type) {
549 		case FWASREQNODE:
550 			break;
551 		case FWASREQEUI:
552 			fwdev = fw_noderesolve_eui64(sc->fc,
553 						&asyreq->req.dst.eui);
554 			if (fwdev == NULL) {
555 				device_printf(sc->fc->bdev,
556 					"cannot find node\n");
557 				err = EINVAL;
558 				goto out;
559 			}
560 			fp->mode.hdr.dst = FWLOCALBUS | fwdev->dst;
561 			break;
562 		case FWASRESTL:
563 			/* XXX what's this? */
564 			break;
565 		case FWASREQSTREAM:
566 			/* nothing to do */
567 			break;
568 		}
569 
570 		bcopy(fp, (void *)&xfer->send.hdr, tinfo->hdr_len);
571 		if (pay_len > 0)
572 			bcopy((char *)fp + tinfo->hdr_len,
573 			    (void *)&xfer->send.payload, pay_len);
574 		xfer->send.spd = asyreq->req.sped;
575 		xfer->act.hand = fw_asy_callback;
576 
577 		if ((err = fw_asyreq(sc->fc, -1, xfer)) != 0)
578 			goto out;
579 		if ((err = tsleep(xfer, FWPRI, "asyreq", hz)) != 0)
580 			goto out;
581 		if (xfer->resp != 0) {
582 			err = EIO;
583 			goto out;
584 		}
585 		if ((tinfo->flag & FWTI_TLABEL) == 0)
586 			goto out;
587 
588 		/* copy response */
589 		tinfo = &sc->fc->tcode[xfer->recv.hdr.mode.hdr.tcode];
590 		if (asyreq->req.len >= xfer->recv.pay_len + tinfo->hdr_len)
591 			asyreq->req.len = xfer->recv.pay_len;
592 		else
593 			err = EINVAL;
594 		bcopy(&xfer->recv.hdr, fp, tinfo->hdr_len);
595 		bcopy(xfer->recv.payload, (char *)fp + tinfo->hdr_len,
596 		    MAX(0, asyreq->req.len - tinfo->hdr_len));
597 out:
598 		fw_xfer_free_buf(xfer);
599 		break;
600 	}
601 	case FW_IBUSRST:
602 		sc->fc->ibr(sc->fc);
603 		break;
604 	case FW_CBINDADDR:
605 		fwb = fw_bindlookup(sc->fc,
606 				bindreq->start.hi, bindreq->start.lo);
607 		if(fwb == NULL){
608 			err = EINVAL;
609 			break;
610 		}
611 		STAILQ_REMOVE(&sc->fc->binds, fwb, fw_bind, fclist);
612 		STAILQ_REMOVE(&ir->binds, fwb, fw_bind, chlist);
613 		kfree(fwb, M_FW);
614 		break;
615 	case FW_SBINDADDR:
616 		if(bindreq->len <= 0 ){
617 			err = EINVAL;
618 			break;
619 		}
620 		if(bindreq->start.hi > 0xffff ){
621 			err = EINVAL;
622 			break;
623 		}
624 		fwb = kmalloc(sizeof (struct fw_bind), M_FW, M_WAITOK);
625 		fwb->start = ((u_int64_t)bindreq->start.hi << 32) |
626 		    bindreq->start.lo;
627 		fwb->end = fwb->start +  bindreq->len;
628 		/* XXX */
629 		fwb->sub = ir->dmach;
630 		fwb->act_type = FWACT_CH;
631 
632 		/* XXX alloc buf */
633 		xfer = fw_xfer_alloc(M_FWXFER);
634 		if(xfer == NULL){
635 			kfree(fwb, M_FW);
636 			return (ENOMEM);
637 		}
638 		xfer->fc = sc->fc;
639 
640 		crit_enter();
641 		/* XXX broken. need multiple xfer */
642 		STAILQ_INIT(&fwb->xferlist);
643 		STAILQ_INSERT_TAIL(&fwb->xferlist, xfer, link);
644 		crit_exit();
645 		err = fw_bindadd(sc->fc, fwb);
646 		break;
647 	case FW_GDEVLST:
648 		i = len = 1;
649 		/* myself */
650 		devinfo = &fwdevlst->dev[0];
651 		devinfo->dst = sc->fc->nodeid;
652 		devinfo->status = 0;	/* XXX */
653 		devinfo->eui.hi = sc->fc->eui.hi;
654 		devinfo->eui.lo = sc->fc->eui.lo;
655 		STAILQ_FOREACH(fwdev, &sc->fc->devices, link) {
656 			if(len < FW_MAX_DEVLST){
657 				devinfo = &fwdevlst->dev[len++];
658 				devinfo->dst = fwdev->dst;
659 				devinfo->status =
660 					(fwdev->status == FWDEVINVAL)?0:1;
661 				devinfo->eui.hi = fwdev->eui.hi;
662 				devinfo->eui.lo = fwdev->eui.lo;
663 			}
664 			i++;
665 		}
666 		fwdevlst->n = i;
667 		fwdevlst->info_len = len;
668 		break;
669 	case FW_GTPMAP:
670 		bcopy(sc->fc->topology_map, ap->a_data,
671 				(sc->fc->topology_map->crc_len + 1) * 4);
672 		break;
673 	case FW_GCROM:
674 		STAILQ_FOREACH(fwdev, &sc->fc->devices, link)
675 			if (FW_EUI64_EQUAL(fwdev->eui, crom_buf->eui))
676 				break;
677 		if (fwdev == NULL) {
678 			if (!FW_EUI64_EQUAL(sc->fc->eui, crom_buf->eui)) {
679 				err = FWNODE_INVAL;
680 				break;
681 			}
682 			/* myself */
683 			ptr = kmalloc(CROMSIZE, M_FW, M_WAITOK);
684 			len = CROMSIZE;
685 			for (i = 0; i < CROMSIZE/4; i++)
686 				((u_int32_t *)ptr)[i]
687 					= ntohl(sc->fc->config_rom[i]);
688 		} else {
689 			/* found */
690 			ptr = (void *)&fwdev->csrrom[0];
691 			if (fwdev->rommax < CSRROMOFF)
692 				len = 0;
693 			else
694 				len = fwdev->rommax - CSRROMOFF + 4;
695 		}
696 		if (crom_buf->len < len && crom_buf->len >= 0)
697 			len = crom_buf->len;
698 		else
699 			crom_buf->len = len;
700 		err = copyout(ptr, crom_buf->ptr, len);
701 		if (fwdev == NULL)
702 			/* myself */
703 			kfree(ptr, M_FW);
704 		break;
705 	default:
706 		sc->fc->ioctl(ap);
707 		break;
708 	}
709 	return err;
710 }
711 int
712 fw_poll(struct dev_poll_args *ap)
713 {
714 	cdev_t dev = ap->a_head.a_dev;
715 	struct firewire_softc *sc;
716 	struct fw_xferq *ir;
717 	int revents;
718 	int tmp;
719 	int unit = DEV2UNIT(dev);
720 
721 	if (DEV_FWMEM(dev))
722 		return fwmem_poll(ap);
723 
724 	sc = devclass_get_softc(firewire_devclass, unit);
725 	ir = ((struct fw_drv1 *)dev->si_drv1)->ir;
726 	revents = 0;
727 	tmp = POLLIN | POLLRDNORM;
728 	if (ap->a_events & tmp) {
729 		if (STAILQ_FIRST(&ir->q) != NULL)
730 			revents |= tmp;
731 		else
732 			selrecord(curthread, &ir->rsel);
733 	}
734 	tmp = POLLOUT | POLLWRNORM;
735 	if (ap->a_events & tmp) {
736 		/* XXX should be fixed */
737 		revents |= tmp;
738 	}
739 	ap->a_events = revents;
740 	return(0);
741 }
742 
743 static int
744 fw_mmap (struct dev_mmap_args *ap)
745 {
746 	cdev_t dev = ap->a_head.a_dev;
747 	struct firewire_softc *sc;
748 	int unit = DEV2UNIT(dev);
749 
750 	if (DEV_FWMEM(dev))
751 		return fwmem_mmap(ap);
752 	sc = devclass_get_softc(firewire_devclass, unit);
753 
754 	return EINVAL;
755 }
756 
757 static int
758 fw_strategy(struct dev_strategy_args *ap)
759 {
760 	cdev_t dev = ap->a_head.a_dev;
761 	struct bio *bio = ap->a_bio;
762 	struct buf *bp = bio->bio_buf;
763 
764 	if (DEV_FWMEM(dev)) {
765 		fwmem_strategy(ap);
766 		return(0);
767 	}
768 	bp->b_error = EOPNOTSUPP;
769 	bp->b_flags |= B_ERROR;
770 	bp->b_resid = bp->b_bcount;
771 	biodone(bio);
772 	return(0);
773 }
774 
775 int
776 fwdev_makedev(struct firewire_softc *sc)
777 {
778 	int unit;
779 
780 	unit = device_get_unit(sc->fc->bdev);
781 	/*HELPME dev_ops_add(&firewire_ops, FW_UNITMASK, FW_UNIT(unit));*/
782 	return(0);
783 }
784 
785 int
786 fwdev_destroydev(struct firewire_softc *sc)
787 {
788 	int unit;
789 
790 	unit = device_get_unit(sc->fc->bdev);
791 	kprintf("devfs: Please check that only the right firewire devices were removed!!!!\n");
792 	dev_ops_remove_minor(&firewire_ops, /*FW_UNITMASK, */FW_UNIT(unit));
793 	return(0);
794 }
795 
796 #if defined(__FreeBSD__) && __FreeBSD_version >= 500000
797 #define NDEVTYPE 2
798 void
799 fwdev_clone(void *arg, char *name, int namelen, cdev_t *dev)
800 {
801 	struct firewire_softc *sc;
802 	char *devnames[NDEVTYPE] = {"fw", "fwmem"};
803 	char *subp = NULL;
804 	int devflag[NDEVTYPE] = {0, FWMEM_FLAG};
805 	int i, unit = 0, sub = 0;
806 
807 	if (*dev != NULL)
808 		return;
809 
810 	for (i = 0; i < NDEVTYPE; i++)
811 		if (dev_stdclone(name, &subp, devnames[i], &unit) == 2)
812 			goto found;
813 	/* not match */
814 	return;
815 found:
816 
817 	if (subp == NULL || *subp++ != '.')
818 		return;
819 
820 	/* /dev/fwU.S */
821 	while (isdigit(*subp)) {
822 		sub *= 10;
823 		sub += *subp++ - '0';
824 	}
825 	if (*subp != '\0')
826 		return;
827 
828 	sc = devclass_get_softc(firewire_devclass, unit);
829 	if (sc == NULL)
830 		return;
831 	*dev = make_dev(&firewire_ops, MAKEMINOR(devflag[i], unit, sub),
832 		       UID_ROOT, GID_OPERATOR, 0660,
833 		       "%s%d.%d", devnames[i], unit, sub);
834 	(*dev)->si_flags |= SI_CHEAPCLONE;
835 	dev_depends(sc->dev, *dev);
836 	return;
837 }
838 #endif
839