?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Merge with Linu 2.4.0-test6-pre6.
[linux-2.6/linux-mips.git] / drivers / ieee1394 / video1394.c
blobb42ce0b460c3cf035219a556f25033c42abd5e46
1 /*
2 * video1394.c - video driver for OHCI 1394 boards
3 * Copyright (C)1999,2000 Sebastien Rougeaux <sebastien.rougeaux@anu.edu.au>
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software Foundation,
17 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18 */
19
20 #include <linux/config.h>
21 #include <linux/kernel.h>
22 #include <linux/slab.h>
23 #include <linux/interrupt.h>
24 #include <linux/wait.h>
25 #include <linux/errno.h>
26 #include <linux/module.h>
27 #include <linux/pci.h>
28 #include <linux/fs.h>
29 #include <linux/poll.h>
30 #include <linux/smp_lock.h>
31 #include <asm/byteorder.h>
32 #include <asm/atomic.h>
33 #include <asm/io.h>
34 #include <asm/uaccess.h>
35 #include <linux/proc_fs.h>
36 #include <linux/tqueue.h>
37 #include <linux/delay.h>
38
39 #include <asm/pgtable.h>
40 #include <asm/page.h>
41 #include <linux/sched.h>
42 #include <asm/segment.h>
43 #include <linux/types.h>
44 #include <linux/wrapper.h>
45 #include <linux/vmalloc.h>
46
47 #include "ieee1394.h"
48 #include "ieee1394_types.h"
49 #include "hosts.h"
50 #include "ieee1394_core.h"
51 #include "video1394.h"
52
53 #include "ohci1394.h"
54
55 #define VIDEO1394_MAJOR 172
56 #define ISO_CHANNELS 64
57 #define ISO_RECEIVE 0
58 #define ISO_TRANSMIT 1
59
60 struct it_dma_prg {
61 struct dma_cmd begin;
62 quadlet_t data[4];
63 struct dma_cmd end;
64 quadlet_t pad[4]; /* FIXME: quick hack for memory alignment */
65 };
66
67 struct dma_iso_ctx {
68 struct ti_ohci *ohci;
69 int ctx;
70 int channel;
71 int last_buffer;
72 unsigned int num_desc;
73 unsigned int buf_size;
74 unsigned int frame_size;
75 unsigned int packet_size;
76 unsigned int left_size;
77 unsigned int nb_cmd;
78 unsigned char *buf;
79 struct dma_cmd **ir_prg;
80 struct it_dma_prg **it_prg;
81 unsigned int *buffer_status;
82 int ctrlClear;
83 int ctrlSet;
84 int cmdPtr;
85 int ctxMatch;
86 wait_queue_head_t waitq;
87 };
88
89 struct video_card {
90 struct ti_ohci *ohci;
91
92 struct dma_iso_ctx **ir_context;
93 struct dma_iso_ctx **it_context;
94 struct dma_iso_ctx *current_ctx;
95 };
96
97 #ifdef CONFIG_IEEE1394_VERBOSEDEBUG
98 #define VIDEO1394_DEBUG
99 #endif
100
101 #ifdef DBGMSG
102 #undef DBGMSG
103 #endif
104
105 #ifdef VIDEO1394_DEBUG
106 #define DBGMSG(card, fmt, args...) \
107 printk(KERN_INFO "video1394_%d: " fmt "\n" , card , ## args)
108 #else
109 #define DBGMSG(card, fmt, args...)
110 #endif
111
112 /* print general (card independent) information */
113 #define PRINT_G(level, fmt, args...) \
114 printk(level "video1394: " fmt "\n" , ## args)
115
116 /* print card specific information */
117 #define PRINT(level, card, fmt, args...) \
118 printk(level "video1394_%d: " fmt "\n" , card , ## args)
119
120 void irq_handler(int card, quadlet_t isoRecvIntEvent,
121 quadlet_t isoXmitIntEvent);
122
123 static struct video_card video_cards[MAX_OHCI1394_CARDS];
124 static int num_of_video_cards = 0;
125 static struct video_template video_tmpl = { irq_handler };
126
127 /* Taken from bttv.c */
128 /*******************************/
129 /* Memory management functions */
130 /*******************************/
131
132 #define MDEBUG(x) do { } while(0) /* Debug memory management */
133
134 /* [DaveM] I've recoded most of this so that:
135 * 1) It's easier to tell what is happening
136 * 2) It's more portable, especially for translating things
137 * out of vmalloc mapped areas in the kernel.
138 * 3) Less unnecessary translations happen.
139 *
140 * The code used to assume that the kernel vmalloc mappings
141 * existed in the page tables of every process, this is simply
142 * not guarenteed. We now use pgd_offset_k which is the
143 * defined way to get at the kernel page tables.
144 */
145
146 #if LINUX_VERSION_CODE < KERNEL_VERSION(2,3,0)
147 #define page_address(x) ((void *) (x))
148 #endif
149
150 /* Given PGD from the address space's page table, return the kernel
151 * virtual mapping of the physical memory mapped at ADR.
152 */
153 static inline unsigned long uvirt_to_kva(pgd_t *pgd, unsigned long adr)
154 {
155 unsigned long ret = 0UL;
156 pmd_t *pmd;
157 pte_t *ptep, pte;
158
159 if (!pgd_none(*pgd)) {
160 pmd = pmd_offset(pgd, adr);
161 if (!pmd_none(*pmd)) {
162 ptep = pte_offset(pmd, adr);
163 pte = *ptep;
164 if(pte_present(pte)) {
165 ret = (unsigned long) page_address(pte_page(pte));
166 ret |= (adr & (PAGE_SIZE - 1));
167 }
168 }
169 }
170 MDEBUG(printk("uv2kva(%lx-->%lx)", adr, ret));
171 return ret;
172 }
173
174 static inline unsigned long uvirt_to_bus(unsigned long adr)
175 {
176 unsigned long kva, ret;
177
178 kva = uvirt_to_kva(pgd_offset(current->mm, adr), adr);
179 ret = virt_to_bus((void *)kva);
180 MDEBUG(printk("uv2b(%lx-->%lx)", adr, ret));
181 return ret;
182 }
183
184 static inline unsigned long kvirt_to_bus(unsigned long adr)
185 {
186 unsigned long va, kva, ret;
187
188 va = VMALLOC_VMADDR(adr);
189 kva = uvirt_to_kva(pgd_offset_k(va), va);
190 ret = virt_to_bus((void *)kva);
191 MDEBUG(printk("kv2b(%lx-->%lx)", adr, ret));
192 return ret;
193 }
194
195 /* Here we want the physical address of the memory.
196 * This is used when initializing the contents of the
197 * area and marking the pages as reserved.
198 */
199 static inline unsigned long kvirt_to_pa(unsigned long adr)
200 {
201 unsigned long va, kva, ret;
202
203 va = VMALLOC_VMADDR(adr);
204 kva = uvirt_to_kva(pgd_offset_k(va), va);
205 ret = __pa(kva);
206 MDEBUG(printk("kv2pa(%lx-->%lx)", adr, ret));
207 return ret;
208 }
209
210 static void * rvmalloc(unsigned long size)
211 {
212 void * mem;
213 unsigned long adr, page;
214
215 mem=vmalloc(size);
216 if (mem)
217 {
218 memset(mem, 0, size); /* Clear the ram out,
219 no junk to the user */
220 adr=(unsigned long) mem;
221 while (size > 0)
222 {
223 page = kvirt_to_pa(adr);
224 mem_map_reserve(MAP_NR(__va(page)));
225 adr+=PAGE_SIZE;
226 size-=PAGE_SIZE;
227 }
228 }
229 return mem;
230 }
231
232 static void rvfree(void * mem, unsigned long size)
233 {
234 unsigned long adr, page;
235
236 if (mem)
237 {
238 adr=(unsigned long) mem;
239 while (size > 0)
240 {
241 page = kvirt_to_pa(adr);
242 mem_map_unreserve(MAP_NR(__va(page)));
243 adr+=PAGE_SIZE;
244 size-=PAGE_SIZE;
245 }
246 vfree(mem);
247 }
248 }
249
250 static int free_dma_iso_ctx(struct dma_iso_ctx **d)
251 {
252 int i;
253 struct ti_ohci *ohci;
254
255 if ((*d)==NULL) return -1;
256
257 ohci = (struct ti_ohci *)(*d)->ohci;
258
259 DBGMSG(ohci->id, "Freeing dma_iso_ctx %d", (*d)->ctx);
260
261 ohci1394_stop_context(ohci, (*d)->ctrlClear, NULL);
262
263 if ((*d)->buf) rvfree((void *)(*d)->buf,
264 (*d)->num_desc * (*d)->buf_size);
265
266 if ((*d)->ir_prg) {
267 for (i=0;i<(*d)->num_desc;i++)
268 if ((*d)->ir_prg[i]) kfree((*d)->ir_prg[i]);
269 kfree((*d)->ir_prg);
270 }
271
272 if ((*d)->it_prg) {
273 for (i=0;i<(*d)->num_desc;i++)
274 if ((*d)->it_prg[i]) kfree((*d)->it_prg[i]);
275 kfree((*d)->it_prg);
276 }
277
278 if ((*d)->buffer_status)
279 kfree((*d)->buffer_status);
280
281 kfree(*d);
282 *d = NULL;
283
284 return 0;
285 }
286
287 static struct dma_iso_ctx *
288 alloc_dma_iso_ctx(struct ti_ohci *ohci, int type, int ctx, int num_desc,
289 int buf_size, int channel, unsigned int packet_size)
290 {
291 struct dma_iso_ctx *d=NULL;
292 int i;
293
294 d = (struct dma_iso_ctx *)kmalloc(sizeof(struct dma_iso_ctx),
295 GFP_KERNEL);
296 memset(d, 0, sizeof(struct dma_iso_ctx));
297
298 if (d==NULL) {
299 PRINT(KERN_ERR, ohci->id, "failed to allocate dma_iso_ctx");
300 return NULL;
301 }
302
303 d->ohci = (void *)ohci;
304 d->ctx = ctx;
305 d->channel = channel;
306 d->num_desc = num_desc;
307 d->frame_size = buf_size;
308 if (buf_size%PAGE_SIZE)
309 d->buf_size = buf_size + PAGE_SIZE - (buf_size%PAGE_SIZE);
310 else
311 d->buf_size = buf_size;
312 d->last_buffer = -1;
313 d->buf = NULL;
314 d->ir_prg = NULL;
315 init_waitqueue_head(&d->waitq);
316
317 d->buf = rvmalloc(d->num_desc * d->buf_size);
318
319 if (d->buf == NULL) {
320 PRINT(KERN_ERR, ohci->id, "failed to allocate dma buffer");
321 free_dma_iso_ctx(&d);
322 return NULL;
323 }
324 memset(d->buf, 0, d->num_desc * d->buf_size);
325
326 if (type == ISO_RECEIVE) {
327 d->ctrlSet = OHCI1394_IsoRcvContextControlSet+32*d->ctx;
328 d->ctrlClear = OHCI1394_IsoRcvContextControlClear+32*d->ctx;
329 d->cmdPtr = OHCI1394_IsoRcvCommandPtr+32*d->ctx;
330 d->ctxMatch = OHCI1394_IsoRcvContextMatch+32*d->ctx;
331
332 d->ir_prg = kmalloc(d->num_desc * sizeof(struct dma_cmd *),
333 GFP_KERNEL);
334
335 if (d->ir_prg == NULL) {
336 PRINT(KERN_ERR, ohci->id,
337 "failed to allocate dma ir prg");
338 free_dma_iso_ctx(&d);
339 return NULL;
340 }
341 memset(d->ir_prg, 0, d->num_desc * sizeof(struct dma_cmd *));
342
343 d->nb_cmd = d->buf_size / PAGE_SIZE + 1;
344 d->left_size = (d->frame_size % PAGE_SIZE) ?
345 d->frame_size % PAGE_SIZE : PAGE_SIZE;
346
347 for (i=0;i<d->num_desc;i++) {
348 d->ir_prg[i] = kmalloc(d->nb_cmd *
349 sizeof(struct dma_cmd),
350 GFP_KERNEL);
351 if (d->ir_prg[i] == NULL) {
352 PRINT(KERN_ERR, ohci->id,
353 "failed to allocate dma ir prg");
354 free_dma_iso_ctx(&d);
355 return NULL;
356 }
357 }
358 }
359 else { /* ISO_TRANSMIT */
360 d->ctrlSet = OHCI1394_IsoXmitContextControlSet+16*d->ctx;
361 d->ctrlClear = OHCI1394_IsoXmitContextControlClear+16*d->ctx;
362 d->cmdPtr = OHCI1394_IsoXmitCommandPtr+16*d->ctx;
363
364 d->it_prg = kmalloc(d->num_desc * sizeof(struct it_dma_prg *),
365 GFP_KERNEL);
366
367 if (d->it_prg == NULL) {
368 PRINT(KERN_ERR, ohci->id,
369 "failed to allocate dma it prg");
370 free_dma_iso_ctx(&d);
371 return NULL;
372 }
373 memset(d->it_prg, 0, d->num_desc*sizeof(struct it_dma_prg *));
374
375 d->packet_size = packet_size;
376
377 if (PAGE_SIZE % packet_size || packet_size>2048) {
378 PRINT(KERN_ERR, ohci->id,
379 "Packet size %d not yet supported\n",
380 packet_size);
381 free_dma_iso_ctx(&d);
382 return NULL;
383 }
384
385 d->nb_cmd = d->frame_size / d->packet_size;
386 if (d->frame_size % d->packet_size) {
387 d->nb_cmd++;
388 d->left_size = d->frame_size % d->packet_size;
389 }
390 else
391 d->left_size = d->packet_size;
392
393 for (i=0;i<d->num_desc;i++) {
394 d->it_prg[i] = kmalloc(d->nb_cmd *
395 sizeof(struct it_dma_prg),
396 GFP_KERNEL);
397 if (d->it_prg[i] == NULL) {
398 PRINT(KERN_ERR, ohci->id,
399 "failed to allocate dma it prg");
400 free_dma_iso_ctx(&d);
401 return NULL;
402 }
403 }
404 }
405
406 d->buffer_status = kmalloc(d->num_desc * sizeof(unsigned int),
407 GFP_KERNEL);
408
409 if (d->buffer_status == NULL) {
410 PRINT(KERN_ERR, ohci->id, "failed to allocate dma ir prg");
411 free_dma_iso_ctx(&d);
412 return NULL;
413 }
414 memset(d->buffer_status, 0, d->num_desc * sizeof(unsigned int));
415
416 PRINT(KERN_INFO, ohci->id, "Iso %s DMA: %d buffers "
417 "of size %d allocated for a frame size %d, each with %d prgs",
418 (type==ISO_RECEIVE) ? "receive" : "transmit",
419 d->num_desc, d->buf_size, d->frame_size, d->nb_cmd);
420
421 return d;
422 }
423
424 static void reset_ir_status(struct dma_iso_ctx *d, int n)
425 {
426 int i;
427 d->ir_prg[n][0].status = 4;
428 d->ir_prg[n][1].status = PAGE_SIZE-4;
429 for (i=2;i<d->nb_cmd-1;i++)
430 d->ir_prg[n][i].status = PAGE_SIZE;
431 d->ir_prg[n][i].status = d->left_size;
432 }
433
434 static void initialize_dma_ir_prg(struct dma_iso_ctx *d, int n)
435 {
436 struct dma_cmd *ir_prg = d->ir_prg[n];
437 unsigned long buf = (unsigned long)d->buf+n*d->buf_size;
438 int i;
439
440 /* the first descriptor will sync and read only 4 bytes */
441 ir_prg[0].control = (0x280F << 16) | 4;
442 ir_prg[0].address = kvirt_to_bus(buf);
443 ir_prg[0].branchAddress = (virt_to_bus(&(ir_prg[1].control))
444 & 0xfffffff0) | 0x1;
445
446 /* the second descriptor will read PAGE_SIZE-4 bytes */
447 ir_prg[1].control = (0x280C << 16) | (PAGE_SIZE-4);
448 ir_prg[1].address = kvirt_to_bus(buf+4);
449 ir_prg[1].branchAddress = (virt_to_bus(&(ir_prg[2].control))
450 & 0xfffffff0) | 0x1;
451
452 for (i=2;i<d->nb_cmd-1;i++) {
453 ir_prg[i].control = (0x280C << 16) | PAGE_SIZE;
454 ir_prg[i].address = kvirt_to_bus(buf+(i-1)*PAGE_SIZE);
455
456 ir_prg[i].branchAddress =
457 (virt_to_bus(&(ir_prg[i+1].control))
458 & 0xfffffff0) | 0x1;
459 }
460
461 /* the last descriptor will generate an interrupt */
462 ir_prg[i].control = (0x283C << 16) | d->left_size;
463 ir_prg[i].address = kvirt_to_bus(buf+(i-1)*PAGE_SIZE);
464 }
465
466 static void initialize_dma_ir_ctx(struct dma_iso_ctx *d, int tag)
467 {
468 struct ti_ohci *ohci = (struct ti_ohci *)d->ohci;
469 int i;
470
471 ohci1394_stop_context(ohci, d->ctrlClear, NULL);
472
473 for (i=0;i<d->num_desc;i++) {
474 initialize_dma_ir_prg(d, i);
475 reset_ir_status(d, i);
476 }
477
478 /* Set bufferFill, no header */
479 reg_write(ohci, d->ctrlSet, 0x80000000);
480
481 /* Set the context match register to match on all tags,
482 sync for sync tag, and listen to d->channel */
483 reg_write(ohci, d->ctxMatch, 0xf0000000|((tag&0xf)<<8)|d->channel);
484
485 /* Set up isoRecvIntMask to generate interrupts */
486 reg_write(ohci, OHCI1394_IsoRecvIntMaskSet, 1<<d->ctx);
487 }
488
489 /* find which context is listening to this channel */
490 int ir_ctx_listening(struct video_card *video, int channel)
491 {
492 int i;
493 struct ti_ohci *ohci = video->ohci;
494
495 for (i=0;i<ohci->nb_iso_rcv_ctx-1;i++)
496 if (video->ir_context[i]) {
497 if (video->ir_context[i]->channel==channel)
498 return i;
499 }
500
501 PRINT(KERN_ERR, ohci->id,
502 "no iso context is listening to channel %d",
503 channel);
504 return -1;
505 }
506
507 int it_ctx_talking(struct video_card *video, int channel)
508 {
509 int i;
510 struct ti_ohci *ohci = video->ohci;
511
512 for (i=0;i<ohci->nb_iso_xmit_ctx;i++)
513 if (video->it_context[i]) {
514 if (video->it_context[i]->channel==channel)
515 return i;
516 }
517
518 PRINT(KERN_ERR, ohci->id,
519 "no iso context is talking to channel %d",
520 channel);
521 return -1;
522 }
523
524 int wakeup_dma_ir_ctx(struct ti_ohci *ohci, struct dma_iso_ctx *d)
525 {
526 int i;
527
528 if (d==NULL) {
529 PRINT(KERN_ERR, ohci->id, "Iso receive event received but "
530 "context not allocated");
531 return -EFAULT;
532 }
533
534 for (i=0;i<d->num_desc;i++) {
535 if (d->ir_prg[i][d->nb_cmd-1].status & 0xFFFF0000) {
536 reset_ir_status(d, i);
537 d->buffer_status[i] = VIDEO1394_BUFFER_READY;
538 }
539 }
540 if (waitqueue_active(&d->waitq)) wake_up_interruptible(&d->waitq);
541 return 0;
542 }
543
544 int wakeup_dma_it_ctx(struct ti_ohci *ohci, struct dma_iso_ctx *d)
545 {
546 int i;
547
548 if (d==NULL) {
549 PRINT(KERN_ERR, ohci->id, "Iso transmit event received but "
550 "context not allocated");
551 return -EFAULT;
552 }
553
554 for (i=0;i<d->num_desc;i++) {
555 if (d->it_prg[i][d->nb_cmd-1].end.status & 0xFFFF0000) {
556 d->it_prg[i][d->nb_cmd-1].end.status = 0;
557 d->buffer_status[i] = VIDEO1394_BUFFER_READY;
558 }
559 }
560 if (waitqueue_active(&d->waitq)) wake_up_interruptible(&d->waitq);
561 return 0;
562 }
563
564 static void initialize_dma_it_prg(struct dma_iso_ctx *d, int n, int sync_tag)
565 {
566 struct it_dma_prg *it_prg = d->it_prg[n];
567 unsigned long buf = (unsigned long)d->buf+n*d->buf_size;
568 int i;
569
570 for (i=0;i<d->nb_cmd;i++) {
571
572 it_prg[i].begin.control = OUTPUT_MORE_IMMEDIATE | 8 ;
573 it_prg[i].begin.address = 0;
574
575 it_prg[i].begin.status = 0;
576
577 /* FIXME: what is the tag value + speed selection */
578 it_prg[i].data[0] =
579 (DMA_SPEED_400<<16) | (d->channel<<8) | 0xa0;
580 if (i==0) it_prg[i].data[0] |= sync_tag;
581 it_prg[i].data[1] = d->packet_size << 16;
582 it_prg[i].data[2] = 0;
583 it_prg[i].data[3] = 0;
584
585 it_prg[i].end.control = 0x100c0000;
586 it_prg[i].end.address =
587 kvirt_to_bus(buf+i*d->packet_size);
588
589 if (i<d->nb_cmd-1) {
590 it_prg[i].end.control |= d->packet_size;
591 it_prg[i].begin.branchAddress =
592 (virt_to_bus(&(it_prg[i+1].begin.control))
593 & 0xfffffff0) | 0x3;
594 it_prg[i].end.branchAddress =
595 (virt_to_bus(&(it_prg[i+1].begin.control))
596 & 0xfffffff0) | 0x3;
597 }
598 else {
599 /* the last prg generates an interrupt */
600 it_prg[i].end.control |= 0x08300000 | d->left_size;
601 /* the last prg doesn't branch */
602 it_prg[i].begin.branchAddress = 0;
603 it_prg[i].end.branchAddress = 0;
604 }
605 it_prg[i].end.status = 0;
606
607 #if 0
608 printk("%d:%d: %08x-%08x ctrl %08x brch %08x d0 %08x d1 %08x\n",n,i,
609 virt_to_bus(&(it_prg[i].begin.control)),
610 virt_to_bus(&(it_prg[i].end.control)),
611 it_prg[i].end.control,
612 it_prg[i].end.branchAddress,
613 it_prg[i].data[0], it_prg[i].data[1]);
614 #endif
615 }
616 }
617
618 static void initialize_dma_it_ctx(struct dma_iso_ctx *d, int sync_tag)
619 {
620 struct ti_ohci *ohci = (struct ti_ohci *)d->ohci;
621 int i;
622
623 ohci1394_stop_context(ohci, d->ctrlClear, NULL);
624
625 for (i=0;i<d->num_desc;i++)
626 initialize_dma_it_prg(d, i, sync_tag);
627
628 /* Set up isoRecvIntMask to generate interrupts */
629 reg_write(ohci, OHCI1394_IsoXmitIntMaskSet, 1<<d->ctx);
630 }
631
632 static int do_iso_mmap(struct ti_ohci *ohci, struct dma_iso_ctx *d,
633 const char *adr, unsigned long size)
634 {
635 unsigned long start=(unsigned long) adr;
636 unsigned long page,pos;
637
638 if (size>d->num_desc * d->buf_size) {
639 PRINT(KERN_ERR, ohci->id,
640 "iso context %d buf size is different from mmap size",
641 d->ctx);
642 return -EINVAL;
643 }
644 if (!d->buf) {
645 PRINT(KERN_ERR, ohci->id,
646 "iso context %d is not allocated", d->ctx);
647 return -EINVAL;
648 }
649
650 pos=(unsigned long) d->buf;
651 while (size > 0) {
652 page = kvirt_to_pa(pos);
653 if (remap_page_range(start, page, PAGE_SIZE, PAGE_SHARED))
654 return -EAGAIN;
655 start+=PAGE_SIZE;
656 pos+=PAGE_SIZE;
657 size-=PAGE_SIZE;
658 }
659 return 0;
660 }
661
662 static int video1394_ioctl(struct inode *inode, struct file *file,
663 unsigned int cmd, unsigned long arg)
664 {
665 struct video_card *video = &video_cards[MINOR(inode->i_rdev)];
666 struct ti_ohci *ohci= video->ohci;
667
668 switch(cmd)
669 {
670 case VIDEO1394_LISTEN_CHANNEL:
671 case VIDEO1394_TALK_CHANNEL:
672 {
673 struct video1394_mmap v;
674 int i;
675
676 if(copy_from_user(&v, (void *)arg, sizeof(v)))
677 return -EFAULT;
678 if (v.channel<0 || v.channel>(ISO_CHANNELS-1)) {
679 PRINT(KERN_ERR, ohci->id,
680 "iso channel %d out of bound", v.channel);
681 return -EFAULT;
682 }
683 if (test_and_set_bit(v.channel, &ohci->IR_channel_usage)) {
684 PRINT(KERN_ERR, ohci->id,
685 "channel %d is already taken", v.channel);
686 return -EFAULT;
687 }
688
689 if (v.buf_size<=0) {
690 PRINT(KERN_ERR, ohci->id,
691 "Invalid %d length buffer requested",v.buf_size);
692 return -EFAULT;
693 }
694
695 if (v.nb_buffers<=0) {
696 PRINT(KERN_ERR, ohci->id,
697 "Invalid %d buffers requested",v.nb_buffers);
698 return -EFAULT;
699 }
700
701 if (v.nb_buffers * v.buf_size > VIDEO1394_MAX_SIZE) {
702 PRINT(KERN_ERR, ohci->id,
703 "%d buffers of size %d bytes is too big",
704 v.nb_buffers, v.buf_size);
705 return -EFAULT;
706 }
707
708 if (cmd == VIDEO1394_LISTEN_CHANNEL) {
709 /* find a free iso receive context */
710 for (i=0;i<ohci->nb_iso_rcv_ctx-1;i++)
711 if (video->ir_context[i]==NULL) break;
712
713 if (i==(ohci->nb_iso_rcv_ctx-1)) {
714 PRINT(KERN_ERR, ohci->id,
715 "no iso context available");
716 return -EFAULT;
717 }
718
719 video->ir_context[i] =
720 alloc_dma_iso_ctx(ohci, ISO_RECEIVE, i+1,
721 v.nb_buffers, v.buf_size,
722 v.channel, 0);
723
724 if (video->ir_context[i] == NULL) {
725 PRINT(KERN_ERR, ohci->id,
726 "Couldn't allocate ir context");
727 return -EFAULT;
728 }
729 initialize_dma_ir_ctx(video->ir_context[i],
730 v.sync_tag);
731
732 video->current_ctx = video->ir_context[i];
733
734 v.buf_size = video->ir_context[i]->buf_size;
735
736 PRINT(KERN_INFO, ohci->id,
737 "iso context %d listen on channel %d", i+1,
738 v.channel);
739 }
740 else {
741 /* find a free iso transmit context */
742 for (i=0;i<ohci->nb_iso_xmit_ctx;i++)
743 if (video->it_context[i]==NULL) break;
744
745 if (i==ohci->nb_iso_xmit_ctx) {
746 PRINT(KERN_ERR, ohci->id,
747 "no iso context available");
748 return -EFAULT;
749 }
750
751 video->it_context[i] =
752 alloc_dma_iso_ctx(ohci, ISO_TRANSMIT, i,
753 v.nb_buffers, v.buf_size,
754 v.channel, v.packet_size);
755
756 if (video->it_context[i] == NULL) {
757 PRINT(KERN_ERR, ohci->id,
758 "Couldn't allocate it context");
759 return -EFAULT;
760 }
761 initialize_dma_it_ctx(video->it_context[i],
762 v.sync_tag);
763
764 video->current_ctx = video->it_context[i];
765
766 v.buf_size = video->it_context[i]->buf_size;
767
768 PRINT(KERN_INFO, ohci->id,
769 "iso context %d talk on channel %d", i,
770 v.channel);
771 }
772
773 if(copy_to_user((void *)arg, &v, sizeof(v)))
774 return -EFAULT;
775
776 return 0;
777 }
778 case VIDEO1394_UNLISTEN_CHANNEL:
779 case VIDEO1394_UNTALK_CHANNEL:
780 {
781 int channel;
782 int i;
783
784 if(copy_from_user(&channel, (void *)arg, sizeof(int)))
785 return -EFAULT;
786
787 if (!test_and_clear_bit(channel, &ohci->IR_channel_usage)) {
788 PRINT(KERN_ERR, ohci->id,
789 "channel %d is not being used", channel);
790 return -EFAULT;
791 }
792
793 if (cmd == VIDEO1394_UNLISTEN_CHANNEL) {
794 i = ir_ctx_listening(video, channel);
795 if (i<0) return -EFAULT;
796
797 free_dma_iso_ctx(&video->ir_context[i]);
798
799 PRINT(KERN_INFO, ohci->id,
800 "iso context %d stop listening on channel %d",
801 i+1, channel);
802 }
803 else {
804 i = it_ctx_talking(video, channel);
805 if (i<0) return -EFAULT;
806
807 free_dma_iso_ctx(&video->it_context[i]);
808
809 PRINT(KERN_INFO, ohci->id,
810 "iso context %d stop talking on channel %d",
811 i, channel);
812 }
813
814 return 0;
815 }
816 case VIDEO1394_LISTEN_QUEUE_BUFFER:
817 {
818 struct video1394_wait v;
819 struct dma_iso_ctx *d;
820 int i;
821
822 if(copy_from_user(&v, (void *)arg, sizeof(v)))
823 return -EFAULT;
824
825 i = ir_ctx_listening(video, v.channel);
826 if (i<0) return -EFAULT;
827 d = video->ir_context[i];
828
829 if ((v.buffer<0) || (v.buffer>d->num_desc)) {
830 PRINT(KERN_ERR, ohci->id,
831 "buffer %d out of range",v.buffer);
832 return -EFAULT;
833 }
834
835 if (d->buffer_status[v.buffer]!=VIDEO1394_BUFFER_FREE) {
836 PRINT(KERN_ERR, ohci->id,
837 "buffer %d is already used",v.buffer);
838 return -EFAULT;
839 }
840
841 d->buffer_status[v.buffer]=VIDEO1394_BUFFER_QUEUED;
842
843 if (d->last_buffer>=0)
844 d->ir_prg[d->last_buffer][d->nb_cmd-1].branchAddress =
845 (virt_to_bus(&(d->ir_prg[v.buffer][0].control))
846 & 0xfffffff0) | 0x1;
847
848 d->last_buffer = v.buffer;
849
850 d->ir_prg[d->last_buffer][d->nb_cmd-1].branchAddress = 0;
851
852 if (!(reg_read(ohci, d->ctrlSet) & 0x8000))
853 {
854 DBGMSG(ohci->id, "Starting iso DMA ctx=%d",d->ctx);
855
856 /* Tell the controller where the first program is */
857 reg_write(ohci, d->cmdPtr,
858 virt_to_bus(&(d->ir_prg[v.buffer][0]))|0x1);
859
860 /* Run IR context */
861 reg_write(ohci, d->ctrlSet, 0x8000);
862 }
863 else {
864 /* Wake up dma context if necessary */
865 if (!(reg_read(ohci, d->ctrlSet) & 0x400)) {
866 PRINT(KERN_INFO, ohci->id,
867 "Waking up iso dma ctx=%d", d->ctx);
868 reg_write(ohci, d->ctrlSet, 0x1000);
869 }
870 }
871 return 0;
872
873 }
874 case VIDEO1394_LISTEN_WAIT_BUFFER:
875 {
876 struct video1394_wait v;
877 struct dma_iso_ctx *d;
878 int i;
879
880 if(copy_from_user(&v, (void *)arg, sizeof(v)))
881 return -EFAULT;
882
883 i = ir_ctx_listening(video, v.channel);
884 if (i<0) return -EFAULT;
885 d = video->ir_context[i];
886
887 if ((v.buffer<0) || (v.buffer>d->num_desc)) {
888 PRINT(KERN_ERR, ohci->id,
889 "buffer %d out of range",v.buffer);
890 return -EFAULT;
891 }
892
893 switch(d->buffer_status[v.buffer]) {
894 case VIDEO1394_BUFFER_READY:
895 d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
896 return 0;
897 case VIDEO1394_BUFFER_QUEUED:
898 #if 1
899 while(d->buffer_status[v.buffer]!=
900 VIDEO1394_BUFFER_READY) {
901 interruptible_sleep_on(&d->waitq);
902 if(signal_pending(current)) return -EINTR;
903 }
904 #else
905 if (wait_event_interruptible(d->waitq,
906 d->buffer_status[v.buffer]
907 == VIDEO1394_BUFFER_READY)
908 == -ERESTARTSYS)
909 return -EINTR;
910 #endif
911 d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
912 return 0;
913 default:
914 PRINT(KERN_ERR, ohci->id,
915 "buffer %d is not queued",v.buffer);
916 return -EFAULT;
917 }
918 }
919 case VIDEO1394_TALK_QUEUE_BUFFER:
920 {
921 struct video1394_wait v;
922 struct dma_iso_ctx *d;
923 int i;
924
925 if(copy_from_user(&v, (void *)arg, sizeof(v)))
926 return -EFAULT;
927
928 i = it_ctx_talking(video, v.channel);
929 if (i<0) return -EFAULT;
930 d = video->it_context[i];
931
932 if ((v.buffer<0) || (v.buffer>d->num_desc)) {
933 PRINT(KERN_ERR, ohci->id,
934 "buffer %d out of range",v.buffer);
935 return -EFAULT;
936 }
937
938 if (d->buffer_status[v.buffer]!=VIDEO1394_BUFFER_FREE) {
939 PRINT(KERN_ERR, ohci->id,
940 "buffer %d is already used",v.buffer);
941 return -EFAULT;
942 }
943
944 d->buffer_status[v.buffer]=VIDEO1394_BUFFER_QUEUED;
945
946 if (d->last_buffer>=0) {
947 d->it_prg[d->last_buffer]
948 [d->nb_cmd-1].end.branchAddress =
949 (virt_to_bus(&(d->it_prg[v.buffer][0].begin.control))
950 & 0xfffffff0) | 0x3;
951
952 d->it_prg[d->last_buffer]
953 [d->nb_cmd-1].begin.branchAddress =
954 (virt_to_bus(&(d->it_prg[v.buffer][0].begin.control))
955 & 0xfffffff0) | 0x3;
956 }
957 d->last_buffer = v.buffer;
958
959 d->it_prg[d->last_buffer][d->nb_cmd-1].end.branchAddress = 0;
960
961 if (!(reg_read(ohci, d->ctrlSet) & 0x8000))
962 {
963 DBGMSG(ohci->id, "Starting iso transmit DMA ctx=%d",
964 d->ctx);
965
966 /* Tell the controller where the first program is */
967 reg_write(ohci, d->cmdPtr,
968 virt_to_bus(&(d->it_prg[v.buffer][0]))|0x3);
969
970 /* Run IT context */
971 reg_write(ohci, d->ctrlSet, 0x8000);
972 }
973 else {
974 /* Wake up dma context if necessary */
975 if (!(reg_read(ohci, d->ctrlSet) & 0x400)) {
976 PRINT(KERN_INFO, ohci->id,
977 "Waking up iso transmit dma ctx=%d",
978 d->ctx);
979 reg_write(ohci, d->ctrlSet, 0x1000);
980 }
981 }
982 return 0;
983
984 }
985 case VIDEO1394_TALK_WAIT_BUFFER:
986 {
987 struct video1394_wait v;
988 struct dma_iso_ctx *d;
989 int i;
990
991 if(copy_from_user(&v, (void *)arg, sizeof(v)))
992 return -EFAULT;
993
994 i = it_ctx_talking(video, v.channel);
995 if (i<0) return -EFAULT;
996 d = video->it_context[i];
997
998 if ((v.buffer<0) || (v.buffer>d->num_desc)) {
999 PRINT(KERN_ERR, ohci->id,
1000 "buffer %d out of range",v.buffer);
1001 return -EFAULT;
1002 }
1003
1004 switch(d->buffer_status[v.buffer]) {
1005 case VIDEO1394_BUFFER_READY:
1006 d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
1007 return 0;
1008 case VIDEO1394_BUFFER_QUEUED:
1009 #if 1
1010 while(d->buffer_status[v.buffer]!=
1011 VIDEO1394_BUFFER_READY) {
1012 interruptible_sleep_on(&d->waitq);
1013 if(signal_pending(current)) return -EINTR;
1014 }
1015 #else
1016 if (wait_event_interruptible(d->waitq,
1017 d->buffer_status[v.buffer]
1018 == VIDEO1394_BUFFER_READY)
1019 == -ERESTARTSYS)
1020 return -EINTR;
1021 #endif
1022 d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
1023 return 0;
1024 default:
1025 PRINT(KERN_ERR, ohci->id,
1026 "buffer %d is not queued",v.buffer);
1027 return -EFAULT;
1028 }
1029 }
1030 default:
1031 return -EINVAL;
1032 }
1033 }
1034
1035 /*
1036 * This maps the vmalloced and reserved buffer to user space.
1037 *
1038 * FIXME:
1039 * - PAGE_READONLY should suffice!?
1040 * - remap_page_range is kind of inefficient for page by page remapping.
1041 * But e.g. pte_alloc() does not work in modules ... :-(
1042 */
1043
1044 int video1394_mmap(struct file *file, struct vm_area_struct *vma)
1045 {
1046 struct video_card *video =
1047 &video_cards[MINOR(file->f_dentry->d_inode->i_rdev)];
1048 struct ti_ohci *ohci;
1049 int res = -EINVAL;
1050
1051 lock_kernel();
1052 ohci = video->ohci;
1053 PRINT(KERN_INFO, ohci->id, "mmap");
1054 if (video->current_ctx == NULL) {
1055 PRINT(KERN_ERR, ohci->id, "current iso context not set");
1056 } else
1057 res = do_iso_mmap(ohci, video->current_ctx,
1058 (char *)vma->vm_start,
1059 (unsigned long)(vma->vm_end-vma->vm_start));
1060 unlock_kernel();
1061 return res;
1062 }
1063
1064 static int video1394_open(struct inode *inode, struct file *file)
1065 {
1066 int i = MINOR(inode->i_rdev);
1067
1068 if (i<0 || i>=num_of_video_cards) {
1069 PRINT(KERN_ERR, i, "ohci card %d not found", i);
1070 return -EIO;
1071 }
1072
1073 V22_COMPAT_MOD_INC_USE_COUNT;
1074
1075 PRINT(KERN_INFO, i, "open");
1076
1077 return 0;
1078 }
1079
1080 static int video1394_release(struct inode *inode, struct file *file)
1081 {
1082 struct video_card *video = &video_cards[MINOR(inode->i_rdev)];
1083 struct ti_ohci *ohci= video->ohci;
1084 int i;
1085
1086 lock_kernel();
1087 for (i=0;i<ohci->nb_iso_rcv_ctx-1;i++)
1088 if (video->ir_context[i]) {
1089 if (!test_and_clear_bit(
1090 video->ir_context[i]->channel,
1091 &ohci->IR_channel_usage)) {
1092 PRINT(KERN_ERR, ohci->id,
1093 "channel %d is not being used",
1094 video->ir_context[i]->channel);
1095 }
1096 PRINT(KERN_INFO, ohci->id,
1097 "iso receive context %d stop listening "
1098 "on channel %d", i+1,
1099 video->ir_context[i]->channel);
1100 free_dma_iso_ctx(&video->ir_context[i]);
1101 }
1102
1103 for (i=0;i<ohci->nb_iso_xmit_ctx;i++)
1104 if (video->it_context[i]) {
1105 if (!test_and_clear_bit(
1106 video->it_context[i]->channel,
1107 &ohci->IR_channel_usage)) {
1108 PRINT(KERN_ERR, ohci->id,
1109 "channel %d is not being used",
1110 video->it_context[i]->channel);
1111 }
1112 PRINT(KERN_INFO, ohci->id,
1113 "iso transmit context %d stop talking "
1114 "on channel %d", i+1,
1115 video->it_context[i]->channel);
1116 free_dma_iso_ctx(&video->it_context[i]);
1117 }
1118
1119
1120 V22_COMPAT_MOD_DEC_USE_COUNT;
1121
1122 PRINT(KERN_INFO, ohci->id, "release");
1123 unlock_kernel();
1124 return 0;
1125 }
1126
1127 void irq_handler(int card, quadlet_t isoRecvIntEvent,
1128 quadlet_t isoXmitIntEvent)
1129 {
1130 int i;
1131 struct video_card *video = &video_cards[card];
1132
1133 DBGMSG(card, "Iso event Recv: %08x Xmit: %08x",
1134 isoRecvIntEvent, isoXmitIntEvent);
1135
1136 for (i=0;i<video->ohci->nb_iso_rcv_ctx-1;i++)
1137 if (isoRecvIntEvent & (1<<(i+1)))
1138 wakeup_dma_ir_ctx(video->ohci,
1139 video->ir_context[i]);
1140
1141 for (i=0;i<video->ohci->nb_iso_xmit_ctx;i++)
1142 if (isoXmitIntEvent & (1<<i))
1143 wakeup_dma_it_ctx(video->ohci,
1144 video->it_context[i]);
1145 }
1146
1147 static struct file_operations video1394_fops=
1148 {
1149 OWNER_THIS_MODULE
1150 ioctl: video1394_ioctl,
1151 mmap: video1394_mmap,
1152 open: video1394_open,
1153 release: video1394_release
1154 };
1155
1156 static int video1394_init(int i, struct ti_ohci *ohci)
1157 {
1158 struct video_card *video = &video_cards[i];
1159
1160 if (ohci1394_register_video(ohci, &video_tmpl)<0) {
1161 PRINT(KERN_ERR, i, "register_video failed");
1162 return -1;
1163 }
1164
1165 video->ohci = ohci;
1166
1167 /* Iso receive dma contexts */
1168 video->ir_context = (struct dma_iso_ctx **)
1169 kmalloc((ohci->nb_iso_rcv_ctx-1)*
1170 sizeof(struct dma_iso_ctx *), GFP_KERNEL);
1171 if (video->ir_context)
1172 memset(video->ir_context, 0,
1173 (ohci->nb_iso_rcv_ctx-1)*sizeof(struct dma_iso_ctx *));
1174 else {
1175 PRINT(KERN_ERR, ohci->id, "Cannot allocate ir_context");
1176 return -1;
1177 }
1178
1179 /* Iso transmit dma contexts */
1180 video->it_context = (struct dma_iso_ctx **)
1181 kmalloc(ohci->nb_iso_xmit_ctx *
1182 sizeof(struct dma_iso_ctx *), GFP_KERNEL);
1183 if (video->it_context)
1184 memset(video->it_context, 0,
1185 ohci->nb_iso_xmit_ctx * sizeof(struct dma_iso_ctx *));
1186 else {
1187 PRINT(KERN_ERR, ohci->id, "Cannot allocate it_context");
1188 return -1;
1189 }
1190
1191 return 0;
1192 }
1193
1194 static void remove_card(struct video_card *video)
1195 {
1196 int i;
1197
1198 ohci1394_unregister_video(video->ohci, &video_tmpl);
1199
1200 /* Free the iso receive contexts */
1201 if (video->ir_context) {
1202 for (i=0;i<video->ohci->nb_iso_rcv_ctx-1;i++) {
1203 free_dma_iso_ctx(&video->ir_context[i]);
1204 }
1205 kfree(video->ir_context);
1206 }
1207
1208 /* Free the iso transmit contexts */
1209 if (video->it_context) {
1210 for (i=0;i<video->ohci->nb_iso_xmit_ctx;i++) {
1211 free_dma_iso_ctx(&video->it_context[i]);
1212 }
1213 kfree(video->it_context);
1214 }
1215 }
1216
1217 #ifdef MODULE
1218
1219 /* EXPORT_NO_SYMBOLS; */
1220
1221 MODULE_AUTHOR("Sebastien Rougeaux <sebastien.rougeaux@anu.edu.au>");
1222 MODULE_DESCRIPTION("driver for digital video on OHCI board");
1223 MODULE_SUPPORTED_DEVICE("video1394");
1224
1225 void cleanup_module(void)
1226 {
1227 int i;
1228 unregister_chrdev(VIDEO1394_MAJOR, VIDEO1394_DRIVER_NAME);
1229
1230 for (i=0; i<num_of_video_cards; i++)
1231 remove_card(&video_cards[i]);
1232
1233 printk(KERN_INFO "removed " VIDEO1394_DRIVER_NAME " module\n");
1234 }
1235
1236 int init_module(void)
1237 {
1238 struct ti_ohci *ohci;
1239 int i;
1240
1241 memset(video_cards, 0, MAX_OHCI1394_CARDS * sizeof(struct video_card));
1242 num_of_video_cards = 0;
1243
1244 for (i=0; i<MAX_OHCI1394_CARDS; i++) {
1245 ohci=ohci1394_get_struct(i);
1246 if (ohci) {
1247 num_of_video_cards++;
1248 video1394_init(i, ohci);
1249 }
1250 }
1251
1252 if (!num_of_video_cards) {
1253 PRINT_G(KERN_INFO, "no ohci card found... init failed");
1254 return -EIO;
1255 }
1256
1257 if (register_chrdev(VIDEO1394_MAJOR, VIDEO1394_DRIVER_NAME,
1258 &video1394_fops)) {
1259 printk("video1394: unable to get major %d\n",
1260 VIDEO1394_MAJOR);
1261 return -EIO;
1262 }
1263
1264 PRINT_G(KERN_INFO, "initialized with %d ohci cards",
1265 num_of_video_cards);
1266
1267 return 0;
1268 }
1269
1270 #endif /* MODULE */
1271
1272
Mirror of the linux-mips.org kernel tree