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