xref: /freebsd/sys/dev/firewire/fwdev.c (revision e0c27215058b5786c78fcfb3963eebe61a989511)
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$
35  *
36  */
37 
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/types.h>
41 #include <sys/mbuf.h>
42 
43 #include <sys/kernel.h>
44 #include <sys/malloc.h>
45 #include <sys/conf.h>
46 #include <sys/poll.h>
47 
48 #include <sys/bus.h>
49 #include <machine/bus.h>
50 
51 #include <sys/ioccom.h>
52 
53 #include <dev/firewire/firewire.h>
54 #include <dev/firewire/firewirereg.h>
55 #include <dev/firewire/fwdma.h>
56 #include <dev/firewire/fwmem.h>
57 #include <dev/firewire/iec68113.h>
58 
59 #define CDEV_MAJOR 127
60 #define	FWNODE_INVAL 0xffff
61 
62 static	d_open_t	fw_open;
63 static	d_close_t	fw_close;
64 static	d_ioctl_t	fw_ioctl;
65 static	d_poll_t	fw_poll;
66 static	d_read_t	fw_read;	/* for Isochronous packet */
67 static	d_write_t	fw_write;
68 static	d_mmap_t	fw_mmap;
69 
70 struct cdevsw firewire_cdevsw =
71 {
72 #if __FreeBSD_version >= 500104
73 	.d_open =	fw_open,
74 	.d_close =	fw_close,
75 	.d_read =	fw_read,
76 	.d_write =	fw_write,
77 	.d_ioctl =	fw_ioctl,
78 	.d_poll =	fw_poll,
79 	.d_mmap =	fw_mmap,
80 	.d_name =	"fw",
81 	.d_maj =	CDEV_MAJOR,
82 	.d_flags =	D_MEM
83 #else
84 	fw_open, fw_close, fw_read, fw_write, fw_ioctl,
85 	fw_poll, fw_mmap, nostrategy, "fw", CDEV_MAJOR, nodump, nopsize, D_MEM
86 #endif
87 };
88 
89 static int
90 fw_open (dev_t dev, int flags, int fmt, fw_proc *td)
91 {
92 	struct firewire_softc *sc;
93 	int unit = DEV2UNIT(dev);
94 	int sub = DEV2DMACH(dev);
95 
96 	int err = 0;
97 
98 	if (DEV_FWMEM(dev))
99 		return fwmem_open(dev, flags, fmt, td);
100 
101 	sc = devclass_get_softc(firewire_devclass, unit);
102 	if(sc->fc->ir[sub]->flag & FWXFERQ_OPEN){
103 		err = EBUSY;
104 		return err;
105 	}
106 	if(sc->fc->it[sub]->flag & FWXFERQ_OPEN){
107 		err = EBUSY;
108 		return err;
109 	}
110 	if(sc->fc->ir[sub]->flag & FWXFERQ_MODEMASK){
111 		err = EBUSY;
112 		return err;
113 	}
114 /* Default is per packet mode */
115 	sc->fc->ir[sub]->flag |= FWXFERQ_OPEN;
116 	sc->fc->it[sub]->flag |= FWXFERQ_OPEN;
117 	return err;
118 }
119 
120 static int
121 fw_close (dev_t dev, int flags, int fmt, fw_proc *td)
122 {
123 	struct firewire_softc *sc;
124 	int unit = DEV2UNIT(dev);
125 	int sub = DEV2DMACH(dev);
126 	struct fw_xfer *xfer;
127 	struct fw_bind *fwb;
128 	int err = 0;
129 
130 	if (DEV_FWMEM(dev))
131 		return fwmem_close(dev, flags, fmt, td);
132 
133 	sc = devclass_get_softc(firewire_devclass, unit);
134 	if(!(sc->fc->ir[sub]->flag & FWXFERQ_OPEN)){
135 		err = EINVAL;
136 		return err;
137 	}
138 	sc->fc->ir[sub]->flag &= ~FWXFERQ_OPEN;
139 	if(!(sc->fc->it[sub]->flag & FWXFERQ_OPEN)){
140 		err = EINVAL;
141 		return err;
142 	}
143 	sc->fc->it[sub]->flag &= ~FWXFERQ_OPEN;
144 
145 	if(sc->fc->ir[sub]->flag & FWXFERQ_RUNNING){
146 		sc->fc->irx_disable(sc->fc, sub);
147 	}
148 	if(sc->fc->it[sub]->flag & FWXFERQ_RUNNING){
149 		sc->fc->it[sub]->flag &= ~FWXFERQ_RUNNING;
150 		sc->fc->itx_disable(sc->fc, sub);
151 	}
152 	if(sc->fc->ir[sub]->flag & FWXFERQ_EXTBUF){
153 		if (sc->fc->ir[sub]->buf != NULL)
154 			fwdma_free_multiseg(sc->fc->ir[sub]->buf);
155 		sc->fc->ir[sub]->buf = NULL;
156 		free(sc->fc->ir[sub]->bulkxfer, M_FW);
157 		sc->fc->ir[sub]->bulkxfer = NULL;
158 		sc->fc->ir[sub]->flag &= ~FWXFERQ_EXTBUF;
159 		sc->fc->ir[sub]->psize = PAGE_SIZE;
160 		sc->fc->ir[sub]->maxq = FWMAXQUEUE;
161 	}
162 	if(sc->fc->it[sub]->flag & FWXFERQ_EXTBUF){
163 		if (sc->fc->it[sub]->buf != NULL)
164 			fwdma_free_multiseg(sc->fc->it[sub]->buf);
165 		sc->fc->it[sub]->buf = NULL;
166 		free(sc->fc->it[sub]->bulkxfer, M_FW);
167 		sc->fc->it[sub]->bulkxfer = NULL;
168 		sc->fc->it[sub]->flag &= ~FWXFERQ_EXTBUF;
169 		sc->fc->it[sub]->psize = 0;
170 		sc->fc->it[sub]->maxq = FWMAXQUEUE;
171 	}
172 	for(xfer = STAILQ_FIRST(&sc->fc->ir[sub]->q);
173 		xfer != NULL; xfer = STAILQ_FIRST(&sc->fc->ir[sub]->q)){
174 		sc->fc->ir[sub]->queued--;
175 		STAILQ_REMOVE_HEAD(&sc->fc->ir[sub]->q, link);
176 
177 		xfer->resp = 0;
178 		fw_xfer_done(xfer);
179 	}
180 	for(fwb = STAILQ_FIRST(&sc->fc->ir[sub]->binds); fwb != NULL;
181 		fwb = STAILQ_FIRST(&sc->fc->ir[sub]->binds)){
182 		STAILQ_REMOVE(&sc->fc->binds, fwb, fw_bind, fclist);
183 		STAILQ_REMOVE_HEAD(&sc->fc->ir[sub]->binds, chlist);
184 		free(fwb, M_FW);
185 	}
186 	sc->fc->ir[sub]->flag &= ~(FWXFERQ_MODEMASK | FWXFERQ_CHTAGMASK);
187 	sc->fc->it[sub]->flag &= ~(FWXFERQ_MODEMASK | FWXFERQ_CHTAGMASK);
188 	return err;
189 }
190 
191 /*
192  * read request.
193  */
194 static int
195 fw_read (dev_t dev, struct uio *uio, int ioflag)
196 {
197 	struct firewire_softc *sc;
198 	struct fw_xferq *ir;
199 	struct fw_xfer *xfer;
200 	int err = 0, s, slept = 0;
201 	int unit = DEV2UNIT(dev);
202 	int sub = DEV2DMACH(dev);
203 	struct fw_pkt *fp;
204 
205 	if (DEV_FWMEM(dev))
206 		return fwmem_read(dev, uio, ioflag);
207 
208 	sc = devclass_get_softc(firewire_devclass, unit);
209 
210 	ir = sc->fc->ir[sub];
211 
212 readloop:
213 	xfer = STAILQ_FIRST(&ir->q);
214 	if (ir->stproc == NULL) {
215 		/* iso bulkxfer */
216 		ir->stproc = STAILQ_FIRST(&ir->stvalid);
217 		if (ir->stproc != NULL) {
218 			s = splfw();
219 			STAILQ_REMOVE_HEAD(&ir->stvalid, link);
220 			splx(s);
221 			ir->queued = 0;
222 		}
223 	}
224 	if (xfer == NULL && ir->stproc == NULL) {
225 		/* no data avaliable */
226 		if (slept == 0) {
227 			slept = 1;
228 			ir->flag |= FWXFERQ_WAKEUP;
229 			err = tsleep(ir, FWPRI, "fw_read", hz);
230 			ir->flag &= ~FWXFERQ_WAKEUP;
231 			if (err == 0)
232 				goto readloop;
233 		} else if (slept == 1)
234 			err = EIO;
235 		return err;
236 	} else if(xfer != NULL) {
237 		/* per packet mode or FWACT_CH bind?*/
238 		s = splfw();
239 		ir->queued --;
240 		STAILQ_REMOVE_HEAD(&ir->q, link);
241 		splx(s);
242 		fp = (struct fw_pkt *)xfer->recv.buf;
243 		if(sc->fc->irx_post != NULL)
244 			sc->fc->irx_post(sc->fc, fp->mode.ld);
245 		err = uiomove(xfer->recv.buf, xfer->recv.len, uio);
246 		/* XXX we should recycle this xfer */
247 		fw_xfer_free( xfer);
248 	} else if(ir->stproc != NULL) {
249 		/* iso bulkxfer */
250 		fp = (struct fw_pkt *)fwdma_v_addr(ir->buf,
251 				ir->stproc->poffset + ir->queued);
252 		if(sc->fc->irx_post != NULL)
253 			sc->fc->irx_post(sc->fc, fp->mode.ld);
254 		if(fp->mode.stream.len == 0){
255 			err = EIO;
256 			return err;
257 		}
258 		err = uiomove((caddr_t)fp,
259 			fp->mode.stream.len + sizeof(u_int32_t), uio);
260 		ir->queued ++;
261 		if(ir->queued >= ir->bnpacket){
262 			s = splfw();
263 			STAILQ_INSERT_TAIL(&ir->stfree, ir->stproc, link);
264 			splx(s);
265 			sc->fc->irx_enable(sc->fc, sub);
266 			ir->stproc = NULL;
267 		}
268 		if (uio->uio_resid >= ir->psize) {
269 			slept = -1;
270 			goto readloop;
271 		}
272 	}
273 	return err;
274 }
275 
276 static int
277 fw_write (dev_t dev, struct uio *uio, int ioflag)
278 {
279 	int err = 0;
280 	struct firewire_softc *sc;
281 	int unit = DEV2UNIT(dev);
282 	int sub = DEV2DMACH(dev);
283 	int s, slept = 0;
284 	struct fw_pkt *fp;
285 	struct firewire_comm *fc;
286 	struct fw_xferq *it;
287 
288 	if (DEV_FWMEM(dev))
289 		return fwmem_write(dev, uio, ioflag);
290 
291 	sc = devclass_get_softc(firewire_devclass, unit);
292 	fc = sc->fc;
293 	it = sc->fc->it[sub];
294 isoloop:
295 	if (it->stproc == NULL) {
296 		it->stproc = STAILQ_FIRST(&it->stfree);
297 		if (it->stproc != NULL) {
298 			s = splfw();
299 			STAILQ_REMOVE_HEAD(&it->stfree, link);
300 			splx(s);
301 			it->queued = 0;
302 		} else if (slept == 0) {
303 			slept = 1;
304 			err = sc->fc->itx_enable(sc->fc, sub);
305 			if (err)
306 				return err;
307 			err = tsleep(it, FWPRI, "fw_write", hz);
308 			if (err)
309 				return err;
310 			goto isoloop;
311 		} else {
312 			err = EIO;
313 			return err;
314 		}
315 	}
316 	fp = (struct fw_pkt *)fwdma_v_addr(it->buf,
317 			it->stproc->poffset + it->queued);
318 	err = uiomove((caddr_t)fp, sizeof(struct fw_isohdr), uio);
319 	err = uiomove((caddr_t)fp->mode.stream.payload,
320 				fp->mode.stream.len, uio);
321 	it->queued ++;
322 	if (it->queued >= it->bnpacket) {
323 		s = splfw();
324 		STAILQ_INSERT_TAIL(&it->stvalid, it->stproc, link);
325 		splx(s);
326 		it->stproc = NULL;
327 		err = sc->fc->itx_enable(sc->fc, sub);
328 	}
329 	if (uio->uio_resid >= sizeof(struct fw_isohdr)) {
330 		slept = 0;
331 		goto isoloop;
332 	}
333 	return err;
334 }
335 
336 /*
337  * ioctl support.
338  */
339 int
340 fw_ioctl (dev_t dev, u_long cmd, caddr_t data, int flag, fw_proc *td)
341 {
342 	struct firewire_softc *sc;
343 	int unit = DEV2UNIT(dev);
344 	int sub = DEV2DMACH(dev);
345 	int s, i, len, err = 0;
346 	struct fw_device *fwdev;
347 	struct fw_bind *fwb;
348 	struct fw_xferq *ir, *it;
349 	struct fw_xfer *xfer;
350 	struct fw_pkt *fp;
351 	struct fw_devinfo *devinfo;
352 	void *ptr;
353 
354 	struct fw_devlstreq *fwdevlst = (struct fw_devlstreq *)data;
355 	struct fw_asyreq *asyreq = (struct fw_asyreq *)data;
356 	struct fw_isochreq *ichreq = (struct fw_isochreq *)data;
357 	struct fw_isobufreq *ibufreq = (struct fw_isobufreq *)data;
358 	struct fw_asybindreq *bindreq = (struct fw_asybindreq *)data;
359 	struct fw_crom_buf *crom_buf = (struct fw_crom_buf *)data;
360 
361 	if (DEV_FWMEM(dev))
362 		return fwmem_ioctl(dev, cmd, data, flag, td);
363 
364 	sc = devclass_get_softc(firewire_devclass, unit);
365 	if (!data)
366 		return(EINVAL);
367 
368 	switch (cmd) {
369 	case FW_STSTREAM:
370 		sc->fc->it[sub]->flag &= ~0xff;
371 		sc->fc->it[sub]->flag |= (0x3f & ichreq->ch);
372 		sc->fc->it[sub]->flag |= ((0x3 & ichreq->tag) << 6);
373 		err = 0;
374 		break;
375 	case FW_GTSTREAM:
376 		ichreq->ch = sc->fc->it[sub]->flag & 0x3f;
377 		ichreq->tag =(sc->fc->it[sub]->flag) >> 2 & 0x3;
378 		err = 0;
379 		break;
380 	case FW_SRSTREAM:
381 		sc->fc->ir[sub]->flag &= ~0xff;
382 		sc->fc->ir[sub]->flag |= (0x3f & ichreq->ch);
383 		sc->fc->ir[sub]->flag |= ((0x3 & ichreq->tag) << 6);
384 		err = sc->fc->irx_enable(sc->fc, sub);
385 		break;
386 	case FW_GRSTREAM:
387 		ichreq->ch = sc->fc->ir[sub]->flag & 0x3f;
388 		ichreq->tag =(sc->fc->ir[sub]->flag) >> 2 & 0x3;
389 		err = 0;
390 		break;
391 	case FW_SSTBUF:
392 		ir = sc->fc->ir[sub];
393 		it = sc->fc->it[sub];
394 
395 		if(ir->flag & FWXFERQ_RUNNING || it->flag & FWXFERQ_RUNNING){
396 			return(EBUSY);
397 		}
398 		if((ir->flag & FWXFERQ_EXTBUF) || (it->flag & FWXFERQ_EXTBUF)){
399 			return(EBUSY);
400 		}
401 		if((ibufreq->rx.nchunk *
402 			ibufreq->rx.psize * ibufreq->rx.npacket) +
403 		   (ibufreq->tx.nchunk *
404 			ibufreq->tx.psize * ibufreq->tx.npacket) <= 0){
405 				return(EINVAL);
406 		}
407 		ir->bulkxfer
408 			= (struct fw_bulkxfer *)malloc(sizeof(struct fw_bulkxfer) * ibufreq->rx.nchunk, M_FW, M_WAITOK);
409 		if(ir->bulkxfer == NULL){
410 			return(ENOMEM);
411 		}
412 		it->bulkxfer
413 			= (struct fw_bulkxfer *)malloc(sizeof(struct fw_bulkxfer) * ibufreq->tx.nchunk, M_FW, M_WAITOK);
414 		if(it->bulkxfer == NULL){
415 			return(ENOMEM);
416 		}
417 		if (ibufreq->rx.psize > 0) {
418 			ibufreq->rx.psize = roundup2(ibufreq->rx.psize,
419 							sizeof(u_int32_t));
420 			ir->buf = fwdma_malloc_multiseg(
421 				sc->fc, sizeof(u_int32_t),
422 				ibufreq->rx.psize,
423 				ibufreq->rx.nchunk * ibufreq->rx.npacket,
424 				BUS_DMA_WAITOK);
425 
426 			if(ir->buf == NULL){
427 				free(ir->bulkxfer, M_FW);
428 				free(it->bulkxfer, M_FW);
429 				ir->bulkxfer = NULL;
430 				it->bulkxfer = NULL;
431 				it->buf = NULL;
432 				return(ENOMEM);
433 			}
434 		}
435 		if (ibufreq->tx.psize > 0) {
436 			ibufreq->tx.psize = roundup2(ibufreq->tx.psize,
437 							sizeof(u_int32_t));
438 			it->buf = fwdma_malloc_multiseg(
439 				sc->fc, sizeof(u_int32_t),
440 				ibufreq->tx.psize,
441 				ibufreq->tx.nchunk * ibufreq->tx.npacket,
442 				BUS_DMA_WAITOK);
443 
444 			if(it->buf == NULL){
445 				free(ir->bulkxfer, M_FW);
446 				free(it->bulkxfer, M_FW);
447 				fwdma_free_multiseg(ir->buf);
448 				ir->bulkxfer = NULL;
449 				it->bulkxfer = NULL;
450 				it->buf = NULL;
451 				return(ENOMEM);
452 			}
453 		}
454 
455 		ir->bnchunk = ibufreq->rx.nchunk;
456 		ir->bnpacket = ibufreq->rx.npacket;
457 		ir->psize = (ibufreq->rx.psize + 3) & ~3;
458 		ir->queued = 0;
459 
460 		it->bnchunk = ibufreq->tx.nchunk;
461 		it->bnpacket = ibufreq->tx.npacket;
462 		it->psize = (ibufreq->tx.psize + 3) & ~3;
463 		it->queued = 0;
464 
465 		STAILQ_INIT(&ir->stvalid);
466 		STAILQ_INIT(&ir->stfree);
467 		STAILQ_INIT(&ir->stdma);
468 		ir->stproc = NULL;
469 
470 		STAILQ_INIT(&it->stvalid);
471 		STAILQ_INIT(&it->stfree);
472 		STAILQ_INIT(&it->stdma);
473 		it->stproc = NULL;
474 
475 		for(i = 0 ; i < sc->fc->ir[sub]->bnchunk; i++){
476 			ir->bulkxfer[i].poffset = i * ir->bnpacket;
477 			ir->bulkxfer[i].mbuf = NULL;
478 			STAILQ_INSERT_TAIL(&ir->stfree,
479 					&ir->bulkxfer[i], link);
480 		}
481 		for(i = 0 ; i < sc->fc->it[sub]->bnchunk; i++){
482 			it->bulkxfer[i].poffset = i * it->bnpacket;
483 			it->bulkxfer[i].mbuf = NULL;
484 			STAILQ_INSERT_TAIL(&it->stfree,
485 					&it->bulkxfer[i], link);
486 		}
487 		ir->flag &= ~FWXFERQ_MODEMASK;
488 		ir->flag |= FWXFERQ_STREAM;
489 		ir->flag |= FWXFERQ_EXTBUF;
490 
491 		it->flag &= ~FWXFERQ_MODEMASK;
492 		it->flag |= FWXFERQ_STREAM;
493 		it->flag |= FWXFERQ_EXTBUF;
494 		err = 0;
495 		break;
496 	case FW_GSTBUF:
497 		ibufreq->rx.nchunk = sc->fc->ir[sub]->bnchunk;
498 		ibufreq->rx.npacket = sc->fc->ir[sub]->bnpacket;
499 		ibufreq->rx.psize = sc->fc->ir[sub]->psize;
500 
501 		ibufreq->tx.nchunk = sc->fc->it[sub]->bnchunk;
502 		ibufreq->tx.npacket = sc->fc->it[sub]->bnpacket;
503 		ibufreq->tx.psize = sc->fc->it[sub]->psize;
504 		break;
505 	case FW_ASYREQ:
506 		xfer = fw_xfer_alloc_buf(M_FWXFER, asyreq->req.len,
507 							PAGE_SIZE /* XXX */);
508 		if(xfer == NULL){
509 			err = ENOMEM;
510 			return err;
511 		}
512 		fp = &asyreq->pkt;
513 		switch (asyreq->req.type) {
514 		case FWASREQNODE:
515 			xfer->dst = fp->mode.hdr.dst;
516 			break;
517 		case FWASREQEUI:
518 			fwdev = fw_noderesolve_eui64(sc->fc,
519 						&asyreq->req.dst.eui);
520 			if (fwdev == NULL) {
521 				device_printf(sc->fc->bdev,
522 					"cannot find node\n");
523 				err = EINVAL;
524 				goto error;
525 			}
526 			xfer->dst = FWLOCALBUS | fwdev->dst;
527 			fp->mode.hdr.dst = xfer->dst;
528 			break;
529 		case FWASRESTL:
530 			/* XXX what's this? */
531 			break;
532 		case FWASREQSTREAM:
533 			/* nothing to do */
534 			break;
535 		}
536 		xfer->spd = asyreq->req.sped;
537 		bcopy(fp, xfer->send.buf, xfer->send.len);
538 		xfer->act.hand = fw_asy_callback;
539 		err = fw_asyreq(sc->fc, sub, xfer);
540 		if(err){
541 			fw_xfer_free( xfer);
542 			return err;
543 		}
544 		err = tsleep(xfer, FWPRI, "asyreq", hz);
545 		if(err == 0){
546 			if(asyreq->req.len >= xfer->recv.len){
547 				asyreq->req.len = xfer->recv.len;
548 			}else{
549 				err = EINVAL;
550 			}
551 			bcopy(xfer->recv.buf, fp, asyreq->req.len);
552 		}
553 error:
554 		fw_xfer_free( xfer);
555 		break;
556 	case FW_IBUSRST:
557 		sc->fc->ibr(sc->fc);
558 		break;
559 	case FW_CBINDADDR:
560 		fwb = fw_bindlookup(sc->fc,
561 				bindreq->start.hi, bindreq->start.lo);
562 		if(fwb == NULL){
563 			err = EINVAL;
564 			break;
565 		}
566 		STAILQ_REMOVE(&sc->fc->binds, fwb, fw_bind, fclist);
567 		STAILQ_REMOVE(&sc->fc->ir[sub]->binds, fwb, fw_bind, chlist);
568 		free(fwb, M_FW);
569 		break;
570 	case FW_SBINDADDR:
571 		if(bindreq->len <= 0 ){
572 			err = EINVAL;
573 			break;
574 		}
575 		if(bindreq->start.hi > 0xffff ){
576 			err = EINVAL;
577 			break;
578 		}
579 		fwb = (struct fw_bind *)malloc(sizeof (struct fw_bind), M_FW, M_NOWAIT);
580 		if(fwb == NULL){
581 			err = ENOMEM;
582 			break;
583 		}
584 		fwb->start_hi = bindreq->start.hi;
585 		fwb->start_lo = bindreq->start.lo;
586 		fwb->addrlen = bindreq->len;
587 		fwb->sub = sub;
588 		fwb->act_type = FWACT_CH;
589 
590 		xfer = fw_xfer_alloc(M_FWXFER);
591 		if(xfer == NULL){
592 			err = ENOMEM;
593 			return err;
594 		}
595 		xfer->fc = sc->fc;
596 
597 		s = splfw();
598 		/* XXX broken. need multiple xfer */
599 		STAILQ_INIT(&fwb->xferlist);
600 		STAILQ_INSERT_TAIL(&fwb->xferlist, xfer, link);
601 		splx(s);
602 		err = fw_bindadd(sc->fc, fwb);
603 		break;
604 	case FW_GDEVLST:
605 		i = len = 1;
606 		/* myself */
607 		devinfo = &fwdevlst->dev[0];
608 		devinfo->dst = sc->fc->nodeid;
609 		devinfo->status = 0;	/* XXX */
610 		devinfo->eui.hi = sc->fc->eui.hi;
611 		devinfo->eui.lo = sc->fc->eui.lo;
612 		STAILQ_FOREACH(fwdev, &sc->fc->devices, link) {
613 			if(len < FW_MAX_DEVLST){
614 				devinfo = &fwdevlst->dev[len++];
615 				devinfo->dst = fwdev->dst;
616 				devinfo->status =
617 					(fwdev->status == FWDEVINVAL)?0:1;
618 				devinfo->eui.hi = fwdev->eui.hi;
619 				devinfo->eui.lo = fwdev->eui.lo;
620 			}
621 			i++;
622 		}
623 		fwdevlst->n = i;
624 		fwdevlst->info_len = len;
625 		break;
626 	case FW_GTPMAP:
627 		bcopy(sc->fc->topology_map, data,
628 				(sc->fc->topology_map->crc_len + 1) * 4);
629 		break;
630 	case FW_GCROM:
631 		STAILQ_FOREACH(fwdev, &sc->fc->devices, link)
632 			if (FW_EUI64_EQUAL(fwdev->eui, crom_buf->eui))
633 				break;
634 		if (fwdev == NULL) {
635 			if (!FW_EUI64_EQUAL(sc->fc->eui, crom_buf->eui)) {
636 				err = FWNODE_INVAL;
637 				break;
638 			}
639 			/* myself */
640 			ptr = malloc(CROMSIZE, M_FW, M_WAITOK);
641 			len = CROMSIZE;
642 			for (i = 0; i < CROMSIZE/4; i++)
643 				((u_int32_t *)ptr)[i]
644 					= ntohl(sc->fc->config_rom[i]);
645 		} else {
646 			/* found */
647 			ptr = (void *)&fwdev->csrrom[0];
648 			if (fwdev->rommax < CSRROMOFF)
649 				len = 0;
650 			else
651 				len = fwdev->rommax - CSRROMOFF + 4;
652 		}
653 		if (crom_buf->len < len)
654 			len = crom_buf->len;
655 		else
656 			crom_buf->len = len;
657 		err = copyout(ptr, crom_buf->ptr, len);
658 		if (fwdev == NULL)
659 			/* myself */
660 			free(ptr, M_FW);
661 		break;
662 	default:
663 		sc->fc->ioctl (dev, cmd, data, flag, td);
664 		break;
665 	}
666 	return err;
667 }
668 int
669 fw_poll(dev_t dev, int events, fw_proc *td)
670 {
671 	int revents;
672 	int tmp;
673 	int unit = DEV2UNIT(dev);
674 	int sub = DEV2DMACH(dev);
675 	struct firewire_softc *sc;
676 
677 	if (DEV_FWMEM(dev))
678 		return fwmem_poll(dev, events, td);
679 
680 	sc = devclass_get_softc(firewire_devclass, unit);
681 	revents = 0;
682 	tmp = POLLIN | POLLRDNORM;
683 	if (events & tmp) {
684 		if (STAILQ_FIRST(&sc->fc->ir[sub]->q) != NULL)
685 			revents |= tmp;
686 		else
687 			selrecord(td, &sc->fc->ir[sub]->rsel);
688 	}
689 	tmp = POLLOUT | POLLWRNORM;
690 	if (events & tmp) {
691 		/* XXX should be fixed */
692 		revents |= tmp;
693 	}
694 
695 	return revents;
696 }
697 
698 static int
699 #if __FreeBSD_version < 500102
700 fw_mmap (dev_t dev, vm_offset_t offset, int nproto)
701 #else
702 fw_mmap (dev_t dev, vm_offset_t offset, vm_paddr_t *paddr, int nproto)
703 #endif
704 {
705 	struct firewire_softc *fc;
706 	int unit = DEV2UNIT(dev);
707 
708 	if (DEV_FWMEM(dev))
709 #if __FreeBSD_version < 500102
710 		return fwmem_mmap(dev, offset, nproto);
711 #else
712 		return fwmem_mmap(dev, offset, paddr, nproto);
713 #endif
714 
715 	fc = devclass_get_softc(firewire_devclass, unit);
716 
717 	return EINVAL;
718 }
719