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

源码开发语言/平台
当前位置：首页 > 源码/资料 > Linux/Unix编程 > 查看源码
video1394.c
资源名称：linux-2.4.20.tar.gz　[点击查看]
上传用户：jlfgdled
上传日期：2013-04-10
资源大小：33168k
文件大小：38k
源码类别：

Linux/Unix编程

开发平台：

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. /* jds -- add private data to file to keep track of iso contexts associated
  22.    with each open -- so release won't kill all iso transfers */
  24. #include <linux/config.h>
  25. #include <linux/kernel.h>
  26. #include <linux/list.h>
  27. #include <linux/slab.h>
  28. #include <linux/interrupt.h>
  29. #include <linux/wait.h>
  30. #include <linux/errno.h>
  31. #include <linux/module.h>
  32. #include <linux/init.h>
  33. #include <linux/pci.h>
  34. #include <linux/fs.h>
  35. #include <linux/poll.h>
  36. #include <linux/smp_lock.h>
  37. #include <linux/proc_fs.h>
  38. #include <linux/tqueue.h>
  39. #include <linux/delay.h>
  40. #include <linux/devfs_fs_kernel.h>
  42. #include <asm/bitops.h>
  43. #include <linux/types.h>
  44. #include <linux/wrapper.h>
  45. #include <linux/vmalloc.h>
  46. #include <linux/timex.h>
  47. #include <linux/mm.h>
  49. #include "ieee1394.h"
  50. #include "ieee1394_types.h"
  51. #include "hosts.h"
  52. #include "ieee1394_core.h"
  53. #include "highlevel.h"
  54. #include "video1394.h"
  56. #include "ohci1394.h"
  58. #define ISO_CHANNELS 64
  60. #ifndef virt_to_page
  61. #define virt_to_page(x) MAP_NR(x)
  62. #endif
  64. #ifndef vmalloc_32
  65. #define vmalloc_32(x) vmalloc(x)
  66. #endif
  68. #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,3))
  69. #define remap_page_range_1394(vma, start, addr, size, prot) 
  70. remap_page_range(start, addr, size, prot)
  71. #else
  72. #define remap_page_range_1394(vma, start, addr, size, prot) 
  73. remap_page_range(vma, start, addr, size, prot)
  74. #endif
  76. struct it_dma_prg {
  77. struct dma_cmd begin;
  78. quadlet_t data[4];
  79. struct dma_cmd end;
  80. quadlet_t pad[4]; /* FIXME: quick hack for memory alignment */
  81. };
  83. struct dma_iso_ctx {
  84. struct ti_ohci *ohci;
  85. int type; /* OHCI_ISO_TRANSMIT or OHCI_ISO_RECEIVE */
  86. struct ohci1394_iso_tasklet iso_tasklet;
  87. int channel;
  88. int ctx;
  89. int last_buffer;
  90. int * next_buffer;  /* For ISO Transmit of video packets
  91.        to write the correct SYT field
  92.        into the next block */
  93. unsigned int num_desc;
  94. unsigned int buf_size;
  95. unsigned int frame_size;
  96. unsigned int packet_size;
  97. unsigned int left_size;
  98. unsigned int nb_cmd;
  99. unsigned char *buf;
  100.         struct dma_cmd **ir_prg;
  101. struct it_dma_prg **it_prg;
  102. unsigned int *buffer_status;
  103.         struct timeval *buffer_time; /* time when the buffer was received */
  104. unsigned int *last_used_cmd; /* For ISO Transmit with 
  105. variable sized packets only ! */
  106. int ctrlClear;
  107. int ctrlSet;
  108. int cmdPtr;
  109. int ctxMatch;
  110. wait_queue_head_t waitq;
  111. spinlock_t lock;
  112. unsigned int syt_offset;
  113. int flags;
  115. struct list_head link;
  116. };
  118. struct video_card {
  119. struct ti_ohci *ohci;
  120. struct list_head list;
  121. int id;
  122. devfs_handle_t devfs;
  123. };
  126. struct file_ctx {
  127. struct video_card *video;
  128. struct list_head context_list;
  129. struct dma_iso_ctx *current_ctx;
  130. };
  132. #ifdef CONFIG_IEEE1394_VERBOSEDEBUG
  133. #define VIDEO1394_DEBUG
  134. #endif
  136. #ifdef DBGMSG
  137. #undef DBGMSG
  138. #endif
  140. #ifdef VIDEO1394_DEBUG
  141. #define DBGMSG(card, fmt, args...) 
  142. printk(KERN_INFO "video1394_%d: " fmt "n" , card , ## args)
  143. #else
  144. #define DBGMSG(card, fmt, args...)
  145. #endif
  147. /* print general (card independent) information */
  148. #define PRINT_G(level, fmt, args...) 
  149. printk(level "video1394: " fmt "n" , ## args)
  151. /* print card specific information */
  152. #define PRINT(level, card, fmt, args...) 
  153. printk(level "video1394_%d: " fmt "n" , card , ## args)
  155. void wakeup_dma_ir_ctx(unsigned long l);
  156. void wakeup_dma_it_ctx(unsigned long l);
  158. static LIST_HEAD(video1394_cards);
  159. static spinlock_t video1394_cards_lock = SPIN_LOCK_UNLOCKED;
  161. static devfs_handle_t devfs_handle;
  162. static struct hpsb_highlevel *hl_handle = NULL;
  164. /* Code taken from bttv.c */
  166. /*******************************/
  167. /* Memory management functions */
  168. /*******************************/
  170. static inline unsigned long kvirt_to_bus(unsigned long adr) 
  171. {
  172. unsigned long kva, ret;
  174. kva = (unsigned long) page_address(vmalloc_to_page((void *)adr));
  175. kva |= adr & (PAGE_SIZE-1); /* restore the offset */
  176. ret = virt_to_bus((void *)kva);
  177. return ret;
  178. }
  180. /* Here we want the physical address of the memory.
  181.  * This is used when initializing the contents of the area.
  182.  */
  183. static inline unsigned long kvirt_to_pa(unsigned long adr) 
  184. {
  185.         unsigned long kva, ret;
  187. kva = (unsigned long) page_address(vmalloc_to_page((void *)adr));
  188. kva |= adr & (PAGE_SIZE-1); /* restore the offset */
  189. ret = __pa(kva);
  190.         return ret;
  191. }
  193. static void * rvmalloc(unsigned long size)
  194. {
  195. void * mem;
  196. unsigned long adr;
  198. size=PAGE_ALIGN(size);
  199. mem=vmalloc_32(size);
  200. if (mem) 
  201. {
  202. memset(mem, 0, size); /* Clear the ram out, 
  203.  no junk to the user */
  204.         adr=(unsigned long) mem;
  205. while (size > 0) 
  206.                 {
  207. mem_map_reserve(vmalloc_to_page((void *)adr));
  208. adr+=PAGE_SIZE;
  209. size-=PAGE_SIZE;
  210. }
  211. }
  212. return mem;
  213. }
  215. static void rvfree(void * mem, unsigned long size)
  216. {
  217.         unsigned long adr;
  219. if (mem) 
  220. {
  221.         adr=(unsigned long) mem;
  222. while ((long) size > 0) 
  223.                 {
  224. mem_map_unreserve(vmalloc_to_page((void *)adr));
  225. adr+=PAGE_SIZE;
  226. size-=PAGE_SIZE;
  227. }
  228. vfree(mem);
  229. }
  230. }
  231. /* End of code taken from bttv.c */
  233. static int free_dma_iso_ctx(struct dma_iso_ctx *d)
  234. {
  235. int i;
  237. DBGMSG(d->ohci->id, "Freeing dma_iso_ctx %d", d->ctx);
  239. ohci1394_stop_context(d->ohci, d->ctrlClear, NULL);
  240. if (d->iso_tasklet.link.next != NULL)
  241. ohci1394_unregister_iso_tasklet(d->ohci, &d->iso_tasklet);
  243. if (d->buf)
  244. rvfree((void *)d->buf, d->num_desc * d->buf_size);
  246. if (d->ir_prg) {
  247. for (i=0;i<d->num_desc;i++) 
  248. if (d->ir_prg[i]) kfree(d->ir_prg[i]);
  249. kfree(d->ir_prg);
  250. }
  252. if (d->it_prg) {
  253. for (i=0;i<d->num_desc;i++) 
  254. if (d->it_prg[i]) kfree(d->it_prg[i]);
  255. kfree(d->it_prg);
  256. }
  258. if (d->buffer_status)
  259. kfree(d->buffer_status);
  260. if (d->buffer_time)
  261. kfree(d->buffer_time);
  262. if (d->last_used_cmd)
  263. kfree(d->last_used_cmd);
  264. if (d->next_buffer)
  265. kfree(d->next_buffer);
  267. list_del(&d->link);
  269. kfree(d);
  271. return 0;
  272. }
  274. static struct dma_iso_ctx *
  275. alloc_dma_iso_ctx(struct ti_ohci *ohci, int type, int num_desc,
  276.   int buf_size, int channel, unsigned int packet_size)
  277. {
  278. struct dma_iso_ctx *d;
  279. int i;
  281. d = kmalloc(sizeof(struct dma_iso_ctx), GFP_KERNEL);
  282. if (d == NULL) {
  283. PRINT(KERN_ERR, ohci->id, "Failed to allocate dma_iso_ctx");
  284. return NULL;
  285. }
  287. memset(d, 0, sizeof *d);
  289. d->ohci = ohci;
  290. d->type = type;
  291. d->channel = channel;
  292. d->num_desc = num_desc;
  293. d->frame_size = buf_size;
  294. d->buf_size = PAGE_ALIGN(buf_size);
  295. d->last_buffer = -1;
  296. d->buf = NULL;
  297. d->ir_prg = NULL;
  298. init_waitqueue_head(&d->waitq);
  300. d->buf = rvmalloc(d->num_desc * d->buf_size);
  302. if (d->buf == NULL) {
  303. PRINT(KERN_ERR, ohci->id, "Failed to allocate dma buffer");
  304. free_dma_iso_ctx(d);
  305. return NULL;
  306. }
  307. memset(d->buf, 0, d->num_desc * d->buf_size);
  309. if (type == OHCI_ISO_RECEIVE)
  310. ohci1394_init_iso_tasklet(&d->iso_tasklet, type,
  311.   wakeup_dma_ir_ctx,
  312.   (unsigned long) d);
  313. else
  314. ohci1394_init_iso_tasklet(&d->iso_tasklet, type,
  315.   wakeup_dma_it_ctx,
  316.   (unsigned long) d);
  318. if (ohci1394_register_iso_tasklet(ohci, &d->iso_tasklet) < 0) {
  319. PRINT(KERN_ERR, ohci->id, "no free iso %s contexts",
  320.       type == OHCI_ISO_RECEIVE ? "receive" : "transmit");
  321. free_dma_iso_ctx(d);
  322. return NULL;
  323. }
  324. d->ctx = d->iso_tasklet.context;
  326. if (type == OHCI_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;
  332. d->ir_prg = kmalloc(d->num_desc * sizeof(struct dma_cmd *), 
  333.     GFP_KERNEL);
  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 *));
  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. }
  359. }
  360. else {  /* OHCI_ISO_TRANSMIT */
  361. d->ctrlSet = OHCI1394_IsoXmitContextControlSet+16*d->ctx;
  362. d->ctrlClear = OHCI1394_IsoXmitContextControlClear+16*d->ctx;
  363. d->cmdPtr = OHCI1394_IsoXmitCommandPtr+16*d->ctx;
  365. d->it_prg = kmalloc(d->num_desc * sizeof(struct it_dma_prg *), 
  366.     GFP_KERNEL);
  368. if (d->it_prg == NULL) {
  369. PRINT(KERN_ERR, ohci->id, 
  370.       "Failed to allocate dma it prg");
  371. free_dma_iso_ctx(d);
  372. return NULL;
  373. }
  374. memset(d->it_prg, 0, d->num_desc*sizeof(struct it_dma_prg *));
  376. d->packet_size = packet_size;
  378. if (PAGE_SIZE % packet_size || packet_size>4096) {
  379. PRINT(KERN_ERR, ohci->id, 
  380.       "Packet size %d (page_size: %ld) "
  381.       "not yet supportedn",
  382.       packet_size, PAGE_SIZE);
  383. free_dma_iso_ctx(d);
  384. return NULL;
  385. }
  387. d->nb_cmd = d->frame_size / d->packet_size;
  388. if (d->frame_size % d->packet_size) {
  389. d->nb_cmd++;
  390. d->left_size = d->frame_size % d->packet_size;
  391. }
  392. else
  393. d->left_size = d->packet_size;
  395. for (i=0;i<d->num_desc;i++) {
  396. d->it_prg[i] = kmalloc(d->nb_cmd * 
  397.        sizeof(struct it_dma_prg), 
  398.        GFP_KERNEL);
  399. if (d->it_prg[i] == NULL) {
  400. PRINT(KERN_ERR, ohci->id, 
  401.       "Failed to allocate dma it prg");
  402. free_dma_iso_ctx(d);
  403. return NULL;
  404. }
  405. }
  406. }
  408. d->buffer_status = kmalloc(d->num_desc * sizeof(unsigned int),
  409.    GFP_KERNEL);
  410. d->buffer_time = kmalloc(d->num_desc * sizeof(struct timeval),
  411.    GFP_KERNEL);
  412. d->last_used_cmd = kmalloc(d->num_desc * sizeof(unsigned int),
  413.    GFP_KERNEL);
  414. d->next_buffer = kmalloc(d->num_desc * sizeof(int),
  415.  GFP_KERNEL);
  417. if (d->buffer_status == NULL) {
  418. PRINT(KERN_ERR, ohci->id, "Failed to allocate buffer_status");
  419. free_dma_iso_ctx(d);
  420. return NULL;
  421. }
  422. if (d->buffer_time == NULL) {
  423. PRINT(KERN_ERR, ohci->id, "Failed to allocate buffer_time");
  424. free_dma_iso_ctx(d);
  425. return NULL;
  426. }
  427. if (d->last_used_cmd == NULL) {
  428. PRINT(KERN_ERR, ohci->id, "Failed to allocate last_used_cmd");
  429. free_dma_iso_ctx(d);
  430. return NULL;
  431. }
  432. if (d->next_buffer == NULL) {
  433. PRINT(KERN_ERR, ohci->id, "Failed to allocate next_buffer");
  434. free_dma_iso_ctx(d);
  435. return NULL;
  436. }
  437. memset(d->buffer_status, 0, d->num_desc * sizeof(unsigned int));
  438. memset(d->buffer_time, 0, d->num_desc * sizeof(struct timeval));
  439. memset(d->last_used_cmd, 0, d->num_desc * sizeof(unsigned int));
  440. memset(d->next_buffer, -1, d->num_desc * sizeof(int));
  442.         spin_lock_init(&d->lock);
  444. PRINT(KERN_INFO, ohci->id, "Iso %s DMA: %d buffers "
  445.       "of size %d allocated for a frame size %d, each with %d prgs",
  446.       (type == OHCI_ISO_RECEIVE) ? "receive" : "transmit",
  447.       d->num_desc, d->buf_size, d->frame_size, d->nb_cmd);
  449. return d;
  450. }
  452. static void reset_ir_status(struct dma_iso_ctx *d, int n)
  453. {
  454. int i;
  455. d->ir_prg[n][0].status = cpu_to_le32(4);
  456. d->ir_prg[n][1].status = cpu_to_le32(PAGE_SIZE-4);
  457. for (i=2;i<d->nb_cmd-1;i++)
  458. d->ir_prg[n][i].status = cpu_to_le32(PAGE_SIZE);
  459. d->ir_prg[n][i].status = cpu_to_le32(d->left_size);
  460. }
  462. static void initialize_dma_ir_prg(struct dma_iso_ctx *d, int n, int flags)
  463. {
  464. struct dma_cmd *ir_prg = d->ir_prg[n];
  465. unsigned long buf = (unsigned long)d->buf+n*d->buf_size;
  466. int i;
  468. /* the first descriptor will read only 4 bytes */
  469. ir_prg[0].control = cpu_to_le32(DMA_CTL_INPUT_MORE | DMA_CTL_UPDATE |
  470. DMA_CTL_BRANCH | 4);
  472. /* set the sync flag */
  473. if (flags & VIDEO1394_SYNC_FRAMES)
  474. ir_prg[0].control |= cpu_to_le32(DMA_CTL_WAIT);
  476. ir_prg[0].address = cpu_to_le32(kvirt_to_bus(buf));
  477. ir_prg[0].branchAddress =  cpu_to_le32((virt_to_bus(&(ir_prg[1].control)) 
  478.     & 0xfffffff0) | 0x1);
  480. /* the second descriptor will read PAGE_SIZE-4 bytes */
  481. ir_prg[1].control = cpu_to_le32(DMA_CTL_INPUT_MORE | DMA_CTL_UPDATE |
  482. DMA_CTL_BRANCH | (PAGE_SIZE-4));
  483. ir_prg[1].address = cpu_to_le32(kvirt_to_bus(buf+4));
  484. ir_prg[1].branchAddress =  cpu_to_le32((virt_to_bus(&(ir_prg[2].control)) 
  485.     & 0xfffffff0) | 0x1);
  487. for (i=2;i<d->nb_cmd-1;i++) {
  488. ir_prg[i].control = cpu_to_le32(DMA_CTL_INPUT_MORE | DMA_CTL_UPDATE | 
  489. DMA_CTL_BRANCH | PAGE_SIZE);
  490. ir_prg[i].address = cpu_to_le32(kvirt_to_bus(buf+(i-1)*PAGE_SIZE));
  492. ir_prg[i].branchAddress =  
  493. cpu_to_le32((virt_to_bus(&(ir_prg[i+1].control)) 
  494.  & 0xfffffff0) | 0x1);
  495. }
  497. /* the last descriptor will generate an interrupt */
  498. ir_prg[i].control = cpu_to_le32(DMA_CTL_INPUT_MORE | DMA_CTL_UPDATE | 
  499. DMA_CTL_IRQ | DMA_CTL_BRANCH | d->left_size);
  500. ir_prg[i].address = cpu_to_le32(kvirt_to_bus(buf+(i-1)*PAGE_SIZE));
  501. }
  503. static void initialize_dma_ir_ctx(struct dma_iso_ctx *d, int tag, int flags)
  504. {
  505. struct ti_ohci *ohci = (struct ti_ohci *)d->ohci;
  506. int i;
  508. d->flags = flags;
  510. ohci1394_stop_context(ohci, d->ctrlClear, NULL);
  512. for (i=0;i<d->num_desc;i++) {
  513. initialize_dma_ir_prg(d, i, flags);
  514. reset_ir_status(d, i);
  515. }
  517. /* reset the ctrl register */
  518. reg_write(ohci, d->ctrlClear, 0xf0000000);
  520. /* Set bufferFill */
  521. reg_write(ohci, d->ctrlSet, 0x80000000);
  523. /* Set isoch header */
  524. if (flags & VIDEO1394_INCLUDE_ISO_HEADERS) 
  525. reg_write(ohci, d->ctrlSet, 0x40000000);
  527. /* Set the context match register to match on all tags, 
  528.    sync for sync tag, and listen to d->channel */
  529. reg_write(ohci, d->ctxMatch, 0xf0000000|((tag&0xf)<<8)|d->channel);
  531. /* Set up isoRecvIntMask to generate interrupts */
  532. reg_write(ohci, OHCI1394_IsoRecvIntMaskSet, 1<<d->ctx);
  533. }
  535. /* find which context is listening to this channel */
  536. static struct dma_iso_ctx *
  537. find_ctx(struct list_head *list, int type, int channel)
  538. {
  539. struct list_head *lh;
  541. list_for_each(lh, list) {
  542. struct dma_iso_ctx *ctx;
  543. ctx = list_entry(lh, struct dma_iso_ctx, link);
  544. if (ctx->type == type && ctx->channel == channel)
  545. return ctx;
  546. }
  548. return NULL;
  549. }
  551. void wakeup_dma_ir_ctx(unsigned long l)
  552. {
  553. struct dma_iso_ctx *d = (struct dma_iso_ctx *) l;
  554. int i;
  556. spin_lock(&d->lock);
  558. for (i = 0; i < d->num_desc; i++) {
  559. if (d->ir_prg[i][d->nb_cmd-1].status & cpu_to_le32(0xFFFF0000)) {
  560. reset_ir_status(d, i);
  561. d->buffer_status[i] = VIDEO1394_BUFFER_READY;
  562. #if LINUX_VERSION_CODE < KERNEL_VERSION(2,4,18)
  563. get_fast_time(&d->buffer_time[i]);
  564. #else
  565. do_gettimeofday(&d->buffer_time[i]);
  566. #endif
  567. }
  568. }
  570. spin_unlock(&d->lock);
  572. if (waitqueue_active(&d->waitq))
  573. wake_up_interruptible(&d->waitq);
  574. }
  576. static inline void put_timestamp(struct ti_ohci *ohci, struct dma_iso_ctx * d,
  577.  int n)
  578. {
  579. unsigned char* buf = d->buf + n * d->buf_size;
  580. u32 cycleTimer;
  581. u32 timeStamp;
  583. if (n == -1) {
  584.   return;
  585. }
  587. cycleTimer = reg_read(ohci, OHCI1394_IsochronousCycleTimer);
  589. timeStamp = ((cycleTimer & 0x0fff) + d->syt_offset); /* 11059 = 450 us */
  590. timeStamp = (timeStamp % 3072 + ((timeStamp / 3072) << 12)
  591. + (cycleTimer & 0xf000)) & 0xffff;
  593. buf[6] = timeStamp >> 8; 
  594. buf[7] = timeStamp & 0xff; 
  596.     /* if first packet is empty packet, then put timestamp into the next full one too */
  597.     if ( (le32_to_cpu(d->it_prg[n][0].data[1]) >>16) == 0x008) {
  598.         buf += d->packet_size;
  599.      buf[6] = timeStamp >> 8;
  600.     buf[7] = timeStamp & 0xff;
  601. }
  603.     /* do the next buffer frame too in case of irq latency */
  604. n = d->next_buffer[n];
  605. if (n == -1) {
  606.   return;
  607. }
  608. buf = d->buf + n * d->buf_size;
  610. timeStamp += (d->last_used_cmd[n] << 12) & 0xffff;
  612. buf[6] = timeStamp >> 8;
  613. buf[7] = timeStamp & 0xff;
  615.     /* if first packet is empty packet, then put timestamp into the next full one too */
  616.     if ( (le32_to_cpu(d->it_prg[n][0].data[1]) >>16) == 0x008) {
  617.         buf += d->packet_size;
  618.      buf[6] = timeStamp >> 8;
  619.     buf[7] = timeStamp & 0xff;
  620. }
  622. #if 0
  623. printk("curr: %d, next: %d, cycleTimer: %08x timeStamp: %08xn",
  624.        curr, n, cycleTimer, timeStamp);
  625. #endif
  626. }
  628. void wakeup_dma_it_ctx(unsigned long l)
  629. {
  630. struct dma_iso_ctx *d = (struct dma_iso_ctx *) l;
  631. struct ti_ohci *ohci = d->ohci;
  632. int i;
  634. spin_lock(&d->lock);
  636. for (i = 0; i < d->num_desc; i++) {
  637. if (d->it_prg[i][d->last_used_cmd[i]].end.status & 
  638.     cpu_to_le32(0xFFFF0000)) {
  639. int next = d->next_buffer[i];
  640. put_timestamp(ohci, d, next);
  641. d->it_prg[i][d->last_used_cmd[i]].end.status = 0;
  642. d->buffer_status[i] = VIDEO1394_BUFFER_READY;
  643. }
  644. }
  646. spin_unlock(&d->lock);
  648. if (waitqueue_active(&d->waitq))
  649. wake_up_interruptible(&d->waitq);
  650. }
  652. static void initialize_dma_it_prg(struct dma_iso_ctx *d, int n, int sync_tag)
  653. {
  654. struct it_dma_prg *it_prg = d->it_prg[n];
  655. unsigned long buf = (unsigned long)d->buf+n*d->buf_size;
  656. int i;
  657. d->last_used_cmd[n] = d->nb_cmd - 1;
  658. for (i=0;i<d->nb_cmd;i++) {
  659.  
  660. it_prg[i].begin.control = cpu_to_le32(DMA_CTL_OUTPUT_MORE |
  661. DMA_CTL_IMMEDIATE | 8) ;
  662. it_prg[i].begin.address = 0;
  664. it_prg[i].begin.status = 0;
  666. it_prg[i].data[0] = cpu_to_le32(
  667. (SPEED_100 << 16) 
  668. | (/* tag */ 1 << 14)
  669. | (d->channel << 8) 
  670. | (TCODE_ISO_DATA << 4));
  671. if (i==0) it_prg[i].data[0] |= cpu_to_le32(sync_tag);
  672. it_prg[i].data[1] = cpu_to_le32(d->packet_size << 16);
  673. it_prg[i].data[2] = 0;
  674. it_prg[i].data[3] = 0;
  676. it_prg[i].end.control = cpu_to_le32(DMA_CTL_OUTPUT_LAST |
  677.                DMA_CTL_BRANCH);
  678. it_prg[i].end.address =
  679. cpu_to_le32(kvirt_to_bus(buf+i*d->packet_size));
  681. if (i<d->nb_cmd-1) {
  682. it_prg[i].end.control |= cpu_to_le32(d->packet_size);
  683. it_prg[i].begin.branchAddress = 
  684. cpu_to_le32((virt_to_bus(&(it_prg[i+1].begin.control)) 
  685.  & 0xfffffff0) | 0x3);
  686. it_prg[i].end.branchAddress = 
  687. cpu_to_le32((virt_to_bus(&(it_prg[i+1].begin.control)) 
  688.  & 0xfffffff0) | 0x3);
  689. }
  690. else {
  691. /* the last prg generates an interrupt */
  692. it_prg[i].end.control |= cpu_to_le32(DMA_CTL_UPDATE | 
  693. DMA_CTL_IRQ | d->left_size);
  694. /* the last prg doesn't branch */
  695. it_prg[i].begin.branchAddress = 0;
  696. it_prg[i].end.branchAddress = 0;
  697. }
  698. it_prg[i].end.status = 0;
  700. #if 0
  701. printk("%d:%d: %08x-%08x ctrl %08x brch %08x d0 %08x d1 %08xn",n,i,
  702.        virt_to_bus(&(it_prg[i].begin.control)),
  703.        virt_to_bus(&(it_prg[i].end.control)),
  704.        it_prg[i].end.control,
  705.        it_prg[i].end.branchAddress,
  706.        it_prg[i].data[0], it_prg[i].data[1]);
  707. #endif
  708. }
  709. }
  711. static void initialize_dma_it_prg_var_packet_queue(
  712. struct dma_iso_ctx *d, int n, unsigned int * packet_sizes,
  713. struct ti_ohci *ohci)
  714. {
  715. struct it_dma_prg *it_prg = d->it_prg[n];
  716. int i;
  718. #if 0
  719. if (n != -1) {
  720. put_timestamp(ohci, d, n);
  721. }
  722. #endif
  723. d->last_used_cmd[n] = d->nb_cmd - 1;
  725. for (i = 0; i < d->nb_cmd; i++) {
  726. unsigned int size;
  727. if (packet_sizes[i] > d->packet_size) {
  728. size = d->packet_size;
  729. } else {
  730. size = packet_sizes[i];
  731. }
  732. it_prg[i].data[1] = cpu_to_le32(size << 16); 
  733. it_prg[i].end.control = cpu_to_le32(DMA_CTL_OUTPUT_LAST | DMA_CTL_BRANCH);
  735. if (i < d->nb_cmd-1 && packet_sizes[i+1] != 0) {
  736. it_prg[i].end.control |= cpu_to_le32(size);
  737. it_prg[i].begin.branchAddress = 
  738. cpu_to_le32((virt_to_bus(&(it_prg[i+1].begin.control)) 
  739.  & 0xfffffff0) | 0x3);
  740. it_prg[i].end.branchAddress = 
  741. cpu_to_le32((virt_to_bus(&(it_prg[i+1].begin.control)) 
  742.  & 0xfffffff0) | 0x3);
  743. } else {
  744. /* the last prg generates an interrupt */
  745. it_prg[i].end.control |= cpu_to_le32(DMA_CTL_UPDATE | 
  746. DMA_CTL_IRQ | size);
  747. /* the last prg doesn't branch */
  748. it_prg[i].begin.branchAddress = 0;
  749. it_prg[i].end.branchAddress = 0;
  750. d->last_used_cmd[n] = i;
  751. break;
  752. }
  753. }
  754. }
  756. static void initialize_dma_it_ctx(struct dma_iso_ctx *d, int sync_tag,
  757.   unsigned int syt_offset, int flags)
  758. {
  759. struct ti_ohci *ohci = (struct ti_ohci *)d->ohci;
  760. int i;
  762. d->flags = flags;
  763. d->syt_offset = (syt_offset == 0 ? 11000 : syt_offset);
  765. ohci1394_stop_context(ohci, d->ctrlClear, NULL);
  767. for (i=0;i<d->num_desc;i++)
  768. initialize_dma_it_prg(d, i, sync_tag);
  770. /* Set up isoRecvIntMask to generate interrupts */
  771. reg_write(ohci, OHCI1394_IsoXmitIntMaskSet, 1<<d->ctx);
  772. }
  774. static int do_iso_mmap(struct ti_ohci *ohci, struct dma_iso_ctx *d,
  775.        struct vm_area_struct *vma)
  776. {
  777.         unsigned long start = vma->vm_start;
  778. unsigned long size = vma->vm_end - vma->vm_start;
  779.         unsigned long page, pos;
  781.         if (size > d->num_desc * d->buf_size) {
  782. PRINT(KERN_ERR, ohci->id, 
  783.       "iso context %d buf size is different from mmap size", 
  784.       d->ctx);
  785.                 return -EINVAL;
  786. }
  787.         if (!d->buf) {
  788. PRINT(KERN_ERR, ohci->id, 
  789.       "iso context %d is not allocated", d->ctx);
  790. return -EINVAL;
  791. }
  793. pos = (unsigned long) d->buf;
  794.         while (size > 0) {
  795.                 page = kvirt_to_pa(pos);
  796.                 if (remap_page_range_1394(vma, start, page, PAGE_SIZE, PAGE_SHARED))
  797.                         return -EAGAIN;
  798.                 start += PAGE_SIZE;
  799.                 pos += PAGE_SIZE;
  800.                 size -= PAGE_SIZE;
  801.         }
  802.         return 0;
  803. }
  805. static int video1394_ioctl(struct inode *inode, struct file *file,
  806.    unsigned int cmd, unsigned long arg)
  807. {
  808. struct file_ctx *ctx = (struct file_ctx *)file->private_data;
  809. struct video_card *video = ctx->video;
  810. struct ti_ohci *ohci = video->ohci;
  811. unsigned long flags;
  813. switch(cmd)
  814. {
  815. case VIDEO1394_LISTEN_CHANNEL:
  816. case VIDEO1394_TALK_CHANNEL:
  817. {
  818. struct video1394_mmap v;
  819. u64 mask;
  820. struct dma_iso_ctx *d;
  821. int i;
  823. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  824. return -EFAULT;
  826. /* if channel < 0, find lowest available one */
  827. if (v.channel < 0) {
  828.     mask = (u64)0x1;
  829.     for (i=0; i<ISO_CHANNELS; i++) {
  830. if (!(ohci->ISO_channel_usage & mask)) {
  831.     v.channel = i;
  832.     PRINT(KERN_INFO, ohci->id, "Found free channel %d", i);
  833.     break;
  834. }
  835. mask = mask << 1;
  836.     }
  837. }
  838.     
  839. if (v.channel<0 || v.channel>(ISO_CHANNELS-1)) {
  840. PRINT(KERN_ERR, ohci->id, 
  841.       "Iso channel %d out of bounds", v.channel);
  842. return -EFAULT;
  843. }
  844. mask = (u64)0x1<<v.channel;
  845. printk("mask: %08X%08X usage: %08X%08Xn",
  846.        (u32)(mask>>32),(u32)(mask&0xffffffff),
  847.        (u32)(ohci->ISO_channel_usage>>32),
  848.        (u32)(ohci->ISO_channel_usage&0xffffffff));
  849. if (ohci->ISO_channel_usage & mask) {
  850. PRINT(KERN_ERR, ohci->id, 
  851.       "Channel %d is already taken", v.channel);
  852. return -EFAULT;
  853. }
  854. ohci->ISO_channel_usage |= mask;
  856. if (v.buf_size == 0 || v.buf_size > VIDEO1394_MAX_SIZE) {
  857. PRINT(KERN_ERR, ohci->id,
  858.       "Invalid %d length buffer requested",v.buf_size);
  859. return -EFAULT;
  860. }
  862. if (v.nb_buffers == 0 || v.nb_buffers > VIDEO1394_MAX_SIZE) {
  863. PRINT(KERN_ERR, ohci->id,
  864.       "Invalid %d buffers requested",v.nb_buffers);
  865. return -EFAULT;
  866. }
  868. if (v.nb_buffers * v.buf_size > VIDEO1394_MAX_SIZE) {
  869. PRINT(KERN_ERR, ohci->id, 
  870.       "%d buffers of size %d bytes is too big", 
  871.       v.nb_buffers, v.buf_size);
  872. return -EFAULT;
  873. }
  875. if (cmd == VIDEO1394_LISTEN_CHANNEL) {
  876. d = alloc_dma_iso_ctx(ohci, OHCI_ISO_RECEIVE,
  877.       v.nb_buffers, v.buf_size, 
  878.       v.channel, 0);
  880. if (d == NULL) {
  881. PRINT(KERN_ERR, ohci->id, 
  882.       "Couldn't allocate ir context");
  883. return -EFAULT;
  884. }
  885. initialize_dma_ir_ctx(d, v.sync_tag, v.flags);
  887. ctx->current_ctx = d;
  889. v.buf_size = d->buf_size;
  890. list_add_tail(&d->link, &ctx->context_list);
  892. PRINT(KERN_INFO, ohci->id, 
  893.       "iso context %d listen on channel %d",
  894.       d->ctx, v.channel);
  895. }
  896. else {
  897. d = alloc_dma_iso_ctx(ohci, OHCI_ISO_TRANSMIT,
  898.       v.nb_buffers, v.buf_size, 
  899.       v.channel, v.packet_size);
  901. if (d == NULL) {
  902. PRINT(KERN_ERR, ohci->id, 
  903.       "Couldn't allocate it context");
  904. return -EFAULT;
  905. }
  906. initialize_dma_it_ctx(d, v.sync_tag, 
  907.       v.syt_offset, v.flags);
  909. ctx->current_ctx = d;
  911. v.buf_size = d->buf_size;
  913. list_add_tail(&d->link, &ctx->context_list);
  915. PRINT(KERN_INFO, ohci->id, 
  916.       "Iso context %d talk on channel %d", d->ctx,
  917.       v.channel);
  918. }
  920. if(copy_to_user((void *)arg, &v, sizeof(v)))
  921. return -EFAULT;
  923. return 0;
  924. }
  925. case VIDEO1394_UNLISTEN_CHANNEL: 
  926. case VIDEO1394_UNTALK_CHANNEL:
  927. {
  928. int channel;
  929. u64 mask;
  930. struct dma_iso_ctx *d;
  932. if(copy_from_user(&channel, (void *)arg, sizeof(int)))
  933. return -EFAULT;
  935. if (channel<0 || channel>(ISO_CHANNELS-1)) {
  936. PRINT(KERN_ERR, ohci->id, 
  937.       "Iso channel %d out of bound", channel);
  938. return -EFAULT;
  939. }
  940. mask = (u64)0x1<<channel;
  941. if (!(ohci->ISO_channel_usage & mask)) {
  942. PRINT(KERN_ERR, ohci->id, 
  943.       "Channel %d is not being used", channel);
  944. return -EFAULT;
  945. }
  947. /* Mark this channel as unused */
  948. ohci->ISO_channel_usage &= ~mask;
  950. if (cmd == VIDEO1394_UNLISTEN_CHANNEL)
  951. d = find_ctx(&ctx->context_list, OHCI_ISO_RECEIVE, channel);
  952. else
  953. d = find_ctx(&ctx->context_list, OHCI_ISO_TRANSMIT, channel);
  955. if (d == NULL) return -EFAULT;
  956. PRINT(KERN_INFO, ohci->id, "Iso context %d "
  957.       "stop talking on channel %d", d->ctx, channel);
  958. free_dma_iso_ctx(d);
  960. return 0;
  961. }
  962. case VIDEO1394_LISTEN_QUEUE_BUFFER:
  963. {
  964. struct video1394_wait v;
  965. struct dma_iso_ctx *d;
  967. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  968. return -EFAULT;
  970. d = find_ctx(&ctx->context_list, OHCI_ISO_RECEIVE, v.channel);
  972. if ((v.buffer<0) || (v.buffer>d->num_desc)) {
  973. PRINT(KERN_ERR, ohci->id, 
  974.       "Buffer %d out of range",v.buffer);
  975. return -EFAULT;
  976. }
  978. spin_lock_irqsave(&d->lock,flags);
  980. if (d->buffer_status[v.buffer]==VIDEO1394_BUFFER_QUEUED) {
  981. PRINT(KERN_ERR, ohci->id, 
  982.       "Buffer %d is already used",v.buffer);
  983. spin_unlock_irqrestore(&d->lock,flags);
  984. return -EFAULT;
  985. }
  987. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_QUEUED;
  989. if (d->last_buffer>=0) 
  990. d->ir_prg[d->last_buffer][d->nb_cmd-1].branchAddress = 
  991. cpu_to_le32((virt_to_bus(&(d->ir_prg[v.buffer][0].control)) 
  992.  & 0xfffffff0) | 0x1);
  994. d->last_buffer = v.buffer;
  996. d->ir_prg[d->last_buffer][d->nb_cmd-1].branchAddress = 0;
  998. spin_unlock_irqrestore(&d->lock,flags);
  1000. if (!(reg_read(ohci, d->ctrlSet) & 0x8000)) 
  1001. {
  1002. DBGMSG(ohci->id, "Starting iso DMA ctx=%d",d->ctx);
  1004. /* Tell the controller where the first program is */
  1005. reg_write(ohci, d->cmdPtr, 
  1006.   virt_to_bus(&(d->ir_prg[v.buffer][0]))|0x1);
  1008. /* Run IR context */
  1009. reg_write(ohci, d->ctrlSet, 0x8000);
  1010. }
  1011. else {
  1012. /* Wake up dma context if necessary */
  1013. if (!(reg_read(ohci, d->ctrlSet) & 0x400)) {
  1014. PRINT(KERN_INFO, ohci->id, 
  1015.       "Waking up iso dma ctx=%d", d->ctx);
  1016. reg_write(ohci, d->ctrlSet, 0x1000);
  1017. }
  1018. }
  1019. return 0;
  1021. }
  1022. case VIDEO1394_LISTEN_WAIT_BUFFER:
  1023. case VIDEO1394_LISTEN_POLL_BUFFER:
  1024. {
  1025. struct video1394_wait v;
  1026. struct dma_iso_ctx *d;
  1027. int i;
  1029. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  1030. return -EFAULT;
  1032. d = find_ctx(&ctx->context_list, OHCI_ISO_RECEIVE, v.channel);
  1034. if ((v.buffer<0) || (v.buffer>d->num_desc)) {
  1035. PRINT(KERN_ERR, ohci->id, 
  1036.       "Buffer %d out of range",v.buffer);
  1037. return -EFAULT;
  1038. }
  1040. /*
  1041.  * I change the way it works so that it returns 
  1042.  * the last received frame.
  1043.  */
  1044. spin_lock_irqsave(&d->lock, flags);
  1045. switch(d->buffer_status[v.buffer]) {
  1046. case VIDEO1394_BUFFER_READY:
  1047. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
  1048. break;
  1049. case VIDEO1394_BUFFER_QUEUED:
  1050. if (cmd == VIDEO1394_LISTEN_POLL_BUFFER) {
  1051.     /* for polling, return error code EINTR */
  1052.     spin_unlock_irqrestore(&d->lock, flags);
  1053.     return -EINTR;
  1054. }
  1056. #if 1
  1057. while(d->buffer_status[v.buffer]!=
  1058.       VIDEO1394_BUFFER_READY) {
  1059. spin_unlock_irqrestore(&d->lock, flags);
  1060. interruptible_sleep_on(&d->waitq);
  1061. spin_lock_irqsave(&d->lock, flags);
  1062. if(signal_pending(current)) {
  1063. spin_unlock_irqrestore(&d->lock,flags);
  1064. return -EINTR;
  1065. }
  1066. }
  1067. #else
  1068. if (wait_event_interruptible(d->waitq, 
  1069.      d->buffer_status[v.buffer]
  1070.      == VIDEO1394_BUFFER_READY)
  1071.     == -ERESTARTSYS)
  1072. return -EINTR;
  1073. #endif
  1074. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
  1075. break;
  1076. default:
  1077. PRINT(KERN_ERR, ohci->id, 
  1078.       "Buffer %d is not queued",v.buffer);
  1079. spin_unlock_irqrestore(&d->lock, flags);
  1080. return -EFAULT;
  1081. }
  1083. /* set time of buffer */
  1084. v.filltime = d->buffer_time[v.buffer];
  1085. // printk("Buffer %d time %dn", v.buffer, (d->buffer_time[v.buffer]).tv_usec);
  1087. /*
  1088.  * Look ahead to see how many more buffers have been received
  1089.  */
  1090. i=0;
  1091. while (d->buffer_status[(v.buffer+1)%d->num_desc]==
  1092.        VIDEO1394_BUFFER_READY) {
  1093. v.buffer=(v.buffer+1)%d->num_desc;
  1094. i++;
  1095. }
  1096. spin_unlock_irqrestore(&d->lock, flags);
  1098. v.buffer=i;
  1099. if(copy_to_user((void *)arg, &v, sizeof(v)))
  1100. return -EFAULT;
  1102. return 0;
  1103. }
  1104. case VIDEO1394_TALK_QUEUE_BUFFER:
  1105. {
  1106. struct video1394_wait v;
  1107. struct video1394_queue_variable qv;
  1108. struct dma_iso_ctx *d;
  1110. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  1111. return -EFAULT;
  1113. d = find_ctx(&ctx->context_list, OHCI_ISO_TRANSMIT, v.channel);
  1115. if ((v.buffer<0) || (v.buffer>d->num_desc)) {
  1116. PRINT(KERN_ERR, ohci->id, 
  1117.       "Buffer %d out of range",v.buffer);
  1118. return -EFAULT;
  1119. }
  1121. if (d->flags & VIDEO1394_VARIABLE_PACKET_SIZE) {
  1122. if (copy_from_user(&qv, (void *)arg, sizeof(qv))) 
  1123. return -EFAULT;
  1124. if (!access_ok(VERIFY_READ, qv.packet_sizes, 
  1125.        d->nb_cmd * sizeof(unsigned int))) {
  1126. return -EFAULT;
  1127. }
  1128. }
  1130. spin_lock_irqsave(&d->lock,flags);
  1132. if (d->buffer_status[v.buffer]!=VIDEO1394_BUFFER_FREE) {
  1133. PRINT(KERN_ERR, ohci->id, 
  1134.       "Buffer %d is already used",v.buffer);
  1135. spin_unlock_irqrestore(&d->lock,flags);
  1136. return -EFAULT;
  1137. }
  1139. if (d->flags & VIDEO1394_VARIABLE_PACKET_SIZE) {
  1140. initialize_dma_it_prg_var_packet_queue(
  1141. d, v.buffer, qv.packet_sizes,
  1142. ohci);
  1143. }
  1145. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_QUEUED;
  1147. if (d->last_buffer>=0) {
  1148. d->it_prg[d->last_buffer]
  1149. [ d->last_used_cmd[d->last_buffer]
  1150. ].end.branchAddress = 
  1151. cpu_to_le32((virt_to_bus(&(d->it_prg[v.buffer][0].begin.control)) 
  1152.  & 0xfffffff0) | 0x3);
  1154. d->it_prg[d->last_buffer]
  1155. [d->last_used_cmd[d->last_buffer]
  1156. ].begin.branchAddress = 
  1157. cpu_to_le32((virt_to_bus(&(d->it_prg[v.buffer][0].begin.control)) 
  1158.  & 0xfffffff0) | 0x3);
  1159. d->next_buffer[d->last_buffer] = v.buffer;
  1160. }
  1161. d->last_buffer = v.buffer;
  1162. d->next_buffer[d->last_buffer] = -1;
  1164. d->it_prg[d->last_buffer][d->last_used_cmd[d->last_buffer]].end.branchAddress = 0;
  1166. spin_unlock_irqrestore(&d->lock,flags);
  1168. if (!(reg_read(ohci, d->ctrlSet) & 0x8000)) 
  1169. {
  1170. DBGMSG(ohci->id, "Starting iso transmit DMA ctx=%d",
  1171.        d->ctx);
  1172. put_timestamp(ohci, d, d->last_buffer);
  1174. /* Tell the controller where the first program is */
  1175. reg_write(ohci, d->cmdPtr, 
  1176.   virt_to_bus(&(d->it_prg[v.buffer][0]))|0x3);
  1178. /* Run IT context */
  1179. reg_write(ohci, d->ctrlSet, 0x8000);
  1180. }
  1181. else {
  1182. /* Wake up dma context if necessary */
  1183. if (!(reg_read(ohci, d->ctrlSet) & 0x400)) {
  1184. PRINT(KERN_INFO, ohci->id, 
  1185.       "Waking up iso transmit dma ctx=%d", 
  1186.       d->ctx);
  1187. put_timestamp(ohci, d, d->last_buffer);
  1188. reg_write(ohci, d->ctrlSet, 0x1000);
  1189. }
  1190. }
  1191. return 0;
  1193. }
  1194. case VIDEO1394_TALK_WAIT_BUFFER:
  1195. {
  1196. struct video1394_wait v;
  1197. struct dma_iso_ctx *d;
  1199. if(copy_from_user(&v, (void *)arg, sizeof(v)))
  1200. return -EFAULT;
  1202. d = find_ctx(&ctx->context_list, OHCI_ISO_TRANSMIT, v.channel);
  1204. if ((v.buffer<0) || (v.buffer>d->num_desc)) {
  1205. PRINT(KERN_ERR, ohci->id, 
  1206.       "Buffer %d out of range",v.buffer);
  1207. return -EFAULT;
  1208. }
  1210. switch(d->buffer_status[v.buffer]) {
  1211. case VIDEO1394_BUFFER_READY:
  1212. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
  1213. return 0;
  1214. case VIDEO1394_BUFFER_QUEUED:
  1215. #if 1
  1216. while(d->buffer_status[v.buffer]!=
  1217.       VIDEO1394_BUFFER_READY) {
  1218. interruptible_sleep_on(&d->waitq);
  1219. if(signal_pending(current)) return -EINTR;
  1220. }
  1221. #else
  1222. if (wait_event_interruptible(d->waitq, 
  1223.      d->buffer_status[v.buffer]
  1224.      == VIDEO1394_BUFFER_READY)
  1225.     == -ERESTARTSYS)
  1226. return -EINTR;
  1227. #endif
  1228. d->buffer_status[v.buffer]=VIDEO1394_BUFFER_FREE;
  1229. return 0;
  1230. default:
  1231. PRINT(KERN_ERR, ohci->id, 
  1232.       "Buffer %d is not queued",v.buffer);
  1233. return -EFAULT;
  1234. }
  1235. }
  1236. default:
  1237. return -EINVAL;
  1238. }
  1239. }
  1241. /*
  1242.  * This maps the vmalloced and reserved buffer to user space.
  1243.  *
  1244.  *  FIXME: 
  1245.  *  - PAGE_READONLY should suffice!?
  1246.  *  - remap_page_range is kind of inefficient for page by page remapping.
  1247.  *    But e.g. pte_alloc() does not work in modules ... :-(
  1248.  */
  1250. int video1394_mmap(struct file *file, struct vm_area_struct *vma)
  1251. {
  1252. struct file_ctx *ctx = (struct file_ctx *)file->private_data;
  1253. struct video_card *video = ctx->video;
  1254. struct ti_ohci *ohci = video->ohci;
  1255. int res = -EINVAL;
  1257. lock_kernel();
  1258. ohci = video->ohci;
  1260. if (ctx->current_ctx == NULL) {
  1261. PRINT(KERN_ERR, ohci->id, "Current iso context not set");
  1262. } else
  1263. res = do_iso_mmap(ohci, ctx->current_ctx, vma);
  1264. unlock_kernel();
  1265. return res;
  1266. }
  1268. static int video1394_open(struct inode *inode, struct file *file)
  1269. {
  1270. int i = ieee1394_file_to_instance(file);
  1271. unsigned long flags;
  1272. struct video_card *video = NULL;
  1273. struct list_head *lh;
  1274. struct file_ctx *ctx;
  1276. spin_lock_irqsave(&video1394_cards_lock, flags);
  1277. list_for_each(lh, &video1394_cards) {
  1278. struct video_card *p = list_entry(lh, struct video_card, list);
  1279. if (p->id == i) {
  1280. video = p;
  1281. break;
  1282. }
  1283. }
  1284. spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1286.         if (video == NULL)
  1287.                 return -EIO;
  1289. ctx = kmalloc(sizeof(struct file_ctx), GFP_KERNEL);
  1290. if (ctx == NULL)  {
  1291. PRINT(KERN_ERR, video->ohci->id, "Cannot malloc file_ctx");
  1292. return -ENOMEM;
  1293. }
  1295. memset(ctx, 0, sizeof(struct file_ctx));
  1296. ctx->video = video;
  1297. INIT_LIST_HEAD(&ctx->context_list);
  1298. ctx->current_ctx = NULL;
  1299. file->private_data = ctx;
  1301. return 0;
  1302. }
  1304. static int video1394_release(struct inode *inode, struct file *file)
  1305. {
  1306. struct file_ctx *ctx = (struct file_ctx *)file->private_data;
  1307. struct video_card *video = ctx->video;
  1308. struct ti_ohci *ohci = video->ohci;
  1309. struct list_head *lh, *next;
  1310. u64 mask;
  1312. lock_kernel();
  1313. list_for_each_safe(lh, next, &ctx->context_list) {
  1314. struct dma_iso_ctx *d;
  1315. d = list_entry(lh, struct dma_iso_ctx, link);
  1316. mask = (u64) 1 << d->channel;
  1318. if (!(ohci->ISO_channel_usage & mask))
  1319. PRINT(KERN_ERR, ohci->id, "On release: Channel %d "
  1320.       "is not being used", d->channel);
  1321. else
  1322. ohci->ISO_channel_usage &= ~mask;
  1323. PRINT(KERN_INFO, ohci->id, "On release: Iso %s context "
  1324.       "%d stop listening on channel %d",
  1325.       d->type == OHCI_ISO_RECEIVE ? "receive" : "transmit",
  1326.       d->ctx, d->channel);
  1327. free_dma_iso_ctx(d);
  1328. }
  1330. kfree(ctx);
  1331. file->private_data = NULL;
  1333. unlock_kernel();
  1334. return 0;
  1335. }
  1337. static struct file_operations video1394_fops=
  1338. {
  1339. .owner = THIS_MODULE,
  1340. .ioctl = video1394_ioctl,
  1341. .mmap = video1394_mmap,
  1342. .open = video1394_open,
  1343. .release = video1394_release
  1344. };
  1346. static int video1394_init(struct ti_ohci *ohci)
  1347. {
  1348. struct video_card *video;
  1349. unsigned long flags;
  1350. char name[16];
  1351. int minor;
  1353. video = kmalloc(sizeof(struct video_card), GFP_KERNEL);
  1354. if (video == NULL) {
  1355. PRINT(KERN_ERR, ohci->id, "Cannot allocate video_card");
  1356. return -1;
  1357. }
  1359. memset(video, 0, sizeof(struct video_card));
  1361. spin_lock_irqsave(&video1394_cards_lock, flags);
  1362. INIT_LIST_HEAD(&video->list);
  1363. list_add_tail(&video->list, &video1394_cards);
  1364. spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1366. video->id = ohci->id;
  1367. video->ohci = ohci;
  1369. sprintf(name, "%d", video->id);
  1370. minor = IEEE1394_MINOR_BLOCK_VIDEO1394 * 16 + video->id;
  1371. video->devfs = devfs_register(devfs_handle, name,
  1372.       DEVFS_FL_AUTO_OWNER,
  1373.       IEEE1394_MAJOR, minor,
  1374.       S_IFCHR | S_IRUSR | S_IWUSR,
  1375.       &video1394_fops, NULL);
  1377. return 0;
  1378. }
  1380. /* Must be called under spinlock */
  1381. static void remove_card(struct video_card *video)
  1382. {
  1383. devfs_unregister(video->devfs);
  1384. list_del(&video->list);
  1386. kfree(video);
  1387. }
  1389. static void video1394_remove_host (struct hpsb_host *host)
  1390. {
  1391. struct ti_ohci *ohci;
  1392. unsigned long flags;
  1393. struct list_head *lh, *next;
  1394. struct video_card *p;
  1396. /* We only work with the OHCI-1394 driver */
  1397. if (strcmp(host->driver->name, OHCI1394_DRIVER_NAME))
  1398. return;
  1400. ohci = (struct ti_ohci *)host->hostdata;
  1402.         spin_lock_irqsave(&video1394_cards_lock, flags);
  1403. list_for_each_safe(lh, next, &video1394_cards) {
  1404. p = list_entry(lh, struct video_card, list);
  1405. if (p->ohci == ohci) {
  1406. remove_card(p);
  1407. break;
  1408. }
  1409. }
  1410. spin_unlock_irqrestore(&video1394_cards_lock, flags);
  1412. return;
  1413. }
  1415. static void video1394_add_host (struct hpsb_host *host)
  1416. {
  1417. struct ti_ohci *ohci;
  1419. /* We only work with the OHCI-1394 driver */
  1420. if (strcmp(host->driver->name, OHCI1394_DRIVER_NAME))
  1421. return;
  1423. ohci = (struct ti_ohci *)host->hostdata;
  1425. video1394_init(ohci);
  1427. return;
  1428. }
  1430. static struct hpsb_highlevel_ops hl_ops = {
  1431. .add_host = video1394_add_host,
  1432. .remove_host = video1394_remove_host,
  1433. };
  1435. MODULE_AUTHOR("Sebastien Rougeaux <sebastien.rougeaux@anu.edu.au>");
  1436. MODULE_DESCRIPTION("driver for digital video on OHCI board");
  1437. MODULE_SUPPORTED_DEVICE(VIDEO1394_DRIVER_NAME);
  1438. MODULE_LICENSE("GPL");
  1440. static void __exit video1394_exit_module (void)
  1441. {
  1442. hpsb_unregister_highlevel (hl_handle);
  1444. devfs_unregister(devfs_handle);
  1445. ieee1394_unregister_chardev(IEEE1394_MINOR_BLOCK_VIDEO1394);
  1447. PRINT_G(KERN_INFO, "Removed " VIDEO1394_DRIVER_NAME " module");
  1448. }
  1450. static int __init video1394_init_module (void)
  1451. {
  1452. if (ieee1394_register_chardev(IEEE1394_MINOR_BLOCK_VIDEO1394,
  1453.       THIS_MODULE, &video1394_fops)) {
  1454. PRINT_G(KERN_ERR, "video1394: unable to get minor device block");
  1455.   return -EIO;
  1456.   }
  1458. #if LINUX_VERSION_CODE < KERNEL_VERSION(2,3,0)
  1459. devfs_handle = devfs_mk_dir(NULL, VIDEO1394_DRIVER_NAME,
  1460. strlen(VIDEO1394_DRIVER_NAME), NULL);
  1461. #else
  1462. devfs_handle = devfs_mk_dir(NULL, VIDEO1394_DRIVER_NAME, NULL);
  1463. #endif
  1465. hl_handle = hpsb_register_highlevel (VIDEO1394_DRIVER_NAME, &hl_ops);
  1466. if (hl_handle == NULL) {
  1467. PRINT_G(KERN_ERR, "No more memory for drivern");
  1468. devfs_unregister(devfs_handle);
  1469. ieee1394_unregister_chardev(IEEE1394_MINOR_BLOCK_VIDEO1394);
  1470. return -ENOMEM;
  1471. }
  1473. PRINT_G(KERN_INFO, "Installed " VIDEO1394_DRIVER_NAME " module");
  1474. return 0;
  1475. }
  1477. module_init(video1394_init_module);
  1478. module_exit(video1394_exit_module);