开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 嵌入式/单片机编程 > 嵌入式Linux > 查看源码
video1394.c
资源名称：SBC-2410X_kernel.tar.gz　[点击查看]
上传用户：lgb322
上传日期：2013-02-24
资源大小：30529k
文件大小：44k
源码类别：

嵌入式Linux

开发平台：

Unix_Linux

video1394.c：源码内容
  1. /*
  2.  * video1394.c - video driver for OHCI 1394 boards
  3.  * Copyright (C)1999,2000 Sebastien Rougeaux <sebastien.rougeaux@anu.edu.au>
  4.  *                        Peter Schlaile <udbz@rz.uni-karlsruhe.de>
  5.  *
  6.  * This program is free software; you can redistribute it and/or modify
  7.  * it under the terms of the GNU General Public License as published by
  8.  * the Free Software Foundation; either version 2 of the License, or
  9.  * (at your option) any later version.
  10.  *
  11.  * This program is distributed in the hope that it will be useful,
  12.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.  * GNU General Public License for more details.
  15.  *
  16.  * You should have received a copy of the GNU General Public License
  17.  * along with this program; if not, write to the Free Software Foundation,
  18.  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  19.  */
  21. #include <linux/config.h>
  22. #include <linux/kernel.h>
  23. #include <linux/list.h>
  24. #include <linux/slab.h>
  25. #include <linux/interrupt.h>
  26. #include <linux/wait.h>
  27. #include <linux/errno.h>
  28. #include <linux/module.h>
  29. #include <linux/init.h>
  30. #include <linux/pci.h>
  31. #include <linux/fs.h>
  32. #include <linux/poll.h>
  33. #include <linux/smp_lock.h>
  34. #include <asm/byteorder.h>
  35. #include <asm/atomic.h>
  36. #include <asm/io.h>
  37. #include <asm/uaccess.h>
  38. #include <linux/proc_fs.h>
  39. #include <linux/tqueue.h>
  40. #include <linux/delay.h>
  41. #include <linux/devfs_fs_kernel.h>
  43. #include <asm/pgtable.h>
  44. #include <asm/page.h>
  45. #include <linux/sched.h>
  46. #include <asm/segment.h>
  47. #include <linux/types.h>
  48. #include <linux/wrapper.h>
  49. #include <linux/vmalloc.h>
  50. #include <linux/timex.h>
  51. #include <linux/mm.h>
  53. #include "ieee1394.h"
  54. #include "ieee1394_types.h"
  55. #include "hosts.h"
  56. #include "ieee1394_core.h"
  57. #include "highlevel.h"
  58. #include "video1394.h"
  60. #include "ohci1394.h"
  62. #define VIDEO1394_MAJOR 172
  63. #define ISO_CHANNELS 64
  64. #define ISO_RECEIVE 0
  65. #define ISO_TRANSMIT 1
  67. #ifndef virt_to_page
  68. #define virt_to_page(x) MAP_NR(x)
  69. #endif
  71. #ifndef vmalloc_32
  72. #define vmalloc_32(x) vmalloc(x)
  73. #endif
  75. struct it_dma_prg {
  76. struct dma_cmd begin;
  77. quadlet_t data[4];
  78. struct dma_cmd end;
  79. quadlet_t pad[4]; /* FIXME: quick hack for memory alignment */
  80. };
  82. struct dma_iso_ctx {
  83. struct ti_ohci *ohci;
  84. int ctx;
  85. int channel;
  86. int last_buffer;
  87. int * next_buffer;  /* For ISO Transmit of video packets
  88.        to write the correct SYT field
  89.        into the next block */
  90. unsigned int num_desc;
  91. unsigned int buf_size;
  92. unsigned int frame_size;
  93. unsigned int packet_size;
  94. unsigned int left_size;
  95. unsigned int nb_cmd;
  96. unsigned char *buf;
  97.         struct dma_cmd **ir_prg;
  98. struct it_dma_prg **it_prg;
  99. unsigned int *buffer_status;
  100.         struct timeval *buffer_time; /* time when the buffer was received */
  101. unsigned int *last_used_cmd; /* For ISO Transmit with 
  102. variable sized packets only ! */
  103. int ctrlClear;
  104. int ctrlSet;
  105. int cmdPtr;
  106. int ctxMatch;
  107. wait_queue_head_t waitq;
  108. spinlock_t lock;
  109. unsigned int syt_offset;
  110. int flags;
  111. };
  113. struct video_card {
  114. struct ti_ohci *ohci;
  115. struct list_head list;
  116. int id;
  117. devfs_handle_t devfs;
  119. struct dma_iso_ctx **ir_context;
  120. struct dma_iso_ctx **it_context;
  121. struct dma_iso_ctx *current_ctx;
  122. };
  124. #ifdef CONFIG_IEEE1394_VERBOSEDEBUG
  125. #define VIDEO1394_DEBUG
  126. #endif
  128. #ifdef DBGMSG
  129. #undef DBGMSG
  130. #endif
  132. #ifdef VIDEO1394_DEBUG
  133. #define DBGMSG(card, fmt, args...) 
  134. printk(KERN_INFO "video1394_%d: " fmt "n" , card , ## args)
  135. #else
  136. #define DBGMSG(card, fmt, args...)
  137. #endif
  139. /* print general (card independent) information */
  140. #define PRINT_G(level, fmt, args...) 
  141. printk(level "video1394: " fmt "n" , ## args)
  143. /* print card specific information */
  144. #define PRINT(level, card, fmt, args...) 
  145. printk(level "video1394_%d: " fmt "n" , card , ## args)
  147. static void irq_handler(int card, quadlet_t isoRecvIntEvent, 
  148.  quadlet_t isoXmitIntEvent);
  150. static LIST_HEAD(video1394_cards);
  151. static spinlock_t video1394_cards_lock = SPIN_LOCK_UNLOCKED;
  153. static devfs_handle_t devfs_handle;
  154. static struct hpsb_highlevel *hl_handle = NULL;
  156. static struct video_template video_tmpl = { irq_handler };
  158. /* Code taken from bttv.c */
  160. /*******************************/
  161. /* Memory management functions */
  162. /*******************************/
  164. #define MDEBUG(x) do { } while(0) /* Debug memory management */
  166. /* [DaveM] I've recoded most of this so that:
  167.  * 1) It's easier to tell what is happening
  168.  * 2) It's more portable, especially for translating things
  169.  *    out of vmalloc mapped areas in the kernel.
  170.  * 3) Less unnecessary translations happen.
  171.  *
  172.  * The code used to assume that the kernel vmalloc mappings
  173.  * existed in the page tables of every process, this is simply
  174.  * not guaranteed.  We now use pgd_offset_k which is the
  175.  * defined way to get at the kernel page tables.
  176.  */
  178. /* Given PGD from the address space's page table, return the kernel
  179.  * virtual mapping of the physical memory mapped at ADR.
  180.  */
  181. static inline unsigned long uvirt_to_kva(pgd_t *pgd, unsigned long adr)
  182. {
  183.         unsigned long ret = 0UL;
  184. pmd_t *pmd;
  185. pte_t *ptep, pte;
  186.   
  187. if (!pgd_none(*pgd)) {
  188.                 pmd = pmd_offset(pgd, adr);
  189.                 if (!pmd_none(*pmd)) {
  190.                         ptep = pte_offset(pmd, adr);
  191.                         pte = *ptep;
  192.                         if(pte_present(pte)) {
  193. ret = (unsigned long) 
  194. page_address(pte_page(pte));
  195.                                 ret |= (adr & (PAGE_SIZE - 1));
  196. }
  197.                 }
  198.         }
  199.         MDEBUG(printk("uv2kva(%lx-->%lx)", adr, ret));
  200. return ret;
  201. }
  203. static inline unsigned long uvirt_to_bus(unsigned long adr) 
  204. {
  205.         unsigned long kva, ret;
  207.         kva = uvirt_to_kva(pgd_offset(current->mm, adr), adr);
  208. ret = virt_to_bus((void *)kva);
  209.         MDEBUG(printk("uv2b(%lx-->%lx)", adr, ret));
  210.         return ret;
  211. }
  213. static inline unsigned long kvirt_to_bus(unsigned long adr) 
  214. {
  215.         unsigned long va, kva, ret;
  217.         va = VMALLOC_VMADDR(adr);
  218.         kva = uvirt_to_kva(pgd_offset_k(va), va);
  219. ret = virt_to_bus((void *)kva);
  220.         MDEBUG(printk("kv2b(%lx-->%lx)", adr, ret));
  221.         return ret;
  222. }
  224. /* Here we want the physical address of the memory.
  225.  * This is used when initializing the contents of the
  226.  * area and marking the pages as reserved.
  227.  */
  228. static inline unsigned long kvirt_to_pa(unsigned long adr) 
  229. {
  230.         unsigned long va, kva, ret;
  232.         va = VMALLOC_VMADDR(adr);
  233.         kva = uvirt_to_kva(pgd_offset_k(va), va);
  234. ret = __pa(kva);
  235.         MDEBUG(printk("kv2pa(%lx-->%lx)", adr, ret));
  236.         return ret;
  237. }
  239. static void * rvmalloc(unsigned long size)
  240. {
  241. void * mem;
  242. unsigned long adr, page;
  243.         
  244. mem=vmalloc_32(size);
  245. if (mem) 
  246. {
  247. memset(mem, 0, size); /* Clear the ram out, 
  248.  no junk to the user */
  249.         adr=(unsigned long) mem;
  250. while (size > 0) 
  251.                 {
  252.                 page = kvirt_to_pa(adr);
  253. mem_map_reserve(virt_to_page(__va(page)));
  254. adr+=PAGE_SIZE;
  255. size-=PAGE_SIZE;
  256. }
  257. }
  258. return mem;
  259. }
  261. static void rvfree(void * mem, unsigned long size)
  262. {
  263.         unsigned long adr, page;
  264.         
  265. if (mem) 
  266. {
  267.         adr=(unsigned long) mem;
  268. while (size > 0) 
  269.                 {
  270.                 page = kvirt_to_pa(adr);
  271. mem_map_unreserve(virt_to_page(__va(page)));
  272. adr+=PAGE_SIZE;
  273. size-=PAGE_SIZE;
  274. }
  275. vfree(mem);
  276. }
  277. }
  278. /* End of code taken from bttv.c */
  280. static int free_dma_iso_ctx(struct dma_iso_ctx **d)
  281. {
  282. int i;
  283. struct ti_ohci *ohci;
  285. if ((*d)==NULL) return -1;
  287. ohci = (struct ti_ohci *)(*d)->ohci;
  289. DBGMSG(ohci->id, "Freeing dma_iso_ctx %d", (*d)->ctx);
  291. ohci1394_stop_context(ohci, (*d)->ctrlClear, NULL);
  293. if ((*d)->buf) rvfree((void *)(*d)->buf, 
  294.       (*d)->num_desc * (*d)->buf_size);
  296. if ((*d)->ir_prg) {
  297. for (i=0;i<(*d)->num_desc;i++) 
  298. if ((*d)->ir_prg[i]) kfree((*d)->ir_prg[i]);
  299. kfree((*d)->ir_prg);
  300. }
  302. if ((*d)->it_prg) {
  303. for (i=0;i<(*d)->num_desc;i++) 
  304. if ((*d)->it_prg[i]) kfree((*d)->it_prg[i]);
  305. kfree((*d)->it_prg);
  306. }
  308. if ((*d)->buffer_status)
  309. kfree((*d)->buffer_status);
  310. if ((*d)->buffer_time)
  311. kfree((*d)->buffer_time);
  312. if ((*d)->last_used_cmd)
  313. kfree((*d)->last_used_cmd);
  314. if ((*d)->next_buffer)
  315. kfree((*d)->next_buffer);
  317. kfree(*d);
  318. *d = NULL;
  320. return 0;
  321. }
  323. static struct dma_iso_ctx *
  324. alloc_dma_iso_ctx(struct ti_ohci *ohci, int type, int ctx, int num_desc,
  325.   int buf_size, int channel, unsigned int packet_size)
  326. {
  327. struct dma_iso_ctx *d=NULL;
  328. int i;
  330. d = (struct dma_iso_ctx *)kmalloc(sizeof(struct dma_iso_ctx), 
  331.   GFP_KERNEL);
  332. if (d==NULL) {
  333. PRINT(KERN_ERR, ohci->id, "Failed to allocate dma_iso_ctx");
  334. return NULL;
  335. }
  337. memset(d, 0, sizeof(struct dma_iso_ctx));
  339. d->ohci = (void *)ohci;
  340. d->ctx = ctx;
  341. d->channel = channel;
  342. d->num_desc = num_desc;
  343. d->frame_size = buf_size;
  344. if (buf_size%PAGE_SIZE) 
  345. d->buf_size = buf_size + PAGE_SIZE - (buf_size%PAGE_SIZE);
  346. else
  347. d->buf_size = buf_size;
  348. d->last_buffer = -1;
  349. d->buf = NULL;
  350. d->ir_prg = NULL;
  351. init_waitqueue_head(&d->waitq);
  353. d->buf = rvmalloc(d->num_desc * d->buf_size);
  355. if (d->buf == NULL) {
  356. PRINT(KERN_ERR, ohci->id, "Failed to allocate dma buffer");
  357. free_dma_iso_ctx(&d);
  358. return NULL;
  359. }
  360. memset(d->buf, 0, d->num_desc * d->buf_size);
  362. if (type == ISO_RECEIVE) {
  363. d->ctrlSet = OHCI1394_IsoRcvContextControlSet+32*d->ctx;
  364. d->ctrlClear = OHCI1394_IsoRcvContextControlClear+32*d->ctx;
  365. d->cmdPtr = OHCI1394_IsoRcvCommandPtr+32*d->ctx;
  366. d->ctxMatch = OHCI1394_IsoRcvContextMatch+32*d->ctx;
  368. d->ir_prg = kmalloc(d->num_desc * sizeof(struct dma_cmd *), 
  369.     GFP_KERNEL);
  371. if (d->ir_prg == NULL) {
  372. PRINT(KERN_ERR, ohci->id, 
  373.       "Failed to allocate dma ir prg");
  374. free_dma_iso_ctx(&d);
  375. return NULL;
  376. }
  377. memset(d->ir_prg, 0, d->num_desc * sizeof(struct dma_cmd *));
  379. d->nb_cmd = d->buf_size / PAGE_SIZE + 1;
  380. d->left_size = (d->frame_size % PAGE_SIZE) ?
  381. d->frame_size % PAGE_SIZE : PAGE_SIZE;
  383. for (i=0;i<d->num_desc;i++) {
  384. d->ir_prg[i] = kmalloc(d->nb_cmd * 
  385.        sizeof(struct dma_cmd), 
  386.        GFP_KERNEL);
  387. if (d->ir_prg[i] == NULL) {
  388. PRINT(KERN_ERR, ohci->id, 
  389.       "Failed to allocate dma ir prg");
  390. free_dma_iso_ctx(&d);
  391. return NULL;
  392. }
  393. }
  394. }
  395. else {  /* ISO_TRANSMIT */
  396. d->ctrlSet = OHCI1394_IsoXmitContextControlSet+16*d->ctx;
  397. d->ctrlClear = OHCI1394_IsoXmitContextControlClear+16*d->ctx;
  398. d->cmdPtr = OHCI1394_IsoXmitCommandPtr+16*d->ctx;
  400. d->it_prg = kmalloc(d->num_desc * sizeof(struct it_dma_prg *), 
  401.     GFP_KERNEL);
  403. if (d->it_prg == NULL) {
  404. PRINT(KERN_ERR, ohci->id, 
  405.       "Failed to allocate dma it prg");
  406. free_dma_iso_ctx(&d);
  407. return NULL;
  408. }
  409. memset(d->it_prg, 0, d->num_desc*sizeof(struct it_dma_prg *));
  411. d->packet_size = packet_size;
  413. if (PAGE_SIZE % packet_size || packet_size>4096) {
  414. PRINT(KERN_ERR, ohci->id, 
  415.       "Packet size %d (page_size: %ld) "
  416.       "not yet supportedn",
  417.       packet_size, PAGE_SIZE);
  418. free_dma_iso_ctx(&d);
  419. return NULL;
  420. }
  422. d->nb_cmd = d->frame_size / d->packet_size;
  423. if (d->frame_size % d->packet_size) {
  424. d->nb_cmd++;
  425. d->left_size = d->frame_size % d->packet_size;
  426. }
  427. else
  428. d->left_size = d->packet_size;
  430. for (i=0;i<d->num_desc;i++) {
  431. d->it_prg[i] = kmalloc(d->nb_cmd * 
  432.        sizeof(struct it_dma_prg), 
  433.        GFP_KERNEL);
  434. if (d->it_prg[i] == NULL) {
  435. PRINT(KERN_ERR, ohci->id, 
  436.       "Failed to allocate dma it prg");
  437. free_dma_iso_ctx(&d);
  438. return NULL;
  439. }
  440. }
  441. }
  443. d->buffer_status = kmalloc(d->num_desc * sizeof(unsigned int),
  444.    GFP_KERNEL);
  445. d->buffer_time = kmalloc(d->num_desc * sizeof(struct timeval),
  446.    GFP_KERNEL);
  447. d->last_used_cmd = kmalloc(d->num_desc * sizeof(unsigned int),
  448.    GFP_KERNEL);
  449. d->next_buffer = kmalloc(d->num_desc * sizeof(int),
  450.  GFP_KERNEL);
  452. if (d->buffer_status == NULL) {
  453. PRINT(KERN_ERR, ohci->id, "Failed to allocate buffer_status");
  454. free_dma_iso_ctx(&d);
  455. return NULL;
  456. }
  457. if (d->buffer_time == NULL) {
  458. PRINT(KERN_ERR, ohci->id, "Failed to allocate buffer_time");
  459. free_dma_iso_ctx(&d);
  460. return NULL;
  461. }
  462. if (d->last_used_cmd == NULL) {
  463. PRINT(KERN_ERR, ohci->id, "Failed to allocate last_used_cmd");
  464. free_dma_iso_ctx(&d);
  465. return NULL;
  466. }
  467. if (d->next_buffer == NULL) {
  468. PRINT(KERN_ERR, ohci->id, "Failed to allocate next_buffer");
  469. free_dma_iso_ctx(&d);
  470. return NULL;
  471. }
  472. memset(d->buffer_status, 0, d->num_desc * sizeof(unsigned int));
  473. memset(d->buffer_time, 0, d->num_desc * sizeof(struct timeval));
  474. memset(d->last_used_cmd, 0, d->num_desc * sizeof(unsigned int));
  475. memset(d->next_buffer, -1, d->num_desc * sizeof(int));
  477.         spin_lock_init(&d->lock);
  479. PRINT(KERN_INFO, ohci->id, "Iso %s DMA: %d buffers "
  480.       "of size %d allocated for a frame size %d, each with %d prgs",
  481.       (type==ISO_RECEIVE) ? "receive" : "transmit",
  482.       d->num_desc, d->buf_size, d->frame_size, d->nb_cmd);
  484. return d;
  485. }
  487. static void reset_ir_status(struct dma_iso_ctx *d, int n)
  488. {
  489. int i;
  490. d->ir_prg[n][0].status = 4;
  491. d->ir_prg[n][1].status = PAGE_SIZE-4;
  492. for (i=2;i<d->nb_cmd-1;i++)
  493. d->ir_prg[n][i].status = PAGE_SIZE;
  494. d->ir_prg[n][i].status = d->left_size;
  495. }
  497. static void initialize_dma_ir_prg(struct dma_iso_ctx *d, int n, int flags)
  498. {
  499. struct dma_cmd *ir_prg = d->ir_prg[n];
  500. unsigned long buf = (unsigned long)d->buf+n*d->buf_size;
  501. int i;
  503. /* the first descriptor will read only 4 bytes */
  504. ir_prg[0].control = DMA_CTL_INPUT_MORE | DMA_CTL_UPDATE |
  505. DMA_CTL_BRANCH | 4;
  507. /* set the sync flag */
  508. if (flags & VIDEO1394_SYNC_FRAMES)
  509. ir_prg[0].control |= DMA_CTL_WAIT;
  511. ir_prg[0].address = kvirt_to_bus(buf);
  512. ir_prg[0].branchAddress =  (virt_to_bus(&(ir_prg[1].control)) 
  513.     & 0xfffffff0) | 0x1;
  515. /* the second descriptor will read PAGE_SIZE-4 bytes */
  516. ir_prg[1].control = DMA_CTL_INPUT_MORE | DMA_CTL_UPDATE |
  517. DMA_CTL_BRANCH | (PAGE_SIZE-4);
  518. ir_prg[1].address = kvirt_to_bus(buf+4);
  519. ir_prg[1].branchAddress =  (virt_to_bus(&(ir_prg[2].control)) 
  520.     & 0xfffffff0) | 0x1;
  522. for (i=2;i<d->nb_cmd-1;i++) {
  523. ir_prg[i].control = DMA_CTL_INPUT_MORE | DMA_CTL_UPDATE | 
  524. DMA_CTL_BRANCH | PAGE_SIZE;
  525. ir_prg[i].address = kvirt_to_bus(buf+(i-1)*PAGE_SIZE);
  527. ir_prg[i].branchAddress =  
  528. (virt_to_bus(&(ir_prg[i+1].control)) 
  529.  & 0xfffffff0) | 0x1;
  530. }
  532. /* the last descriptor will generate an interrupt */
  533. ir_prg[i].control = DMA_CTL_INPUT_MORE | DMA_CTL_UPDATE | 
  534. DMA_CTL_IRQ | DMA_CTL_BRANCH | d->left_size;
  535. ir_prg[i].address = kvirt_to_bus(buf+(i-1)*PAGE_SIZE);
  536. }
  538. static void initialize_dma_ir_ctx(struct dma_iso_ctx *d, int tag, int flags)
  539. {
  540. struct ti_ohci *ohci = (struct ti_ohci *)d->ohci;
  541. int i;
  543. d->flags = flags;
  545. ohci1394_stop_context(ohci, d->ctrlClear, NULL);
  547. for (i=0;i<d->num_desc;i++) {
  548. initialize_dma_ir_prg(d, i, flags);
  549. reset_ir_status(d, i);
  550. }
  552. /* reset the ctrl register */
  553. reg_write(ohci, d->ctrlClear, 0xf0000000);
  555. /* Set bufferFill */
  556. reg_write(ohci, d->ctrlSet, 0x80000000);
  558. /* Set isoch header */
  559. if (flags & VIDEO1394_INCLUDE_ISO_HEADERS) 
  560. reg_write(ohci, d->ctrlSet, 0x40000000);
  562. /* Set the context match register to match on all tags, 
  563.    sync for sync tag, and listen to d->channel */
  564. reg_write(ohci, d->ctxMatch, 0xf0000000|((tag&0xf)<<8)|d->channel);
  566. /* Set up isoRecvIntMask to generate interrupts */
  567. reg_write(ohci, OHCI1394_IsoRecvIntMaskSet, 1<<d->ctx);
  568. }
  570. /* find which context is listening to this channel */
  571. int ir_ctx_listening(struct video_card *video, int channel)
  572. {
  573. int i;
  574. struct ti_ohci *ohci = video->ohci;
  576. for (i=0;i<ohci->nb_iso_rcv_ctx-1;i++) 
  577. if (video->ir_context[i]) {
  578. if (video->ir_context[i]->channel==channel)
  579. return i;
  580. }
  582. PRINT(KERN_ERR, ohci->id, "No iso context is listening to channel %d",
  583.       channel);
  585. return -1;
  586. }
  588. int it_ctx_talking(struct video_card *video, int channel)
  589. {
  590. int i;
  591. struct ti_ohci *ohci = video->ohci;
  593. for (i=0;i<ohci->nb_iso_xmit_ctx;i++) 
  594. if (video->it_context[i]) {
  595. if (video->it_context[i]->channel==channel)
  596. return i;
  597. }
  599. PRINT(KERN_ERR, ohci->id, "No iso context is talking to channel %d",
  600.       channel);
  602. return -1;
  603. }
  605. int wakeup_dma_ir_ctx(struct ti_ohci *ohci, struct dma_iso_ctx *d) 
  606. {
  607. int i;
  609. if (d==NULL) {
  610. PRINT(KERN_ERR, ohci->id, "Iso receive event received but "
  611.       "context not allocated");
  612. return -EFAULT;
  613. }
  615. spin_lock(&d->lock);
  616. for (i=0;i<d->num_desc;i++) {
  617. if (d->ir_prg[i][d->nb_cmd-1].status & 0xFFFF0000) {
  618. reset_ir_status(d, i);
  619. d->buffer_status[i] = VIDEO1394_BUFFER_READY;
  620. do_gettimeofday(&d->buffer_time[i]);
  621. }
  622. }
  623. spin_unlock(&d->lock);
  624. if (waitqueue_active(&d->waitq)) wake_up_interruptible(&d->waitq);
  625. return 0;
  626. }
  628. static inline void put_timestamp(struct ti_ohci *ohci, struct dma_iso_ctx * d,
  629.  int n)
  630. {
  631. unsigned char* buf = d->buf + n * d->buf_size;
  632. u32 cycleTimer;
  633. u32 timeStamp;
  635. if (n == -1) {
  636.   return;
  637. }
  639. cycleTimer = reg_read(ohci, OHCI1394_IsochronousCycleTimer);
  641. timeStamp = ((cycleTimer & 0x0fff) + d->syt_offset); /* 11059 = 450 us */
  642. timeStamp = (timeStamp % 3072 + ((timeStamp / 3072) << 12)
  643. + (cycleTimer & 0xf000)) & 0xffff;
  645. buf[6] = timeStamp >> 8; 
  646. buf[7] = timeStamp & 0xff; 
  648.     /* if first packet is empty packet, then put timestamp into the next full one too */
  649.     if ( (d->it_prg[n][0].data[1] >>16) == 0x008) {
  650.         buf += d->packet_size;
  651.      buf[6] = timeStamp >> 8;
  652.     buf[7] = timeStamp & 0xff;
  653. }
  655.     /* do the next buffer frame too in case of irq latency */
  656. n = d->next_buffer[n];
  657. if (n == -1) {
  658.   return;
  659. }
  660. buf = d->buf + n * d->buf_size;
  662. timeStamp += (d->last_used_cmd[n] << 12) & 0xffff;
  664. buf[6] = timeStamp >> 8;
  665. buf[7] = timeStamp & 0xff;
  667.     /* if first packet is empty packet, then put timestamp into the next full one too */
  668.     if ( (d->it_prg[n][0].data[1] >>16) == 0x008) {
  669.         buf += d->packet_size;
  670.      buf[6] = timeStamp >> 8;
  671.     buf[7] = timeStamp & 0xff;
  672. }
  674. #if 0
  675. printk("curr: %d, next: %d, cycleTimer: %08x timeStamp: %08xn",
  676.        curr, n, cycleTimer, timeStamp);
  677. #endif
  678. }
  680. int wakeup_dma_it_ctx(struct ti_ohci *ohci, struct dma_iso_ctx *d) 
  681. {
  682. int i;
  684. if (d==NULL) {
  685. PRINT(KERN_ERR, ohci->id, "Iso transmit event received but "
  686.       "context not allocated");
  687. return -EFAULT;
  688. }
  690. spin_lock(&d->lock);
  691. for (i=0;i<d->num_desc;i++) {
  692. if (d->it_prg[i][d->last_used_cmd[i]].end.status& 0xFFFF0000) {
  693. int next = d->next_buffer[i];
  694. put_timestamp(ohci, d, next);
  695. d->it_prg[i][d->last_used_cmd[i]].end.status = 0;
  696. d->buffer_status[i] = VIDEO1394_BUFFER_READY;
  697. }
  698. }
  699. spin_unlock(&d->lock);
  700. if (waitqueue_active(&d->waitq)) wake_up_interruptible(&d->waitq);
  701. return 0;
  702. }
  704. static void initialize_dma_it_prg(struct dma_iso_ctx *d, int n, int sync_tag)
  705. {
  706. struct it_dma_prg *it_prg = d->it_prg[n];
  707. unsigned long buf = (unsigned long)d->buf+n*d->buf_size;
  708. int i;
  709. d->last_used_cmd[n] = d->nb_cmd - 1;
  710. for (i=0;i<d->nb_cmd;i++) {
  711.  
  712. it_prg[i].begin.control = DMA_CTL_OUTPUT_MORE |
  713. DMA_CTL_IMMEDIATE | 8 ;
  714. it_prg[i].begin.address = 0;
  716. it_prg[i].begin.status = 0;
  718. it_prg[i].data[0] = 
  719. (SPEED_100 << 16) 
  720. | (/* tag */ 1 << 14)
  721. | (d->channel << 8) 
  722. | (TCODE_ISO_DATA << 4);
  723. if (i==0) it_prg[i].data[0] |= sync_tag;
  724. it_prg[i].data[1] = d->packet_size << 16;
  725. it_prg[i].data[2] = 0;
  726. it_prg[i].data[3] = 0;
  728. it_prg[i].end.control = DMA_CTL_OUTPUT_LAST | DMA_CTL_BRANCH;
  729. it_prg[i].end.address =
  730. kvirt_to_bus(buf+i*d->packet_size);
  732. if (i<d->nb_cmd-1) {
  733. it_prg[i].end.control |= d->packet_size;
  734. it_prg[i].begin.branchAddress = 
  735. (virt_to_bus(&(it_prg[i+1].begin.control)) 
  736.  & 0xfffffff0) | 0x3;
  737. it_prg[i].end.branchAddress = 
  738. (virt_to_bus(&(it_prg[i+1].begin.control)) 
  739.  & 0xfffffff0) | 0x3;
  740. }
  741. else {
  742. /* the last prg generates an interrupt */
  743. it_prg[i].end.control |= DMA_CTL_UPDATE | 
  744. DMA_CTL_IRQ | d->left_size;
  745. /* the last prg doesn't branch */
  746. it_prg[i].begin.branchAddress = 0;
  747. it_prg[i].end.branchAddress = 0;
  748. }
  749. it_prg[i].end.status = 0;
  751. #if 0
  752. printk("%d:%d: %08x-%08x ctrl %08x brch %08x d0 %08x d1 %08xn",n,i,
  753.        virt_to_bus(&(it_prg[i].begin.control)),
  754.        virt_to_bus(&(it_prg[i].end.control)),
  755.        it_prg[i].end.control,
  756.        it_prg[i].end.branchAddress,
  757.        it_prg[i].data[0], it_prg[i].data[1]);
  758. #endif
  759. }
  760. }
  762. static void initialize_dma_it_prg_var_packet_queue(
  763. struct dma_iso_ctx *d, int n, unsigned int * packet_sizes,
  764. struct ti_ohci *ohci)
  765. {
  766. struct it_dma_prg *it_prg = d->it_prg[n];
  767. int i;
  769. #if 0
  770. if (n != -1) {
  771. put_timestamp(ohci, d, n);
  772. }
  773. #endif
  774. d->last_used_cmd[n] = d->nb_cmd - 1;
  776. for (i = 0; i < d->nb_cmd; i++) {
  777. unsigned int size;
  778. if (packet_sizes[i] > d->packet_size) {
  779. size = d->packet_size;
  780. } else {
  781. size = packet_sizes[i];
  782. }
  783. it_prg[i].data[1] = size << 16; 
  784. it_prg[i].end.control = DMA_CTL_OUTPUT_LAST | DMA_CTL_BRANCH;
  786. if (i < d->nb_cmd-1 && packet_sizes[i+1] != 0) {
  787. it_prg[i].end.control |= size;
  788. it_prg[i].begin.branchAddress = 
  789. (virt_to_bus(&(it_prg[i+1].begin.control)) 
  790.  & 0xfffffff0) | 0x3;
  791. it_prg[i].end.branchAddress = 
  792. (virt_to_bus(&(it_prg[i+1].begin.control)) 
  793.  & 0xfffffff0) | 0x3;
  794. } else {
  795. /* the last prg generates an interrupt */
  796. it_prg[i].end.control |= DMA_CTL_UPDATE | 
  797. DMA_CTL_IRQ | size;
  798. /* the last prg doesn't branch */
  799. it_prg[i].begin.branchAddress = 0;
  800. it_prg[i].end.branchAddress = 0;
  801. d->last_used_cmd[n] = i;
  802. break;
  803. }
  804. }
  805. }
  807. static void initialize_dma_it_ctx(struct dma_iso_ctx *d, int sync_tag,
  808.   unsigned int syt_offset, int flags)
  809. {
  810. struct ti_ohci *ohci = (struct ti_ohci *)d->ohci;
  811. int i;
  813. d->flags = flags;
  814. d->syt_offset = (syt_offset == 0 ? 11000 : syt_offset);
  816. ohci1394_stop_context(ohci, d->ctrlClear, NULL);
  818. for (i=0;i<d->num_desc;i++)
  819. initialize_dma_it_prg(d, i, sync_tag);
  821. /* Set up isoRecvIntMask to generate interrupts */
  822. reg_write(ohci, OHCI1394_IsoXmitIntMaskSet, 1<<d->ctx);
  823. }
  825. static int do_iso_mmap(struct ti_ohci *ohci, struct dma_iso_ctx *d, 
  826.        const char *adr, unsigned long size)
  827. {
  828.         unsigned long start=(unsigned long) adr;
  829.         unsigned long page,pos;
  831.         if (size>d->num_desc * d->buf_size) {
  832. PRINT(KERN_ERR, ohci->id, 
  833.       "iso context %d buf size is different from mmap size", 
  834.       d->ctx);
  835.                 return -EINVAL;
  836. }
  837.         if (!d->buf) {
  838. PRINT(KERN_ERR, ohci->id, 
  839.       "iso context %d is not allocated", d->ctx);
  840. return -EINVAL;
  841. }
  843.         pos=(unsigned long) d->buf;
  844.         while (size > 0) {
  845.                 page = kvirt_to_pa(pos);
  846.                 if (remap_page_range(start, page, PAGE_SIZE, PAGE_SHARED))
  847.                         return -EAGAIN;
  848.                 start+=PAGE_SIZE;
  849.                 pos+=PAGE_SIZE;
  850.                 size-=PAGE_SIZE;
  851.         }
  852.         return 0;
  853. }
  855. static int video1394_ioctl(struct inode *inode, struct file *file,
  856.    unsigned int cmd, unsigned long arg)
  857. {
  858. struct video_card *video = NULL;
  859. struct ti_ohci *ohci = NULL;
  860. unsigned long flags;
  861. struct list_head *lh;
  863. spin_lock_irqsave(&video1394_cards_lock, flags);
  864. if (!list_empty(&video1394_cards)) {
  865. struct video_card *p;
  866. list_for_each(lh, &video1394_cards) {
  867. p = list_entry(lh, struct video_card, list);
  868. if (p->id == MINOR(inode->i_rdev)) {
  869. video = p;
  870. ohci = video->ohci;
  871. break;
  872. }
  873. }
  874. }
  875. spin_unlock_irqrestore(&video1394_cards_lock, flags);
  877. if (video == NULL) {
  878. PRINT_G(KERN_ERR, __FUNCTION__": Unknown video card for minor %d", MINOR(inode->i_rdev));
  879. return -EFAULT;
  880. }
  882. switch(cmd)
  883. {
  884. case VIDEO1394_LISTEN_CHANNEL:
  885. case VIDEO1394_TALK_CHANNEL:
  886. {
  887. struct video1394_mmap v;
  888. u64 mask;
  889. int i;
  891. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  892. return -EFAULT;
  894. /* if channel < 0, find lowest available one */
  895. if (v.channel < 0) {
  896.     mask = (u64)0x1;
  897.     for (i=0; i<ISO_CHANNELS; i++) {
  898. if (!(ohci->ISO_channel_usage & mask)) {
  899.     v.channel = i;
  900.     PRINT(KERN_INFO, ohci->id, "Found free channel %dn", i);
  901.     break;
  902. }
  903. mask = mask << 1;
  904.     }
  905. }
  906.     
  907. if (v.channel<0 || v.channel>(ISO_CHANNELS-1)) {
  908. PRINT(KERN_ERR, ohci->id, 
  909.       "Iso channel %d out of bounds", v.channel);
  910. return -EFAULT;
  911. }
  912. mask = (u64)0x1<<v.channel;
  913. printk("mask: %08X%08X usage: %08X%08Xn",
  914.        (u32)(mask>>32),(u32)(mask&0xffffffff),
  915.        (u32)(ohci->ISO_channel_usage>>32),
  916.        (u32)(ohci->ISO_channel_usage&0xffffffff));
  917. if (ohci->ISO_channel_usage & mask) {
  918. PRINT(KERN_ERR, ohci->id, 
  919.       "Channel %d is already taken", v.channel);
  920. return -EFAULT;
  921. }
  922. ohci->ISO_channel_usage |= mask;
  924. if (v.buf_size<=0) {
  925. PRINT(KERN_ERR, ohci->id,
  926.       "Invalid %d length buffer requested",v.buf_size);
  927. return -EFAULT;
  928. }
  930. if (v.nb_buffers<=0) {
  931. PRINT(KERN_ERR, ohci->id,
  932.       "Invalid %d buffers requested",v.nb_buffers);
  933. return -EFAULT;
  934. }
  936. if (v.nb_buffers * v.buf_size > VIDEO1394_MAX_SIZE) {
  937. PRINT(KERN_ERR, ohci->id, 
  938.       "%d buffers of size %d bytes is too big", 
  939.       v.nb_buffers, v.buf_size);
  940. return -EFAULT;
  941. }
  943. if (cmd == VIDEO1394_LISTEN_CHANNEL) {
  944. /* find a free iso receive context */
  945. for (i=0;i<ohci->nb_iso_rcv_ctx-1;i++) 
  946. if (video->ir_context[i]==NULL) break;
  947.     
  948. if (i==(ohci->nb_iso_rcv_ctx-1)) {
  949. PRINT(KERN_ERR, ohci->id, 
  950.       "No iso context available");
  951. return -EFAULT;
  952. }
  954. video->ir_context[i] = 
  955. alloc_dma_iso_ctx(ohci, ISO_RECEIVE, i+1, 
  956.   v.nb_buffers, v.buf_size, 
  957.   v.channel, 0);
  959. if (video->ir_context[i] == NULL) {
  960. PRINT(KERN_ERR, ohci->id, 
  961.       "Couldn't allocate ir context");
  962. return -EFAULT;
  963. }
  964. initialize_dma_ir_ctx(video->ir_context[i], 
  965.       v.sync_tag, v.flags);
  967. video->current_ctx = video->ir_context[i];
  969. v.buf_size = video->ir_context[i]->buf_size;
  971. PRINT(KERN_INFO, ohci->id, 
  972.       "iso context %d listen on channel %d", i+1, 
  973.       v.channel);
  974. }
  975. else {
  976. /* find a free iso transmit context */
  977. for (i=0;i<ohci->nb_iso_xmit_ctx;i++) 
  978. if (video->it_context[i]==NULL) break;
  979.     
  980. if (i==ohci->nb_iso_xmit_ctx) {
  981. PRINT(KERN_ERR, ohci->id, 
  982.       "No iso context available");
  983. return -EFAULT;
  984. }
  986. video->it_context[i] = 
  987. alloc_dma_iso_ctx(ohci, ISO_TRANSMIT, i, 
  988.   v.nb_buffers, v.buf_size, 
  989.   v.channel, v.packet_size);
  991. if (video->it_context[i] == NULL) {
  992. PRINT(KERN_ERR, ohci->id, 
  993.       "Couldn't allocate it context");
  994. return -EFAULT;
  995. }
  996. initialize_dma_it_ctx(video->it_context[i], 
  997.       v.sync_tag, v.syt_offset, v.flags);
  999. video->current_ctx = video->it_context[i];
  1001. v.buf_size = video->it_context[i]->buf_size;
  1003. PRINT(KERN_INFO, ohci->id, 
  1004.       "Iso context %d talk on channel %d", i, 
  1005.       v.channel);
  1006. }
  1008. if(copy_to_user((void *)arg, &v, sizeof(v)))
  1009. return -EFAULT;
  1011. return 0;
  1012. }
  1013. case VIDEO1394_UNLISTEN_CHANNEL: 
  1014. case VIDEO1394_UNTALK_CHANNEL:
  1015. {
  1016. int channel;
  1017. u64 mask;
  1018. int i;
  1020. if(copy_from_user(&channel, (void *)arg, sizeof(int)))
  1021. return -EFAULT;
  1023. if (channel<0 || channel>(ISO_CHANNELS-1)) {
  1024. PRINT(KERN_ERR, ohci->id, 
  1025.       "Iso channel %d out of bound", channel);
  1026. return -EFAULT;
  1027. }
  1028. mask = (u64)0x1<<channel;
  1029. if (!(ohci->ISO_channel_usage & mask)) {
  1030. PRINT(KERN_ERR, ohci->id, 
  1031.       "Channel %d is not being used", channel);
  1032. return -EFAULT;
  1033. }
  1034. ohci->ISO_channel_usage &= ~mask;
  1036. if (cmd == VIDEO1394_UNLISTEN_CHANNEL) {
  1037. i = ir_ctx_listening(video, channel);
  1038. if (i<0) return -EFAULT;
  1040. free_dma_iso_ctx(&video->ir_context[i]);
  1042. PRINT(KERN_INFO, ohci->id, 
  1043.       "Iso context %d stop listening on channel %d", 
  1044.       i+1, channel);
  1045. }
  1046. else {
  1047. i = it_ctx_talking(video, channel);
  1048. if (i<0) return -EFAULT;
  1050. free_dma_iso_ctx(&video->it_context[i]);
  1052. PRINT(KERN_INFO, ohci->id, 
  1053.       "Iso context %d stop talking on channel %d", 
  1054.       i, channel);
  1055. }
  1057. return 0;
  1058. }
  1059. case VIDEO1394_LISTEN_QUEUE_BUFFER:
  1060. {
  1061. struct video1394_wait v;
  1062. struct dma_iso_ctx *d;
  1063. int i;
  1065. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  1066. return -EFAULT;
  1068. i = ir_ctx_listening(video, v.channel);
  1069. if (i<0) return -EFAULT;
  1070. d = video->ir_context[i];
  1072. if ((v.buffer<0) || (v.buffer>d->num_desc)) {
  1073. PRINT(KERN_ERR, ohci->id, 
  1074.       "Buffer %d out of range",v.buffer);
  1075. return -EFAULT;
  1076. }
  1078. spin_lock_irqsave(&d->lock,flags);
  1080. if (d->buffer_status[v.buffer]==VIDEO1394_BUFFER_QUEUED) {
  1081. PRINT(KERN_ERR, ohci->id, 
  1082.       "Buffer %d is already used",v.buffer);
  1083. spin_unlock_irqrestore(&d->lock,flags);
  1084. return -EFAULT;
  1085. }
  1087. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_QUEUED;
  1089. if (d->last_buffer>=0) 
  1090. d->ir_prg[d->last_buffer][d->nb_cmd-1].branchAddress = 
  1091. (virt_to_bus(&(d->ir_prg[v.buffer][0].control)) 
  1092.  & 0xfffffff0) | 0x1;
  1094. d->last_buffer = v.buffer;
  1096. d->ir_prg[d->last_buffer][d->nb_cmd-1].branchAddress = 0;
  1098. spin_unlock_irqrestore(&d->lock,flags);
  1100. if (!(reg_read(ohci, d->ctrlSet) & 0x8000)) 
  1101. {
  1102. DBGMSG(ohci->id, "Starting iso DMA ctx=%d",d->ctx);
  1104. /* Tell the controller where the first program is */
  1105. reg_write(ohci, d->cmdPtr, 
  1106.   virt_to_bus(&(d->ir_prg[v.buffer][0]))|0x1);
  1108. /* Run IR context */
  1109. reg_write(ohci, d->ctrlSet, 0x8000);
  1110. }
  1111. else {
  1112. /* Wake up dma context if necessary */
  1113. if (!(reg_read(ohci, d->ctrlSet) & 0x400)) {
  1114. PRINT(KERN_INFO, ohci->id, 
  1115.       "Waking up iso dma ctx=%d", d->ctx);
  1116. reg_write(ohci, d->ctrlSet, 0x1000);
  1117. }
  1118. }
  1119. return 0;
  1121. }
  1122. case VIDEO1394_LISTEN_WAIT_BUFFER:
  1123. case VIDEO1394_LISTEN_POLL_BUFFER:
  1124. {
  1125. struct video1394_wait v;
  1126. struct dma_iso_ctx *d;
  1127. int i;
  1129. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  1130. return -EFAULT;
  1132. i = ir_ctx_listening(video, v.channel);
  1133. if (i<0) return -EFAULT;
  1134. d = video->ir_context[i];
  1136. if ((v.buffer<0) || (v.buffer>d->num_desc)) {
  1137. PRINT(KERN_ERR, ohci->id, 
  1138.       "Buffer %d out of range",v.buffer);
  1139. return -EFAULT;
  1140. }
  1142. /*
  1143.  * I change the way it works so that it returns 
  1144.  * the last received frame.
  1145.  */
  1146. spin_lock_irqsave(&d->lock, flags);
  1147. switch(d->buffer_status[v.buffer]) {
  1148. case VIDEO1394_BUFFER_READY:
  1149. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
  1150. break;
  1151. case VIDEO1394_BUFFER_QUEUED:
  1152. if (cmd == VIDEO1394_LISTEN_POLL_BUFFER) {
  1153.     /* for polling, return error code EINTR */
  1154.     spin_unlock_irqrestore(&d->lock, flags);
  1155.     return -EINTR;
  1156. }
  1158. #if 1
  1159. while(d->buffer_status[v.buffer]!=
  1160.       VIDEO1394_BUFFER_READY) {
  1161. spin_unlock_irqrestore(&d->lock, flags);
  1162. interruptible_sleep_on(&d->waitq);
  1163. spin_lock_irqsave(&d->lock, flags);
  1164. if(signal_pending(current)) {
  1165. spin_unlock_irqrestore(&d->lock,flags);
  1166. return -EINTR;
  1167. }
  1168. }
  1169. #else
  1170. if (wait_event_interruptible(d->waitq, 
  1171.      d->buffer_status[v.buffer]
  1172.      == VIDEO1394_BUFFER_READY)
  1173.     == -ERESTARTSYS)
  1174. return -EINTR;
  1175. #endif
  1176. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
  1177. break;
  1178. default:
  1179. PRINT(KERN_ERR, ohci->id, 
  1180.       "Buffer %d is not queued",v.buffer);
  1181. spin_unlock_irqrestore(&d->lock, flags);
  1182. return -EFAULT;
  1183. }
  1185. /* set time of buffer */
  1186. v.filltime = d->buffer_time[v.buffer];
  1187. // printk("Buffer %d time %dn", v.buffer, (d->buffer_time[v.buffer]).tv_usec);
  1189. /*
  1190.  * Look ahead to see how many more buffers have been received
  1191.  */
  1192. i=0;
  1193. while (d->buffer_status[(v.buffer+1)%d->num_desc]==
  1194.        VIDEO1394_BUFFER_READY) {
  1195. v.buffer=(v.buffer+1)%d->num_desc;
  1196. i++;
  1197. }
  1198. spin_unlock_irqrestore(&d->lock, flags);
  1200. v.buffer=i;
  1201. if(copy_to_user((void *)arg, &v, sizeof(v)))
  1202. return -EFAULT;
  1204. return 0;
  1205. }
  1206. case VIDEO1394_TALK_QUEUE_BUFFER:
  1207. {
  1208. struct video1394_wait v;
  1209. struct video1394_queue_variable qv;
  1210. struct dma_iso_ctx *d;
  1211. int i;
  1213. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  1214. return -EFAULT;
  1216. i = it_ctx_talking(video, v.channel);
  1217. if (i<0) return -EFAULT;
  1218. d = video->it_context[i];
  1220. if ((v.buffer<0) || (v.buffer>d->num_desc)) {
  1221. PRINT(KERN_ERR, ohci->id, 
  1222.       "Buffer %d out of range",v.buffer);
  1223. return -EFAULT;
  1224. }
  1226. if (d->flags & VIDEO1394_VARIABLE_PACKET_SIZE) {
  1227. if (copy_from_user(&qv, (void *)arg, sizeof(qv))) 
  1228. return -EFAULT;
  1229. if (!access_ok(VERIFY_READ, qv.packet_sizes, 
  1230.        d->nb_cmd * sizeof(unsigned int))) {
  1231. return -EFAULT;
  1232. }
  1233. }
  1235. spin_lock_irqsave(&d->lock,flags);
  1237. if (d->buffer_status[v.buffer]!=VIDEO1394_BUFFER_FREE) {
  1238. PRINT(KERN_ERR, ohci->id, 
  1239.       "Buffer %d is already used",v.buffer);
  1240. spin_unlock_irqrestore(&d->lock,flags);
  1241. return -EFAULT;
  1242. }
  1244. if (d->flags & VIDEO1394_VARIABLE_PACKET_SIZE) {
  1245. initialize_dma_it_prg_var_packet_queue(
  1246. d, v.buffer, qv.packet_sizes,
  1247. ohci);
  1248. }
  1250. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_QUEUED;
  1252. if (d->last_buffer>=0) {
  1253. d->it_prg[d->last_buffer]
  1254. [ d->last_used_cmd[d->last_buffer]
  1255. ].end.branchAddress = 
  1256. (virt_to_bus(&(d->it_prg[v.buffer][0].begin.control)) 
  1257.  & 0xfffffff0) | 0x3;
  1259. d->it_prg[d->last_buffer]
  1260. [d->last_used_cmd[d->last_buffer]
  1261. ].begin.branchAddress = 
  1262. (virt_to_bus(&(d->it_prg[v.buffer][0].begin.control)) 
  1263.  & 0xfffffff0) | 0x3;
  1264. d->next_buffer[d->last_buffer] = v.buffer;
  1265. }
  1266. d->last_buffer = v.buffer;
  1267. d->next_buffer[d->last_buffer] = -1;
  1269. d->it_prg[d->last_buffer][d->last_used_cmd[d->last_buffer]].end.branchAddress = 0;
  1271. spin_unlock_irqrestore(&d->lock,flags);
  1273. if (!(reg_read(ohci, d->ctrlSet) & 0x8000)) 
  1274. {
  1275. DBGMSG(ohci->id, "Starting iso transmit DMA ctx=%d",
  1276.        d->ctx);
  1277. put_timestamp(ohci, d, d->last_buffer);
  1279. /* Tell the controller where the first program is */
  1280. reg_write(ohci, d->cmdPtr, 
  1281.   virt_to_bus(&(d->it_prg[v.buffer][0]))|0x3);
  1283. /* Run IT context */
  1284. reg_write(ohci, d->ctrlSet, 0x8000);
  1285. }
  1286. else {
  1287. /* Wake up dma context if necessary */
  1288. if (!(reg_read(ohci, d->ctrlSet) & 0x400)) {
  1289. PRINT(KERN_INFO, ohci->id, 
  1290.       "Waking up iso transmit dma ctx=%d", 
  1291.       d->ctx);
  1292. put_timestamp(ohci, d, d->last_buffer);
  1293. reg_write(ohci, d->ctrlSet, 0x1000);
  1294. }
  1295. }
  1296. return 0;
  1298. }
  1299. case VIDEO1394_TALK_WAIT_BUFFER:
  1300. {
  1301. struct video1394_wait v;
  1302. struct dma_iso_ctx *d;
  1303. int i;
  1305. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  1306. return -EFAULT;
  1308. i = it_ctx_talking(video, v.channel);
  1309. if (i<0) return -EFAULT;
  1310. d = video->it_context[i];
  1312. if ((v.buffer<0) || (v.buffer>d->num_desc)) {
  1313. PRINT(KERN_ERR, ohci->id, 
  1314.       "Buffer %d out of range",v.buffer);
  1315. return -EFAULT;
  1316. }
  1318. switch(d->buffer_status[v.buffer]) {
  1319. case VIDEO1394_BUFFER_READY:
  1320. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
  1321. return 0;
  1322. case VIDEO1394_BUFFER_QUEUED:
  1323. #if 1
  1324. while(d->buffer_status[v.buffer]!=
  1325.       VIDEO1394_BUFFER_READY) {
  1326. interruptible_sleep_on(&d->waitq);
  1327. if(signal_pending(current)) return -EINTR;
  1328. }
  1329. #else
  1330. if (wait_event_interruptible(d->waitq, 
  1331.      d->buffer_status[v.buffer]
  1332.      == VIDEO1394_BUFFER_READY)
  1333.     == -ERESTARTSYS)
  1334. return -EINTR;
  1335. #endif
  1336. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
  1337. return 0;
  1338. default:
  1339. PRINT(KERN_ERR, ohci->id, 
  1340.       "Buffer %d is not queued",v.buffer);
  1341. return -EFAULT;
  1342. }
  1343. }
  1344. default:
  1345. return -EINVAL;
  1346. }
  1347. }
  1349. /*
  1350.  * This maps the vmalloced and reserved buffer to user space.
  1351.  *
  1352.  *  FIXME: 
  1353.  *  - PAGE_READONLY should suffice!?
  1354.  *  - remap_page_range is kind of inefficient for page by page remapping.
  1355.  *    But e.g. pte_alloc() does not work in modules ... :-(
  1356.  */
  1358. int video1394_mmap(struct file *file, struct vm_area_struct *vma)
  1359. {
  1360. struct video_card *video = NULL;
  1361. struct ti_ohci *ohci;
  1362. int res = -EINVAL;
  1363. unsigned long flags;
  1364. struct list_head *lh;
  1366.         spin_lock_irqsave(&video1394_cards_lock, flags);
  1367.         if (!list_empty(&video1394_cards)) {
  1368. struct video_card *p;
  1369. list_for_each(lh, &video1394_cards) {
  1370. p = list_entry(lh, struct video_card, list);
  1371. if (p->id == MINOR(file->f_dentry->d_inode->i_rdev)) {
  1372. video = p;
  1373. break;
  1374. }
  1375.                 }
  1376.         }
  1377.         spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1379. if (video == NULL) {
  1380. PRINT_G(KERN_ERR, __FUNCTION__": Unknown video card for minor %d",
  1381. MINOR(file->f_dentry->d_inode->i_rdev));
  1382. return -EFAULT;
  1383. }
  1385. lock_kernel();
  1386. ohci = video->ohci;
  1388. if (video->current_ctx == NULL) {
  1389. PRINT(KERN_ERR, ohci->id, "Current iso context not set");
  1390. } else
  1391. res = do_iso_mmap(ohci, video->current_ctx, 
  1392.    (char *)vma->vm_start, 
  1393.    (unsigned long)(vma->vm_end-vma->vm_start));
  1394. unlock_kernel();
  1395. return res;
  1396. }
  1398. static int video1394_open(struct inode *inode, struct file *file)
  1399. {
  1400. int i = MINOR(inode->i_rdev);
  1401. unsigned long flags;
  1402. struct video_card *video = NULL;
  1403. struct list_head *lh;
  1405. spin_lock_irqsave(&video1394_cards_lock, flags);
  1406. if (!list_empty(&video1394_cards)) {
  1407. struct video_card *p;
  1408. list_for_each(lh, &video1394_cards) {
  1409. p = list_entry(lh, struct video_card, list);
  1410. if (p->id == i) {
  1411. video = p;
  1412. break;
  1413. }
  1414. }
  1415. }
  1416. spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1418.         if (video == NULL)
  1419.                 return -EIO;
  1421. V22_COMPAT_MOD_INC_USE_COUNT;
  1423. return 0;
  1424. }
  1426. static int video1394_release(struct inode *inode, struct file *file)
  1427. {
  1428. struct video_card *video = NULL;
  1429. struct ti_ohci *ohci;
  1430. u64 mask;
  1431. int i;
  1432. unsigned long flags;
  1433. struct list_head *lh;
  1435.         spin_lock_irqsave(&video1394_cards_lock, flags);
  1436.         if (!list_empty(&video1394_cards)) {
  1437. struct video_card *p;
  1438. list_for_each(lh, &video1394_cards) {
  1439. p = list_entry(lh, struct video_card, list);
  1440. if (p->id == MINOR(inode->i_rdev)) {
  1441. video = p;
  1442. break;
  1443. }
  1444. }
  1445. }
  1446.         spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1448. if (video == NULL) {
  1449. PRINT_G(KERN_ERR, __FUNCTION__": Unknown device for minor %d",
  1450. MINOR(inode->i_rdev));
  1451. return 1;
  1452. }
  1454. ohci = video->ohci;
  1456. lock_kernel();
  1457. for (i=0;i<ohci->nb_iso_rcv_ctx-1;i++) 
  1458. if (video->ir_context[i]) {
  1459. mask = (u64)0x1<<video->ir_context[i]->channel;
  1460. if (!(ohci->ISO_channel_usage & mask))
  1461. PRINT(KERN_ERR, ohci->id, 
  1462.       "Channel %d is not being used", 
  1463.       video->ir_context[i]->channel);
  1464. else
  1465. ohci->ISO_channel_usage &= ~mask;
  1466. PRINT(KERN_INFO, ohci->id, 
  1467.       "Iso receive context %d stop listening "
  1468.       "on channel %d", i+1, 
  1469.       video->ir_context[i]->channel);
  1470. free_dma_iso_ctx(&video->ir_context[i]);
  1471. }
  1473. for (i=0;i<ohci->nb_iso_xmit_ctx;i++) 
  1474. if (video->it_context[i]) {
  1475. mask = (u64)0x1<<video->it_context[i]->channel;
  1476. if (!(ohci->ISO_channel_usage & mask))
  1477. PRINT(KERN_ERR, ohci->id, 
  1478.       "Channel %d is not being used", 
  1479.       video->it_context[i]->channel);
  1480. else
  1481. ohci->ISO_channel_usage &= ~mask;
  1482. PRINT(KERN_INFO, ohci->id, 
  1483.       "Iso transmit context %d stop talking "
  1484.       "on channel %d", i+1, 
  1485.       video->it_context[i]->channel);
  1486. free_dma_iso_ctx(&video->it_context[i]);
  1487. }
  1489. V22_COMPAT_MOD_DEC_USE_COUNT;
  1491. unlock_kernel();
  1492. return 0;
  1493. }
  1495. static void irq_handler(int card, quadlet_t isoRecvIntEvent, 
  1496.  quadlet_t isoXmitIntEvent)
  1497. {
  1498. int i;
  1499. unsigned long flags;
  1500. struct video_card *video = NULL;
  1501. struct list_head *lh;
  1503. spin_lock_irqsave(&video1394_cards_lock, flags);
  1504. if (!list_empty(&video1394_cards)) {
  1505. struct video_card *p;
  1506. list_for_each(lh, &video1394_cards) {
  1507. p = list_entry(lh, struct video_card, list);
  1508. if (p->id == card) {
  1509. video = p;
  1510. break;
  1511. }
  1512.                 }
  1513.         }
  1514.         spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1516. if (video == NULL) {
  1517. PRINT_G(KERN_ERR, __FUNCTION__": Unknown card number %d!!",
  1518. card);
  1519. return;
  1520. }
  1522. DBGMSG(card, "Iso event Recv: %08x Xmit: %08x",
  1523.        isoRecvIntEvent, isoXmitIntEvent);
  1525. for (i=0;i<video->ohci->nb_iso_rcv_ctx-1;i++)
  1526. if (isoRecvIntEvent & (1<<(i+1))) 
  1527. wakeup_dma_ir_ctx(video->ohci,
  1528.   video->ir_context[i]);
  1530. for (i=0;i<video->ohci->nb_iso_xmit_ctx;i++)
  1531. if (isoXmitIntEvent & (1<<i)) 
  1532. wakeup_dma_it_ctx(video->ohci,
  1533.   video->it_context[i]);
  1534. }
  1536. static struct file_operations video1394_fops=
  1537. {
  1538.         OWNER_THIS_MODULE
  1539. ioctl: video1394_ioctl,
  1540. mmap: video1394_mmap,
  1541. open: video1394_open,
  1542. release: video1394_release
  1543. };
  1545. static int video1394_init(struct ti_ohci *ohci)
  1546. {
  1547. struct video_card *video = kmalloc(sizeof(struct video_card), GFP_KERNEL);
  1548. unsigned long flags;
  1549. char name[16];
  1551. if (video == NULL) {
  1552. PRINT(KERN_ERR, ohci->id, "Cannot allocate video_card");
  1553. return -1;
  1554. }
  1556. memset(video, 0, sizeof(struct video_card));
  1558. spin_lock_irqsave(&video1394_cards_lock, flags);
  1559. INIT_LIST_HEAD(&video->list);
  1560. list_add_tail(&video->list, &video1394_cards);
  1561. spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1563. if (ohci1394_register_video(ohci, &video_tmpl)<0) {
  1564. PRINT(KERN_ERR, ohci->id, "Register_video failed");
  1565. return -1;
  1566. }
  1568. video->id = ohci->id;
  1569. video->ohci = ohci;
  1571. /* Iso receive dma contexts */
  1572. video->ir_context = (struct dma_iso_ctx **)
  1573. kmalloc((ohci->nb_iso_rcv_ctx-1)*
  1574. sizeof(struct dma_iso_ctx *), GFP_KERNEL);
  1575. if (video->ir_context) 
  1576. memset(video->ir_context, 0,
  1577.        (ohci->nb_iso_rcv_ctx-1)*sizeof(struct dma_iso_ctx *));
  1578. else {
  1579. PRINT(KERN_ERR, ohci->id, "Cannot allocate ir_context");
  1580. return -1;
  1581. }
  1583. /* Iso transmit dma contexts */
  1584. video->it_context = (struct dma_iso_ctx **)
  1585. kmalloc(ohci->nb_iso_xmit_ctx *
  1586. sizeof(struct dma_iso_ctx *), GFP_KERNEL);
  1587. if (video->it_context) 
  1588. memset(video->it_context, 0,
  1589.        ohci->nb_iso_xmit_ctx * sizeof(struct dma_iso_ctx *));
  1590. else {
  1591. PRINT(KERN_ERR, ohci->id, "Cannot allocate it_context");
  1592. return -1;
  1593. }
  1595. sprintf(name, "%d", video->id);
  1596. video->devfs = devfs_register(devfs_handle, name,
  1597.       DEVFS_FL_AUTO_OWNER,
  1598.       VIDEO1394_MAJOR, 0,
  1599.       S_IFCHR | S_IRUSR | S_IWUSR,
  1600.       &video1394_fops, NULL);
  1602. return 0;
  1603. }
  1605. /* Must be called under spinlock */
  1606. static void remove_card(struct video_card *video)
  1607. {
  1608. int i;
  1610. ohci1394_unregister_video(video->ohci, &video_tmpl);
  1612. devfs_unregister(video->devfs);
  1614. /* Free the iso receive contexts */
  1615. if (video->ir_context) {
  1616. for (i=0;i<video->ohci->nb_iso_rcv_ctx-1;i++) {
  1617. free_dma_iso_ctx(&video->ir_context[i]);
  1618. }
  1619. kfree(video->ir_context);
  1620. }
  1622. /* Free the iso transmit contexts */
  1623. if (video->it_context) {
  1624. for (i=0;i<video->ohci->nb_iso_xmit_ctx;i++) {
  1625. free_dma_iso_ctx(&video->it_context[i]);
  1626. }
  1627. kfree(video->it_context);
  1628. }
  1629. list_del(&video->list);
  1631. kfree(video);
  1632. }
  1634. static void video1394_remove_host (struct hpsb_host *host)
  1635. {
  1636. struct ti_ohci *ohci;
  1637. unsigned long flags;
  1638. struct list_head *lh, *next;
  1639. struct video_card *p;
  1641. /* We only work with the OHCI-1394 driver */
  1642. if (strcmp(host->template->name, OHCI1394_DRIVER_NAME))
  1643. return;
  1645. ohci = (struct ti_ohci *)host->hostdata;
  1647.         spin_lock_irqsave(&video1394_cards_lock, flags);
  1648. list_for_each_safe(lh, next, &video1394_cards) {
  1649. p = list_entry(lh, struct video_card, list);
  1650. if (p->ohci == ohci) {
  1651. remove_card(p);
  1652. break;
  1653. }
  1654. }
  1655. spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1657. return;
  1658. }
  1660. static void video1394_add_host (struct hpsb_host *host)
  1661. {
  1662. struct ti_ohci *ohci;
  1664. /* We only work with the OHCI-1394 driver */
  1665. if (strcmp(host->template->name, OHCI1394_DRIVER_NAME))
  1666. return;
  1668. ohci = (struct ti_ohci *)host->hostdata;
  1670. video1394_init(ohci);
  1672. return;
  1673. }
  1675. static struct hpsb_highlevel_ops hl_ops = {
  1676. add_host: video1394_add_host,
  1677. remove_host: video1394_remove_host,
  1678. };
  1680. MODULE_AUTHOR("Sebastien Rougeaux <sebastien.rougeaux@anu.edu.au>");
  1681. MODULE_DESCRIPTION("driver for digital video on OHCI board");
  1682. MODULE_SUPPORTED_DEVICE(VIDEO1394_DRIVER_NAME);
  1683. MODULE_LICENSE("GPL");
  1685. static void __exit video1394_exit_module (void)
  1686. {
  1687. hpsb_unregister_highlevel (hl_handle);
  1689. devfs_unregister(devfs_handle);
  1690. devfs_unregister_chrdev(VIDEO1394_MAJOR, VIDEO1394_DRIVER_NAME);
  1692. PRINT_G(KERN_INFO, "Removed " VIDEO1394_DRIVER_NAME " module");
  1693. }
  1695. static int __init video1394_init_module (void)
  1696. {
  1697. if (devfs_register_chrdev(VIDEO1394_MAJOR, VIDEO1394_DRIVER_NAME,
  1698. &video1394_fops)) {
  1699. PRINT_G(KERN_ERR, "video1394: unable to get major %dn",
  1700. VIDEO1394_MAJOR);
  1701. return -EIO;
  1702. }
  1703. #if LINUX_VERSION_CODE < KERNEL_VERSION(2,3,0)
  1704. devfs_handle = devfs_mk_dir(NULL, VIDEO1394_DRIVER_NAME,
  1705. strlen(VIDEO1394_DRIVER_NAME), NULL);
  1706. #else
  1707. devfs_handle = devfs_mk_dir(NULL, VIDEO1394_DRIVER_NAME, NULL);
  1708. #endif
  1710. hl_handle = hpsb_register_highlevel (VIDEO1394_DRIVER_NAME, &hl_ops);
  1711. if (hl_handle == NULL) {
  1712. PRINT_G(KERN_ERR, "No more memory for drivern");
  1713. devfs_unregister(devfs_handle);
  1714. devfs_unregister_chrdev(VIDEO1394_MAJOR, VIDEO1394_DRIVER_NAME);
  1715. return -ENOMEM;
  1716. }
  1718. PRINT_G(KERN_INFO, "Installed " VIDEO1394_DRIVER_NAME " module");
  1719. return 0;
  1720. }
  1722. module_init(video1394_init_module);
  1723. module_exit(video1394_exit_module);