zr36120.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:54k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /*
  2.     zr36120.c - Zoran 36120/36125 based framegrabbers
  3.     Copyright (C) 1998-1999 Pauline Middelink <middelin@polyware.nl>
  4.     This program is free software; you can redistribute it and/or modify
  5.     it under the terms of the GNU General Public License as published by
  6.     the Free Software Foundation; either version 2 of the License, or
  7.     (at your option) any later version.
  8.     This program is distributed in the hope that it will be useful,
  9.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  10.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11.     GNU General Public License for more details.
  12.     You should have received a copy of the GNU General Public License
  13.     along with this program; if not, write to the Free Software
  14.     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  15. */
  16. #include <linux/module.h>
  17. #include <linux/delay.h>
  18. #include <linux/init.h>
  19. #include <linux/errno.h>
  20. #include <linux/fs.h>
  21. #include <linux/kernel.h>
  22. #include <linux/major.h>
  23. #include <linux/slab.h>
  24. #include <linux/vmalloc.h>
  25. #include <linux/mm.h>
  26. #include <linux/pci.h>
  27. #include <linux/signal.h>
  28. #include <asm/io.h>
  29. #include <asm/pgtable.h>
  30. #include <asm/page.h>
  31. #include <linux/sched.h>
  32. #include <linux/video_decoder.h>
  33. #include <asm/segment.h>
  34. #include <linux/version.h>
  35. #include <asm/uaccess.h>
  36. #include "tuner.h"
  37. #include "zr36120.h"
  38. #include "zr36120_mem.h"
  39. /* mark an required function argument unused - lintism */
  40. #define UNUSED(x) (void)(x)
  41. /* sensible default */
  42. #ifndef CARDTYPE
  43. #define CARDTYPE 0
  44. #endif
  45. /* Anybody who uses more than four? */
  46. #define ZORAN_MAX 4
  47. static unsigned int triton1=0; /* triton1 chipset? */
  48. static unsigned int cardtype[ZORAN_MAX]={ [ 0 ... ZORAN_MAX-1 ] = CARDTYPE };
  49. static int video_nr = -1;
  50. static int vbi_nr = -1;
  51. static struct pci_device_id zr36120_pci_tbl[] = {
  52. { PCI_VENDOR_ID_ZORAN,PCI_DEVICE_ID_ZORAN_36120,
  53.   PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0 },
  54. { 0 }
  55. };
  56. MODULE_DEVICE_TABLE(pci, zr36120_pci_tbl);
  57. MODULE_AUTHOR("Pauline Middelink <middelin@polyware.nl>");
  58. MODULE_DESCRIPTION("Zoran ZR36120 based framegrabber");
  59. MODULE_LICENSE("GPL");
  60. MODULE_PARM(triton1,"i");
  61. MODULE_PARM(cardtype,"1-" __MODULE_STRING(ZORAN_MAX) "i");
  62. MODULE_PARM(video_nr,"i");
  63. MODULE_PARM(vbi_nr,"i");
  64. static int zoran_cards;
  65. static struct zoran zorans[ZORAN_MAX];
  66. /*
  67.  * the meaning of each element can be found in zr36120.h
  68.  * Determining the value of gpdir/gpval can be tricky. The
  69.  * best way is to run the card under the original software
  70.  * and read the values from the general purpose registers
  71.  * 0x28 and 0x2C. How you do that is left as an exercise
  72.  * to the impatient reader :)
  73.  */
  74. #define T 1 /* to seperate the bools from the ints */
  75. #define F 0
  76. static struct tvcard tvcards[] = {
  77. /* reported working by <middelin@polyware.nl> */
  78. /*0*/ { "Trust Victor II",
  79.   2, 0, T, T, T, T, 0x7F, 0x80, { 1, SVHS(6) }, { 0 } },
  80. /* reported working by <Michael.Paxton@aihw.gov.au>  */
  81. /*1*/   { "Aitech WaveWatcher TV-PCI",
  82.   3, 0, T, F, T, T, 0x7F, 0x80, { 1, TUNER(3), SVHS(6) }, { 0 } },
  83. /* reported working by ? */
  84. /*2*/ { "Genius Video Wonder PCI Video Capture Card",
  85.   2, 0, T, T, T, T, 0x7F, 0x80, { 1, SVHS(6) }, { 0 } },
  86. /* reported working by <Pascal.Gabriel@wanadoo.fr> */
  87. /*3*/ { "Guillemot Maxi-TV PCI",
  88.   2, 0, T, T, T, T, 0x7F, 0x80, { 1, SVHS(6) }, { 0 } },
  89. /* reported working by "Craig Whitmore <lennon@igrin.co.nz> */
  90. /*4*/ { "Quadrant Buster",
  91.   3, 3, T, F, T, T, 0x7F, 0x80, { SVHS(1), TUNER(2), 3 }, { 1, 2, 3 } },
  92. /* a debug entry which has all inputs mapped */
  93. /*5*/ { "ZR36120 based framegrabber (all inputs enabled)",
  94.   6, 0, T, T, T, T, 0x7F, 0x80, { 1, 2, 3, 4, 5, 6 }, { 0 } }
  95. };
  96. #undef T
  97. #undef F
  98. #define NRTVCARDS (sizeof(tvcards)/sizeof(tvcards[0]))
  99. #ifdef __sparc__
  100. #define ENDIANESS 0
  101. #else
  102. #define ENDIANESS ZORAN_VFEC_LE
  103. #endif
  104. static struct { const char name[8]; uint mode; uint bpp; } palette2fmt[] = {
  105. /* n/a     */ { "n/a",     0, 0 },
  106. /* GREY    */ { "GRAY",    0, 0 },
  107. /* HI240   */ { "HI240",   0, 0 },
  108. /* RGB565  */ { "RGB565",  ZORAN_VFEC_RGB_RGB565|ENDIANESS, 2 },
  109. /* RGB24   */ { "RGB24",   ZORAN_VFEC_RGB_RGB888|ENDIANESS|ZORAN_VFEC_PACK24, 3 },
  110. /* RGB32   */ { "RGB32",   ZORAN_VFEC_RGB_RGB888|ENDIANESS, 4 },
  111. /* RGB555  */ { "RGB555",  ZORAN_VFEC_RGB_RGB555|ENDIANESS, 2 },
  112. /* YUV422  */ { "YUV422",  ZORAN_VFEC_RGB_YUV422|ENDIANESS, 2 },
  113. /* YUYV    */ { "YUYV",    0, 0 },
  114. /* UYVY    */ { "UYVY",    0, 0 },
  115. /* YUV420  */ { "YUV420",  0, 0 },
  116. /* YUV411  */ { "YUV411",  0, 0 },
  117. /* RAW     */ { "RAW",     0, 0 },
  118. /* YUV422P */ { "YUV422P", 0, 0 },
  119. /* YUV411P */ { "YUV411P", 0, 0 }};
  120. #define NRPALETTES (sizeof(palette2fmt)/sizeof(palette2fmt[0]))
  121. #undef ENDIANESS
  122. /* ----------------------------------------------------------------------- */
  123. /* ZORAN chipset detector                                                 */
  124. /* shamelessly stolen from bttv.c                                         */
  125. /* Reason for beeing here: we need to detect if we are running on a        */
  126. /* Triton based chipset, and if so, enable a certain bit                   */
  127. /* ----------------------------------------------------------------------- */
  128. static
  129. void __init handle_chipset(void)
  130. {
  131. struct pci_dev *dev = NULL;
  132. /* Just in case some nut set this to something dangerous */
  133. if (triton1)
  134. triton1 = ZORAN_VDC_TRICOM;
  135. while ((dev = pci_find_device(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL_82437, dev)))
  136. {
  137. printk(KERN_INFO "zoran: Host bridge 82437FX Triton PIIXn");
  138. triton1 = ZORAN_VDC_TRICOM;
  139. }
  140. }
  141. /* ----------------------------------------------------------------------- */
  142. /* ZORAN functions    */
  143. /* ----------------------------------------------------------------------- */
  144. static void zoran_set_geo(struct zoran* ztv, struct vidinfo* i);
  145. #if 0 /* unused */
  146. static
  147. void zoran_dump(struct zoran *ztv)
  148. {
  149. char str[256];
  150. char *p=str; /* shut up, gcc! */
  151. int i;
  152. for (i=0; i<0x60; i+=4) {
  153. if ((i % 16) == 0) {
  154. if (i) printk("%sn",str);
  155. p = str;
  156. p+= sprintf(str, KERN_DEBUG "       %04x: ",i);
  157. }
  158. p += sprintf(p, "%08x ",zrread(i));
  159. }
  160. }
  161. #endif /* unused */
  162. static
  163. void reap_states(struct zoran* ztv)
  164. {
  165. /* count frames */
  166. ztv->fieldnr++;
  167. /*
  168.  * Are we busy at all?
  169.  * This depends on if there is a workqueue AND the
  170.  * videotransfer is enabled on the chip...
  171.  */
  172. if (ztv->workqueue && (zrread(ZORAN_VDC) & ZORAN_VDC_VIDEN))
  173. {
  174. struct vidinfo* newitem;
  175. /* did we get a complete frame? */
  176. if (zrread(ZORAN_VSTR) & ZORAN_VSTR_GRAB)
  177. return;
  178. DEBUG(printk(CARD_DEBUG "completed %s at %pn",CARD,ztv->workqueue->kindof==FBUFFER_GRAB?"grab":"read",ztv->workqueue));
  179. /* we are done with this buffer, tell everyone */
  180. ztv->workqueue->status = FBUFFER_DONE;
  181. ztv->workqueue->fieldnr = ztv->fieldnr;
  182. /* not good, here for BTTV_FIELDNR reasons */
  183. ztv->lastfieldnr = ztv->fieldnr;
  184. switch (ztv->workqueue->kindof) {
  185.  case FBUFFER_GRAB:
  186. wake_up_interruptible(&ztv->grabq);
  187. break;
  188.  case FBUFFER_VBI:
  189. wake_up_interruptible(&ztv->vbiq);
  190. break;
  191.  default:
  192. printk(CARD_INFO "somebody killed the workqueue (kindof=%d)!n",CARD,ztv->workqueue->kindof);
  193. }
  194. /* item completed, skip to next item in queue */
  195. write_lock(&ztv->lock);
  196. newitem = ztv->workqueue->next;
  197. ztv->workqueue->next = 0; /* mark completed */
  198. ztv->workqueue = newitem;
  199. write_unlock(&ztv->lock);
  200. }
  201. /*
  202.  * ok, so it seems we have nothing in progress right now.
  203.  * Lets see if we can find some work.
  204.  */
  205. if (ztv->workqueue)
  206. {
  207. struct vidinfo* newitem;
  208. again:
  209. DEBUG(printk(CARD_DEBUG "starting %s at %pn",CARD,ztv->workqueue->kindof==FBUFFER_GRAB?"grab":"read",ztv->workqueue));
  210. /* loadup the frame settings */
  211. read_lock(&ztv->lock);
  212. zoran_set_geo(ztv,ztv->workqueue);
  213. read_unlock(&ztv->lock);
  214. switch (ztv->workqueue->kindof) {
  215.  case FBUFFER_GRAB:
  216.  case FBUFFER_VBI:
  217. zrand(~ZORAN_OCR_OVLEN, ZORAN_OCR);
  218. zror(ZORAN_VSTR_SNAPSHOT,ZORAN_VSTR);
  219. zror(ZORAN_VDC_VIDEN,ZORAN_VDC);
  220. /* start single-shot grab */
  221. zror(ZORAN_VSTR_GRAB, ZORAN_VSTR);
  222. break;
  223.  default:
  224. printk(CARD_INFO "what is this doing on the queue? (kindof=%d)n",CARD,ztv->workqueue->kindof);
  225. write_lock(&ztv->lock);
  226. newitem = ztv->workqueue->next;
  227. ztv->workqueue->next = 0;
  228. ztv->workqueue = newitem;
  229. write_unlock(&ztv->lock);
  230. if (newitem)
  231. goto again; /* yeah, sure.. */
  232. }
  233. /* bye for now */
  234. return;
  235. }
  236. DEBUG(printk(CARD_DEBUG "nothing in queuen",CARD));
  237. /*
  238.  * What? Even the workqueue is empty? Am i really here
  239.  * for nothing? Did i come all that way to... do nothing?
  240.  */
  241. /* do we need to overlay? */
  242. if (test_bit(STATE_OVERLAY, &ztv->state))
  243. {
  244. /* are we already overlaying? */
  245. if (!(zrread(ZORAN_OCR) & ZORAN_OCR_OVLEN) ||
  246.     !(zrread(ZORAN_VDC) & ZORAN_VDC_VIDEN))
  247. {
  248. DEBUG(printk(CARD_DEBUG "starting overlayn",CARD));
  249. read_lock(&ztv->lock);
  250. zoran_set_geo(ztv,&ztv->overinfo);
  251. read_unlock(&ztv->lock);
  252. zror(ZORAN_OCR_OVLEN, ZORAN_OCR);
  253. zrand(~ZORAN_VSTR_SNAPSHOT,ZORAN_VSTR);
  254. zror(ZORAN_VDC_VIDEN,ZORAN_VDC);
  255. }
  256. /*
  257.  * leave overlaying on, but turn interrupts off.
  258.  */
  259. zrand(~ZORAN_ICR_EN,ZORAN_ICR);
  260. return;
  261. }
  262. /* do we have any VBI idle time processing? */
  263. if (test_bit(STATE_VBI, &ztv->state))
  264. {
  265. struct vidinfo* item;
  266. struct vidinfo* lastitem;
  267. /* protect the workqueue */
  268. write_lock(&ztv->lock);
  269. lastitem = ztv->workqueue;
  270. if (lastitem)
  271. while (lastitem->next) lastitem = lastitem->next;
  272. for (item=ztv->readinfo; item!=ztv->readinfo+ZORAN_VBI_BUFFERS; item++)
  273. if (item->next == 0 && item->status == FBUFFER_FREE)
  274. {
  275. DEBUG(printk(CARD_DEBUG "%p added to queuen",CARD,item));
  276. item->status = FBUFFER_BUSY;
  277. if (!lastitem)
  278. ztv->workqueue = item;
  279. else 
  280. lastitem->next = item;
  281. lastitem = item;
  282. }
  283. write_unlock(&ztv->lock);
  284. if (ztv->workqueue)
  285. goto again; /* hey, _i_ graduated :) */
  286. }
  287. /*
  288.  * Then we must be realy IDLE
  289.  */
  290. DEBUG(printk(CARD_DEBUG "turning offn",CARD));
  291. /* nothing further to do, disable DMA and further IRQs */
  292. zrand(~ZORAN_VDC_VIDEN,ZORAN_VDC);
  293. zrand(~ZORAN_ICR_EN,ZORAN_ICR);
  294. }
  295. static
  296. void zoran_irq(int irq, void *dev_id, struct pt_regs * regs)
  297. {
  298. u32 stat,estat;
  299. int count = 0;
  300. struct zoran *ztv = (struct zoran *)dev_id;
  301. UNUSED(irq); UNUSED(regs);
  302. for (;;) {
  303. /* get/clear interrupt status bits */
  304. stat=zrread(ZORAN_ISR);
  305. estat=stat & zrread(ZORAN_ICR);
  306. if (!estat)
  307. return;
  308. zrwrite(estat,ZORAN_ISR);
  309. IDEBUG(printk(CARD_DEBUG "estat %08xn",CARD,estat));
  310. IDEBUG(printk(CARD_DEBUG " stat %08xn",CARD,stat));
  311. if (estat & ZORAN_ISR_CODE)
  312. {
  313. IDEBUG(printk(CARD_DEBUG "CodReplIRQn",CARD));
  314. }
  315. if (estat & ZORAN_ISR_GIRQ0)
  316. {
  317. IDEBUG(printk(CARD_DEBUG "GIRQ0n",CARD));
  318. if (!ztv->card->usegirq1)
  319. reap_states(ztv);
  320. }
  321. if (estat & ZORAN_ISR_GIRQ1)
  322. {
  323. IDEBUG(printk(CARD_DEBUG "GIRQ1n",CARD));
  324. if (ztv->card->usegirq1)
  325. reap_states(ztv);
  326. }
  327. count++;
  328. if (count > 10)
  329. printk(CARD_ERR "irq loop %d (%x)n",CARD,count,estat);
  330. if (count > 20)
  331. {
  332. zrwrite(0, ZORAN_ICR);
  333. printk(CARD_ERR "IRQ lockup, cleared int maskn",CARD);
  334. }
  335. }
  336. }
  337. static
  338. int zoran_muxsel(struct zoran* ztv, int channel, int norm)
  339. {
  340. int rv;
  341. /* set the new video norm */
  342. rv = i2c_control_device(&(ztv->i2c), I2C_DRIVERID_VIDEODECODER, DECODER_SET_NORM, &norm);
  343. if (rv)
  344. return rv;
  345. ztv->norm = norm;
  346. /* map the given channel to the cards decoder's channel */
  347. channel = ztv->card->video_mux[channel] & CHANNEL_MASK;
  348. /* set the new channel */
  349. rv = i2c_control_device(&(ztv->i2c), I2C_DRIVERID_VIDEODECODER, DECODER_SET_INPUT, &channel);
  350. return rv;
  351. }
  352. /* Tell the interrupt handler what to to.  */
  353. static
  354. void zoran_cap(struct zoran* ztv, int on)
  355. {
  356. DEBUG(printk(CARD_DEBUG "zoran_cap(%d) state=%xn",CARD,on,ztv->state));
  357. if (on) {
  358. ztv->running = 1;
  359. /*
  360.  * turn interrupts (back) on. The DMA will be enabled
  361.  * inside the irq handler when it detects a restart.
  362.  */
  363. zror(ZORAN_ICR_EN,ZORAN_ICR);
  364. }
  365. else {
  366. /*
  367.  * turn both interrupts and DMA off
  368.  */
  369. zrand(~ZORAN_VDC_VIDEN,ZORAN_VDC);
  370. zrand(~ZORAN_ICR_EN,ZORAN_ICR);
  371. ztv->running = 0;
  372. }
  373. }
  374. static ulong dmask[] = {
  375. 0xFFFFFFFF, 0xFFFFFFFE, 0xFFFFFFFC, 0xFFFFFFF8,
  376. 0xFFFFFFF0, 0xFFFFFFE0, 0xFFFFFFC0, 0xFFFFFF80,
  377. 0xFFFFFF00, 0xFFFFFE00, 0xFFFFFC00, 0xFFFFF800,
  378. 0xFFFFF000, 0xFFFFE000, 0xFFFFC000, 0xFFFF8000,
  379. 0xFFFF0000, 0xFFFE0000, 0xFFFC0000, 0xFFF80000,
  380. 0xFFF00000, 0xFFE00000, 0xFFC00000, 0xFF800000,
  381. 0xFF000000, 0xFE000000, 0xFC000000, 0xF8000000,
  382. 0xF0000000, 0xE0000000, 0xC0000000, 0x80000000
  383. };
  384. static
  385. void zoran_built_overlay(struct zoran* ztv, int count, struct video_clip *vcp)
  386. {
  387. ulong* mtop;
  388. int ystep = (ztv->vidXshift + ztv->vidWidth+31)/32; /* next DWORD */
  389. int i;
  390. DEBUG(printk(KERN_DEBUG "       overlay at %p, ystep=%d, clips=%dn",ztv->overinfo.overlay,ystep,count));
  391. for (i=0; i<count; i++) {
  392. struct video_clip *vp = vcp+i;
  393. UNUSED(vp);
  394. DEBUG(printk(KERN_DEBUG "       %d: clip(%d,%d,%d,%d)n", i,vp->x,vp->y,vp->width,vp->height));
  395. }
  396. /*
  397.  * activate the visible portion of the screen
  398.  * Note we take some shortcuts here, because we
  399.  * know the width can never be < 32. (I.e. a DWORD)
  400.  * We also assume the overlay starts somewhere in
  401.  * the FIRST dword.
  402.  */
  403. {
  404. int start = ztv->vidXshift;
  405. ulong firstd = dmask[start];
  406. ulong lastd = ~dmask[(start + ztv->overinfo.w) & 31];
  407. mtop = ztv->overinfo.overlay;
  408. for (i=0; i<ztv->overinfo.h; i++) {
  409. int w = ztv->vidWidth;
  410. ulong* line = mtop;
  411. if (start & 31) {
  412. *line++ = firstd;
  413. w -= 32-(start&31);
  414. }
  415. memset(line, ~0, w/8);
  416. if (w & 31)
  417. line[w/32] = lastd;
  418. mtop += ystep;
  419. }
  420. }
  421. /* process clipping regions */
  422. for (i=0; i<count; i++) {
  423. int h;
  424. if (vcp->x < 0 || (uint)vcp->x > ztv->overinfo.w ||
  425.     vcp->y < 0 || vcp->y > ztv->overinfo.h ||
  426.     vcp->width < 0 || (uint)(vcp->x+vcp->width) > ztv->overinfo.w ||
  427.     vcp->height < 0 || (vcp->y+vcp->height) > ztv->overinfo.h)
  428. {
  429. DEBUG(printk(CARD_DEBUG "illegal clipzone (%d,%d,%d,%d) not in (0,0,%d,%d), adaptingn",CARD,vcp->x,vcp->y,vcp->width,vcp->height,ztv->overinfo.w,ztv->overinfo.h));
  430. if (vcp->x < 0) vcp->x = 0;
  431. if ((uint)vcp->x > ztv->overinfo.w) vcp->x = ztv->overinfo.w;
  432. if (vcp->y < 0) vcp->y = 0;
  433. if (vcp->y > ztv->overinfo.h) vcp->y = ztv->overinfo.h;
  434. if (vcp->width < 0) vcp->width = 0;
  435. if ((uint)(vcp->x+vcp->width) > ztv->overinfo.w) vcp->width = ztv->overinfo.w - vcp->x;
  436. if (vcp->height < 0) vcp->height = 0;
  437. if (vcp->y+vcp->height > ztv->overinfo.h) vcp->height = ztv->overinfo.h - vcp->y;
  438. // continue;
  439. }
  440. mtop = &ztv->overinfo.overlay[vcp->y*ystep];
  441. for (h=0; h<=vcp->height; h++) {
  442. int w;
  443. int x = ztv->vidXshift + vcp->x;
  444. for (w=0; w<=vcp->width; w++) {
  445. clear_bit(x&31, &mtop[x/32]);
  446. x++;
  447. }
  448. mtop += ystep;
  449. }
  450. ++vcp;
  451. }
  452. mtop = ztv->overinfo.overlay;
  453. zrwrite(virt_to_bus(mtop), ZORAN_MTOP);
  454. zrwrite(virt_to_bus(mtop+ystep), ZORAN_MBOT);
  455. zraor((ztv->vidInterlace*ystep)<<0,~ZORAN_OCR_MASKSTRIDE,ZORAN_OCR);
  456. }
  457. struct tvnorm 
  458. {
  459. u16 Wt, Wa, Ht, Ha, HStart, VStart;
  460. };
  461. static struct tvnorm tvnorms[] = {
  462. /* PAL-BDGHI */
  463. /* { 864, 720, 625, 576, 131, 21 },*/
  464. /*00*/ { 864, 768, 625, 576, 81, 17 },
  465. /* NTSC */
  466. /*01*/ { 858, 720, 525, 480, 121, 10 },
  467. /* SECAM */
  468. /*02*/ { 864, 720, 625, 576, 131, 21 },
  469. /* BW50 */
  470. /*03*/ { 864, 720, 625, 576, 131, 21 },
  471. /* BW60 */
  472. /*04*/ { 858, 720, 525, 480, 121, 10 }
  473. };
  474. #define TVNORMS (sizeof(tvnorms)/sizeof(tvnorm))
  475. /*
  476.  * Program the chip for a setup as described in the vidinfo struct.
  477.  *
  478.  * Side-effects: calculates vidXshift, vidInterlace,
  479.  * vidHeight, vidWidth which are used in a later stage
  480.  * to calculate the overlay mask
  481.  *
  482.  * This is an internal function, as such it does not check the
  483.  * validity of the struct members... Spectaculair crashes will
  484.  * follow /very/ quick when you're wrong and the chip right :)
  485.  */
  486. static
  487. void zoran_set_geo(struct zoran* ztv, struct vidinfo* i)
  488. {
  489. ulong top, bot;
  490. int stride;
  491. int winWidth, winHeight;
  492. int maxWidth, maxHeight, maxXOffset, maxYOffset;
  493. long vfec;
  494. DEBUG(printk(CARD_DEBUG "set_geo(rect=(%d,%d,%d,%d), norm=%d, format=%d, bpp=%d, bpl=%d, busadr=%lx, overlay=%p)n",CARD,i->x,i->y,i->w,i->h,ztv->norm,i->format,i->bpp,i->bpl,i->busadr,i->overlay));
  495. /*
  496.  * make sure the DMA transfers are inhibited during our
  497.  * reprogramming of the chip
  498.  */
  499. zrand(~ZORAN_VDC_VIDEN,ZORAN_VDC);
  500. maxWidth = tvnorms[ztv->norm].Wa;
  501. maxHeight = tvnorms[ztv->norm].Ha/2;
  502. maxXOffset = tvnorms[ztv->norm].HStart;
  503. maxYOffset = tvnorms[ztv->norm].VStart;
  504. /* setup vfec register (keep ExtFl,TopField and VCLKPol settings) */
  505. vfec = (zrread(ZORAN_VFEC) & (ZORAN_VFEC_EXTFL|ZORAN_VFEC_TOPFIELD|ZORAN_VFEC_VCLKPOL)) |
  506.        (palette2fmt[i->format].mode & (ZORAN_VFEC_RGB|ZORAN_VFEC_ERRDIF|ZORAN_VFEC_LE|ZORAN_VFEC_PACK24));
  507. /*
  508.  * Set top, bottom ptrs. Since these must be DWORD aligned,
  509.  * possible adjust the x and the width of the window.
  510.  * so the endposition stay the same. The vidXshift will make
  511.  * sure we are not writing pixels before the requested x.
  512.  */
  513. ztv->vidXshift = 0;
  514. winWidth = i->w;
  515. if (winWidth < 0)
  516. winWidth = -winWidth;
  517. top = i->busadr + i->x*i->bpp + i->y*i->bpl;
  518. if (top & 3) {
  519. ztv->vidXshift = (top & 3) / i->bpp;
  520. winWidth += ztv->vidXshift;
  521. DEBUG(printk(KERN_DEBUG "       window-x shifted %d pixels leftn",ztv->vidXshift));
  522. top &= ~3;
  523. }
  524. /*
  525.  * bottom points to next frame but in interleaved mode we want
  526.  * to 'mix' the 2 frames to one capture, so 'bot' points to one
  527.  * (physical) line below the top line.
  528.  */
  529. bot = top + i->bpl;
  530. zrwrite(top,ZORAN_VTOP);
  531. zrwrite(bot,ZORAN_VBOT);
  532. /*
  533.  * Make sure the winWidth is DWORD aligned too,
  534.  * thereby automaticly making sure the stride to the
  535.  * next line is DWORD aligned too (as required by spec).
  536.  */
  537. if ((winWidth*i->bpp) & 3) {
  538. DEBUG(printk(KERN_DEBUG "       window-width enlarged by %d pixelsn",(winWidth*i->bpp) & 3));
  539. winWidth += (winWidth*i->bpp) & 3;
  540. }
  541. /* determine the DispMode and stride */
  542. if (i->h >= 0 && i->h <= maxHeight) {
  543. /* single frame grab suffices for this height. */
  544. vfec |= ZORAN_VFEC_DISPMOD;
  545. ztv->vidInterlace = 0;
  546. stride = i->bpl - (winWidth*i->bpp);
  547. winHeight = i->h;
  548. }
  549. else {
  550. /* interleaving needed for this height */
  551. ztv->vidInterlace = 1;
  552. stride = i->bpl*2 - (winWidth*i->bpp);
  553. winHeight = i->h/2;
  554. }
  555. if (winHeight < 0) /* can happen for VBI! */
  556. winHeight = -winHeight;
  557. /* safety net, sometimes bpl is too short??? */
  558. if (stride<0) {
  559. DEBUG(printk(CARD_DEBUG "WARNING stride = %dn",CARD,stride));
  560. stride = 0;
  561. }
  562. zraor((winHeight<<12)|(winWidth<<0),~(ZORAN_VDC_VIDWINHT|ZORAN_VDC_VIDWINWID), ZORAN_VDC);
  563. zraor(stride<<16,~ZORAN_VSTR_DISPSTRIDE,ZORAN_VSTR);
  564. /* remember vidWidth, vidHeight for overlay calculations */
  565. ztv->vidWidth = winWidth;
  566. ztv->vidHeight = winHeight;
  567. DEBUG(printk(KERN_DEBUG "       top=%08lx, bottom=%08lxn",top,bot));
  568. DEBUG(printk(KERN_DEBUG "       winWidth=%d, winHeight=%dn",winWidth,winHeight));
  569. DEBUG(printk(KERN_DEBUG "       maxWidth=%d, maxHeight=%dn",maxWidth,maxHeight));
  570. DEBUG(printk(KERN_DEBUG "       stride=%dn",stride));
  571. /*
  572.  * determine horizontal scales and crops
  573.  */
  574. if (i->w < 0) {
  575. int Hstart = 1;
  576. int Hend = Hstart + winWidth;
  577. DEBUG(printk(KERN_DEBUG "       Y: scale=0, start=%d, end=%dn", Hstart, Hend));
  578. zraor((Hstart<<10)|(Hend<<0),~(ZORAN_VFEH_HSTART|ZORAN_VFEH_HEND),ZORAN_VFEH);
  579. }
  580. else {
  581. int Wa = maxWidth;
  582. int X = (winWidth*64+Wa-1)/Wa;
  583. int We = winWidth*64/X;
  584. int HorDcm = 64-X;
  585. int hcrop1 = 2*(Wa-We)/4;
  586. /*
  587.  * BUGFIX: Juha Nurmela <junki@qn-lpr2-165.quicknet.inet.fi> 
  588.  * found the solution to the color phase shift.
  589.  * See ChangeLog for the full explanation)
  590.  */
  591. int Hstart = (maxXOffset + hcrop1) | 1;
  592. int Hend = Hstart + We - 1;
  593. DEBUG(printk(KERN_DEBUG "       X: scale=%d, start=%d, end=%dn", HorDcm, Hstart, Hend));
  594. zraor((Hstart<<10)|(Hend<<0),~(ZORAN_VFEH_HSTART|ZORAN_VFEH_HEND),ZORAN_VFEH);
  595. vfec |= HorDcm<<14;
  596. if (HorDcm<16)
  597. vfec |= ZORAN_VFEC_HFILTER_1; /* no filter */
  598. else if (HorDcm<32)
  599. vfec |= ZORAN_VFEC_HFILTER_3; /* 3 tap filter */
  600. else if (HorDcm<48)
  601. vfec |= ZORAN_VFEC_HFILTER_4; /* 4 tap filter */
  602. else vfec |= ZORAN_VFEC_HFILTER_5; /* 5 tap filter */
  603. }
  604. /*
  605.  * Determine vertical scales and crops
  606.  *
  607.  * when height is negative, we want to read starting at line 0
  608.  * One day someone might need access to these lines...
  609.  */
  610. if (i->h < 0) {
  611. int Vstart = 0;
  612. int Vend = Vstart + winHeight;
  613. DEBUG(printk(KERN_DEBUG "       Y: scale=0, start=%d, end=%dn", Vstart, Vend));
  614. zraor((Vstart<<10)|(Vend<<0),~(ZORAN_VFEV_VSTART|ZORAN_VFEV_VEND),ZORAN_VFEV);
  615. }
  616. else {
  617. int Ha = maxHeight;
  618. int Y = (winHeight*64+Ha-1)/Ha;
  619. int He = winHeight*64/Y;
  620. int VerDcm = 64-Y;
  621. int vcrop1 = 2*(Ha-He)/4;
  622. int Vstart = maxYOffset + vcrop1;
  623. int Vend = Vstart + He - 1;
  624. DEBUG(printk(KERN_DEBUG "       Y: scale=%d, start=%d, end=%dn", VerDcm, Vstart, Vend));
  625. zraor((Vstart<<10)|(Vend<<0),~(ZORAN_VFEV_VSTART|ZORAN_VFEV_VEND),ZORAN_VFEV);
  626. vfec |= VerDcm<<8;
  627. }
  628. DEBUG(printk(KERN_DEBUG "       F: format=%d(=%s)n",i->format,palette2fmt[i->format].name));
  629. /* setup the requested format */
  630. zrwrite(vfec, ZORAN_VFEC);
  631. }
  632. static
  633. void zoran_common_open(struct zoran* ztv, int flags)
  634. {
  635. UNUSED(flags);
  636. /* already opened? */
  637. if (ztv->users++ != 0)
  638. return;
  639. /* unmute audio */
  640. /* /what/ audio? */
  641. ztv->state = 0;
  642. /* setup the encoder to the initial values */
  643. ztv->picture.colour=254<<7;
  644. ztv->picture.brightness=128<<8;
  645. ztv->picture.hue=128<<8;
  646. ztv->picture.contrast=216<<7;
  647. i2c_control_device(&ztv->i2c, I2C_DRIVERID_VIDEODECODER, DECODER_SET_PICTURE, &ztv->picture);
  648. /* default to the composite input since my camera is there */
  649. zoran_muxsel(ztv, 0, VIDEO_MODE_PAL);
  650. }
  651. static
  652. void zoran_common_close(struct zoran* ztv)
  653. {
  654. if (--ztv->users != 0)
  655. return;
  656. /* mute audio */
  657. /* /what/ audio? */
  658. /* stop the chip */
  659. zoran_cap(ztv, 0);
  660. }
  661. /*
  662.  * Open a zoran card. Right now the flags are just a hack
  663.  */
  664. static int zoran_open(struct video_device *dev, int flags)
  665. {
  666. struct zoran *ztv = (struct zoran*)dev;
  667. struct vidinfo* item;
  668. char* pos;
  669. DEBUG(printk(CARD_DEBUG "open(dev,%d)n",CARD,flags));
  670. /*********************************************
  671.  * We really should be doing lazy allocing...
  672.  *********************************************/
  673. /* allocate a frame buffer */
  674. if (!ztv->fbuffer)
  675. ztv->fbuffer = bmalloc(ZORAN_MAX_FBUFSIZE);
  676. if (!ztv->fbuffer) {
  677. /* could not get a buffer, bail out */
  678. return -ENOBUFS;
  679. }
  680. /* at this time we _always_ have a framebuffer */
  681. memset(ztv->fbuffer,0,ZORAN_MAX_FBUFSIZE);
  682. if (!ztv->overinfo.overlay)
  683. ztv->overinfo.overlay = (void*)kmalloc(1024*1024/8, GFP_KERNEL);
  684. if (!ztv->overinfo.overlay) {
  685. /* could not get an overlay buffer, bail out */
  686. bfree(ztv->fbuffer, ZORAN_MAX_FBUFSIZE);
  687. return -ENOBUFS;
  688. }
  689. /* at this time we _always_ have a overlay */
  690. /* clear buffer status, and give them a DMAable address */
  691. pos = ztv->fbuffer;
  692. for (item=ztv->grabinfo; item!=ztv->grabinfo+ZORAN_MAX_FBUFFERS; item++)
  693. {
  694. item->status = FBUFFER_FREE;
  695. item->memadr = pos;
  696. item->busadr = virt_to_bus(pos);
  697. pos += ZORAN_MAX_FBUFFER;
  698. }
  699. /* do the common part of all open's */
  700. zoran_common_open(ztv, flags);
  701. return 0;
  702. }
  703. static
  704. void zoran_close(struct video_device* dev)
  705. {
  706. struct zoran *ztv = (struct zoran*)dev;
  707. DEBUG(printk(CARD_DEBUG "close(dev)n",CARD));
  708. /* driver specific closure */
  709. clear_bit(STATE_OVERLAY, &ztv->state);
  710. zoran_common_close(ztv);
  711.         /*
  712.          *      This is sucky but right now I can't find a good way to
  713.          *      be sure its safe to free the buffer. We wait 5-6 fields
  714.          *      which is more than sufficient to be sure.
  715.          */
  716.         current->state = TASK_UNINTERRUPTIBLE;
  717.         schedule_timeout(HZ/10);        /* Wait 1/10th of a second */
  718. /* free the allocated framebuffer */
  719. if (ztv->fbuffer)
  720. bfree( ztv->fbuffer, ZORAN_MAX_FBUFSIZE );
  721. ztv->fbuffer = 0;
  722. if (ztv->overinfo.overlay)
  723. kfree( ztv->overinfo.overlay );
  724. ztv->overinfo.overlay = 0;
  725. }
  726. /*
  727.  * This read function could be used reentrant in a SMP situation.
  728.  *
  729.  * This is made possible by the spinlock which is kept till we
  730.  * found and marked a buffer for our own use. The lock must
  731.  * be released as soon as possible to prevent lock contention.
  732.  */
  733. static
  734. long zoran_read(struct video_device* dev, char* buf, unsigned long count, int nonblock)
  735. {
  736. struct zoran *ztv = (struct zoran*)dev;
  737. unsigned long max;
  738. struct vidinfo* unused = 0;
  739. struct vidinfo* done = 0;
  740. DEBUG(printk(CARD_DEBUG "zoran_read(%p,%ld,%d)n",CARD,buf,count,nonblock));
  741. /* find ourself a free or completed buffer */
  742. for (;;) {
  743. struct vidinfo* item;
  744. write_lock_irq(&ztv->lock);
  745. for (item=ztv->grabinfo; item!=ztv->grabinfo+ZORAN_MAX_FBUFFERS; item++)
  746. {
  747. if (!unused && item->status == FBUFFER_FREE)
  748. unused = item;
  749. if (!done && item->status == FBUFFER_DONE)
  750. done = item;
  751. }
  752. if (done || unused)
  753. break;
  754. /* no more free buffers, wait for them. */
  755. write_unlock_irq(&ztv->lock);
  756. if (nonblock)
  757. return -EWOULDBLOCK;
  758. interruptible_sleep_on(&ztv->grabq);
  759. if (signal_pending(current))
  760. return -EINTR;
  761. }
  762. /* Do we have 'ready' data? */
  763. if (!done) {
  764. /* no? than this will take a while... */
  765. if (nonblock) {
  766. write_unlock_irq(&ztv->lock);
  767. return -EWOULDBLOCK;
  768. }
  769. /* mark the unused buffer as wanted */
  770. unused->status = FBUFFER_BUSY;
  771. unused->w = 320;
  772. unused->h = 240;
  773. unused->format = VIDEO_PALETTE_RGB24;
  774. unused->bpp = palette2fmt[unused->format].bpp;
  775. unused->bpl = unused->w * unused->bpp;
  776. unused->next = 0;
  777. { /* add to tail of queue */
  778.   struct vidinfo* oldframe = ztv->workqueue;
  779.   if (!oldframe) ztv->workqueue = unused;
  780.   else {
  781.     while (oldframe->next) oldframe = oldframe->next;
  782.     oldframe->next = unused;
  783.   }
  784. }
  785. write_unlock_irq(&ztv->lock);
  786. /* tell the state machine we want it filled /NOW/ */
  787. zoran_cap(ztv, 1);
  788. /* wait till this buffer gets grabbed */
  789. while (unused->status == FBUFFER_BUSY) {
  790. interruptible_sleep_on(&ztv->grabq);
  791. /* see if a signal did it */
  792. if (signal_pending(current))
  793. return -EINTR;
  794. }
  795. done = unused;
  796. }
  797. else
  798. write_unlock_irq(&ztv->lock);
  799. /* Yes! we got data! */
  800. max = done->bpl * done->h;
  801. if (count > max)
  802. count = max;
  803. if (copy_to_user((void*)buf, done->memadr, count))
  804. count = -EFAULT;
  805. /* keep the engine running */
  806. done->status = FBUFFER_FREE;
  807. // zoran_cap(ztv,1);
  808. /* tell listeners this buffer became free */
  809. wake_up_interruptible(&ztv->grabq);
  810. /* goodbye */
  811. DEBUG(printk(CARD_DEBUG "zoran_read() returns %lun",CARD,count));
  812. return count;
  813. }
  814. static
  815. long zoran_write(struct video_device* dev, const char* buf, unsigned long count, int nonblock)
  816. {
  817. struct zoran *ztv = (struct zoran *)dev;
  818. UNUSED(ztv); UNUSED(dev); UNUSED(buf); UNUSED(count); UNUSED(nonblock);
  819. DEBUG(printk(CARD_DEBUG "zoran_writen",CARD));
  820. return -EINVAL;
  821. }
  822. #if LINUX_VERSION_CODE >= 0x020100
  823. static
  824. unsigned int zoran_poll(struct video_device *dev, struct file *file, poll_table *wait)
  825. {
  826. struct zoran *ztv = (struct zoran *)dev;
  827. struct vidinfo* item;
  828. unsigned int mask = 0;
  829. poll_wait(file, &ztv->grabq, wait);
  830. for (item=ztv->grabinfo; item!=ztv->grabinfo+ZORAN_MAX_FBUFFERS; item++)
  831. if (item->status == FBUFFER_DONE)
  832. {
  833. mask |= (POLLIN | POLLRDNORM);
  834. break;
  835. }
  836. DEBUG(printk(CARD_DEBUG "zoran_poll()=%xn",CARD,mask));
  837. return mask;
  838. }
  839. #endif
  840. /* append a new clipregion to the vector of video_clips */
  841. static
  842. void new_clip(struct video_window* vw, struct video_clip* vcp, int x, int y, int w, int h)
  843. {
  844. vcp[vw->clipcount].x = x;
  845. vcp[vw->clipcount].y = y;
  846. vcp[vw->clipcount].width = w;
  847. vcp[vw->clipcount].height = h;
  848. vw->clipcount++;
  849. }
  850. static
  851. int zoran_ioctl(struct video_device* dev, unsigned int cmd, void *arg)
  852. {
  853. struct zoran* ztv = (struct zoran*)dev;
  854. switch (cmd) {
  855.  case VIDIOCGCAP:
  856.  {
  857. struct video_capability c;
  858. DEBUG(printk(CARD_DEBUG "VIDIOCGCAPn",CARD));
  859. strcpy(c.name,ztv->video_dev.name);
  860. c.type = VID_TYPE_CAPTURE|
  861.  VID_TYPE_OVERLAY|
  862.  VID_TYPE_CLIPPING|
  863.  VID_TYPE_FRAMERAM|
  864.  VID_TYPE_SCALES;
  865. if (ztv->have_tuner)
  866. c.type |= VID_TYPE_TUNER;
  867. if (ztv->have_decoder) {
  868. c.channels = ztv->card->video_inputs;
  869. c.audios = ztv->card->audio_inputs;
  870. } else
  871. /* no decoder -> no channels */
  872. c.channels = c.audios = 0;
  873. c.maxwidth = 768;
  874. c.maxheight = 576;
  875. c.minwidth = 32;
  876. c.minheight = 32;
  877. if (copy_to_user(arg,&c,sizeof(c)))
  878. return -EFAULT;
  879. break;
  880.  }
  881.  case VIDIOCGCHAN:
  882.  {
  883. struct video_channel v;
  884. int mux;
  885. if (copy_from_user(&v, arg,sizeof(v)))
  886. return -EFAULT;
  887. DEBUG(printk(CARD_DEBUG "VIDIOCGCHAN(%d)n",CARD,v.channel));
  888. v.flags=VIDEO_VC_AUDIO
  889. #ifdef VIDEO_VC_NORM
  890. |VIDEO_VC_NORM
  891. #endif
  892. ;
  893. v.tuners=0;
  894. v.type=VIDEO_TYPE_CAMERA;
  895. #ifdef I_EXPECT_POSSIBLE_NORMS_IN_THE_API
  896. v.norm=VIDEO_MODE_PAL|
  897.        VIDEO_MODE_NTSC|
  898.        VIDEO_MODE_SECAM;
  899. #else
  900. v.norm=VIDEO_MODE_PAL;
  901. #endif
  902. /* too many inputs? no decoder -> no channels */
  903. if (!ztv->have_decoder || v.channel < 0 ||  v.channel >= ztv->card->video_inputs)
  904. return -EINVAL;
  905. /* now determine the name of the channel */
  906. mux = ztv->card->video_mux[v.channel];
  907. if (mux & IS_TUNER) {
  908. /* lets assume only one tuner, yes? */
  909. strcpy(v.name,"Television");
  910. v.type = VIDEO_TYPE_TV;
  911. if (ztv->have_tuner) {
  912. v.flags |= VIDEO_VC_TUNER;
  913. v.tuners = 1;
  914. }
  915. }
  916. else if (mux & IS_SVHS)
  917. sprintf(v.name,"S-Video-%d",v.channel);
  918. else
  919. sprintf(v.name,"CVBS-%d",v.channel);
  920. if (copy_to_user(arg,&v,sizeof(v)))
  921. return -EFAULT;
  922. break;
  923.  }
  924.  case VIDIOCSCHAN:
  925.  { /* set video channel */
  926. struct video_channel v;
  927. if (copy_from_user(&v, arg,sizeof(v)))
  928. return -EFAULT;
  929. DEBUG(printk(CARD_DEBUG "VIDIOCSCHAN(%d,%d)n",CARD,v.channel,v.norm));
  930. /* too many inputs? no decoder -> no channels */
  931. if (!ztv->have_decoder || v.channel >= ztv->card->video_inputs || v.channel < 0)
  932. return -EINVAL;
  933. if (v.norm != VIDEO_MODE_PAL &&
  934.     v.norm != VIDEO_MODE_NTSC &&
  935.     v.norm != VIDEO_MODE_SECAM &&
  936.     v.norm != VIDEO_MODE_AUTO)
  937. return -EOPNOTSUPP;
  938. /* make it happen, nr1! */
  939. return zoran_muxsel(ztv,v.channel,v.norm);
  940.  }
  941.  case VIDIOCGTUNER:
  942.  {
  943. struct video_tuner v;
  944. if (copy_from_user(&v, arg,sizeof(v)))
  945. return -EFAULT;
  946. DEBUG(printk(CARD_DEBUG "VIDIOCGTUNER(%d)n",CARD,v.tuner));
  947. /* Only no or one tuner for now */
  948. if (!ztv->have_tuner || v.tuner)
  949. return -EINVAL;
  950. strcpy(v.name,"Television");
  951. v.rangelow  = 0;
  952. v.rangehigh = ~0;
  953. v.flags     = VIDEO_TUNER_PAL|VIDEO_TUNER_NTSC|VIDEO_TUNER_SECAM;
  954. v.mode      = ztv->norm;
  955. v.signal    = 0xFFFF; /* unknown */
  956. if (copy_to_user(arg,&v,sizeof(v)))
  957. return -EFAULT;
  958. break;
  959.  }
  960.  case VIDIOCSTUNER:
  961.  {
  962. struct video_tuner v;
  963. if (copy_from_user(&v, arg, sizeof(v)))
  964. return -EFAULT;
  965. DEBUG(printk(CARD_DEBUG "VIDIOCSTUNER(%d,%d)n",CARD,v.tuner,v.mode));
  966. /* Only no or one tuner for now */
  967. if (!ztv->have_tuner || v.tuner)
  968. return -EINVAL;
  969. /* and it only has certain valid modes */
  970. if( v.mode != VIDEO_MODE_PAL &&
  971.     v.mode != VIDEO_MODE_NTSC &&
  972.     v.mode != VIDEO_MODE_SECAM)
  973. return -EOPNOTSUPP;
  974. /* engage! */
  975. return zoran_muxsel(ztv,v.tuner,v.mode);
  976.  }
  977.  case VIDIOCGPICT:
  978.  {
  979. struct video_picture p = ztv->picture;
  980. DEBUG(printk(CARD_DEBUG "VIDIOCGPICTn",CARD));
  981. p.depth = ztv->depth;
  982. switch (p.depth) {
  983.  case  8: p.palette=VIDEO_PALETTE_YUV422;
  984.   break;
  985.  case 15: p.palette=VIDEO_PALETTE_RGB555;
  986.   break;
  987.  case 16: p.palette=VIDEO_PALETTE_RGB565;
  988.   break;
  989.  case 24: p.palette=VIDEO_PALETTE_RGB24;
  990.   break;
  991.  case 32: p.palette=VIDEO_PALETTE_RGB32;
  992.   break;
  993. }
  994. if (copy_to_user(arg, &p, sizeof(p)))
  995. return -EFAULT;
  996. break;
  997.  }
  998.  case VIDIOCSPICT:
  999.  {
  1000. struct video_picture p;
  1001. if (copy_from_user(&p, arg,sizeof(p)))
  1002. return -EFAULT;
  1003. DEBUG(printk(CARD_DEBUG "VIDIOCSPICT(%d,%d,%d,%d,%d,%d,%d)n",CARD,p.brightness,p.hue,p.colour,p.contrast,p.whiteness,p.depth,p.palette));
  1004. /* depth must match with framebuffer */
  1005. if (p.depth != ztv->depth)
  1006. return -EINVAL;
  1007. /* check if palette matches this bpp */
  1008. if (p.palette>NRPALETTES ||
  1009.     palette2fmt[p.palette].bpp != ztv->overinfo.bpp)
  1010. return -EINVAL;
  1011. write_lock_irq(&ztv->lock);
  1012. ztv->overinfo.format = p.palette;
  1013. ztv->picture = p;
  1014. write_unlock_irq(&ztv->lock);
  1015. /* tell the decoder */
  1016. i2c_control_device(&ztv->i2c, I2C_DRIVERID_VIDEODECODER, DECODER_SET_PICTURE, &p);
  1017. break;
  1018.  }
  1019.  case VIDIOCGWIN:
  1020.  {
  1021. struct video_window vw;
  1022. DEBUG(printk(CARD_DEBUG "VIDIOCGWINn",CARD));
  1023. read_lock(&ztv->lock);
  1024. vw.x      = ztv->overinfo.x;
  1025. vw.y      = ztv->overinfo.y;
  1026. vw.width  = ztv->overinfo.w;
  1027. vw.height = ztv->overinfo.h;
  1028. vw.chromakey= 0;
  1029. vw.flags  = 0;
  1030. if (ztv->vidInterlace)
  1031. vw.flags|=VIDEO_WINDOW_INTERLACE;
  1032. read_unlock(&ztv->lock);
  1033. if (copy_to_user(arg,&vw,sizeof(vw)))
  1034. return -EFAULT;
  1035. break;
  1036.  }
  1037.  case VIDIOCSWIN:
  1038.  {
  1039. struct video_window vw;
  1040. struct video_clip *vcp;
  1041. int on;
  1042. if (copy_from_user(&vw,arg,sizeof(vw)))
  1043. return -EFAULT;
  1044. DEBUG(printk(CARD_DEBUG "VIDIOCSWIN(%d,%d,%d,%d,%x,%d)n",CARD,vw.x,vw.y,vw.width,vw.height,vw.flags,vw.clipcount));
  1045. if (vw.flags)
  1046. return -EINVAL;
  1047. if (vw.clipcount <0 || vw.clipcount>256)
  1048. return -EDOM;   /* Too many! */
  1049. /*
  1050.  *      Do any clips.
  1051.  */
  1052. vcp = vmalloc(sizeof(struct video_clip)*(vw.clipcount+4));
  1053. if (vcp==NULL)
  1054. return -ENOMEM;
  1055. if (vw.clipcount && copy_from_user(vcp,vw.clips,sizeof(struct video_clip)*vw.clipcount)) {
  1056. vfree(vcp);
  1057. return -EFAULT;
  1058. }
  1059. on = ztv->running;
  1060. if (on)
  1061. zoran_cap(ztv, 0);
  1062. /*
  1063.  * strange, it seems xawtv sometimes calls us with 0
  1064.  * width and/or height. Ignore these values
  1065.  */
  1066. if (vw.x == 0)
  1067. vw.x = ztv->overinfo.x;
  1068. if (vw.y == 0)
  1069. vw.y = ztv->overinfo.y;
  1070. /* by now we are committed to the new data... */
  1071. write_lock_irq(&ztv->lock);
  1072. ztv->overinfo.x = vw.x;
  1073. ztv->overinfo.y = vw.y;
  1074. ztv->overinfo.w = vw.width;
  1075. ztv->overinfo.h = vw.height;
  1076. write_unlock_irq(&ztv->lock);
  1077. /*
  1078.  *      Impose display clips
  1079.  */
  1080. if (vw.x+vw.width > ztv->swidth)
  1081. new_clip(&vw, vcp, ztv->swidth-vw.x, 0, vw.width-1, vw.height-1);
  1082. if (vw.y+vw.height > ztv->sheight)
  1083. new_clip(&vw, vcp, 0, ztv->sheight-vw.y, vw.width-1, vw.height-1);
  1084. /* built the requested clipping zones */
  1085. zoran_set_geo(ztv, &ztv->overinfo);
  1086. zoran_built_overlay(ztv, vw.clipcount, vcp);
  1087. vfree(vcp);
  1088. /* if we were on, restart the video engine */
  1089. if (on)
  1090. zoran_cap(ztv, 1);
  1091. break;
  1092.  }
  1093.  case VIDIOCCAPTURE:
  1094.  {
  1095. int v;
  1096. if (get_user(v, (int *)arg))
  1097. return -EFAULT;
  1098. DEBUG(printk(CARD_DEBUG "VIDIOCCAPTURE(%d)n",CARD,v));
  1099. if (v==0) {
  1100. clear_bit(STATE_OVERLAY, &ztv->state);
  1101. zoran_cap(ztv, 1);
  1102. }
  1103. else {
  1104. /* is VIDIOCSFBUF, VIDIOCSWIN done? */
  1105. if (ztv->overinfo.busadr==0 || ztv->overinfo.w==0 || ztv->overinfo.h==0)
  1106. return -EINVAL;
  1107. set_bit(STATE_OVERLAY, &ztv->state);
  1108. zoran_cap(ztv, 1);
  1109. }
  1110. break;
  1111.  }
  1112.  case VIDIOCGFBUF:
  1113.  {
  1114. struct video_buffer v;
  1115. DEBUG(printk(CARD_DEBUG "VIDIOCGFBUFn",CARD));
  1116. read_lock(&ztv->lock);
  1117. v.base   = (void *)ztv->overinfo.busadr;
  1118. v.height = ztv->sheight;
  1119. v.width  = ztv->swidth;
  1120. v.depth  = ztv->depth;
  1121. v.bytesperline = ztv->overinfo.bpl;
  1122. read_unlock(&ztv->lock);
  1123. if(copy_to_user(arg, &v,sizeof(v)))
  1124. return -EFAULT;
  1125. break;
  1126.  }
  1127.  case VIDIOCSFBUF:
  1128.  {
  1129. struct video_buffer v;
  1130. #if LINUX_VERSION_CODE >= 0x020100
  1131. if(!capable(CAP_SYS_ADMIN) && !capable(CAP_SYS_ADMIN))
  1132. #else
  1133. if(!suser())
  1134. #endif
  1135. return -EPERM;
  1136. if (copy_from_user(&v, arg,sizeof(v)))
  1137. return -EFAULT;
  1138. DEBUG(printk(CARD_DEBUG "VIDIOCSFBUF(%p,%d,%d,%d,%d)n",CARD,v.base, v.width,v.height,v.depth,v.bytesperline));
  1139. if (v.depth!=15 && v.depth!=16 && v.depth!=24 && v.depth!=32)
  1140. return -EINVAL;
  1141. if (v.bytesperline<1)
  1142. return -EINVAL;
  1143. if (ztv->running)
  1144. return -EBUSY;
  1145. write_lock_irq(&ztv->lock);
  1146. ztv->overinfo.busadr  = (ulong)v.base;
  1147. ztv->sheight      = v.height;
  1148. ztv->swidth       = v.width;
  1149. ztv->depth        = v.depth; /* bits per pixel */
  1150. ztv->overinfo.bpp = ((v.depth+1)&0x38)/8;/* bytes per pixel */
  1151. ztv->overinfo.bpl = v.bytesperline; /* bytes per line */
  1152. write_unlock_irq(&ztv->lock);
  1153. break;
  1154.  }
  1155.  case VIDIOCKEY:
  1156.  {
  1157. /* Will be handled higher up .. */
  1158. break;
  1159.  }
  1160.  case VIDIOCSYNC:
  1161.  {
  1162. int i;
  1163. if (get_user(i, (int *) arg))
  1164. return -EFAULT;
  1165. DEBUG(printk(CARD_DEBUG "VIDEOCSYNC(%d)n",CARD,i));
  1166. if (i<0 || i>ZORAN_MAX_FBUFFERS)
  1167. return -EINVAL;
  1168. switch (ztv->grabinfo[i].status) {
  1169.  case FBUFFER_FREE:
  1170. return -EINVAL;
  1171.  case FBUFFER_BUSY:
  1172. /* wait till this buffer gets grabbed */
  1173. while (ztv->grabinfo[i].status == FBUFFER_BUSY) {
  1174. interruptible_sleep_on(&ztv->grabq);
  1175. /* see if a signal did it */
  1176. if (signal_pending(current))
  1177. return -EINTR;
  1178. }
  1179. /* don't fall through; a DONE buffer is not UNUSED */
  1180. break;
  1181.  case FBUFFER_DONE:
  1182. ztv->grabinfo[i].status = FBUFFER_FREE;
  1183. /* tell ppl we have a spare buffer */
  1184. wake_up_interruptible(&ztv->grabq);
  1185. break;
  1186. }
  1187. DEBUG(printk(CARD_DEBUG "VIDEOCSYNC(%d) returnsn",CARD,i));
  1188. break;
  1189.  }
  1190.  case VIDIOCMCAPTURE:
  1191.  {
  1192. struct video_mmap vm;
  1193. struct vidinfo* frame;
  1194. if (copy_from_user(&vm,arg,sizeof(vm)))
  1195. return -EFAULT;
  1196. DEBUG(printk(CARD_DEBUG "VIDIOCMCAPTURE(%d,(%d,%d),%d)n",CARD,vm.frame,vm.width,vm.height,vm.format));
  1197. if (vm.frame<0 || vm.frame>ZORAN_MAX_FBUFFERS ||
  1198.     vm.width<32 || vm.width>768 ||
  1199.     vm.height<32 || vm.height>576 ||
  1200.     vm.format>NRPALETTES ||
  1201.     palette2fmt[vm.format].mode == 0)
  1202. return -EINVAL;
  1203. /* we are allowed to take over UNUSED and DONE buffers */
  1204. frame = &ztv->grabinfo[vm.frame];
  1205. if (frame->status == FBUFFER_BUSY)
  1206. return -EBUSY;
  1207. /* setup the other parameters if they are given */
  1208. write_lock_irq(&ztv->lock);
  1209. frame->w = vm.width;
  1210. frame->h = vm.height;
  1211. frame->format = vm.format;
  1212. frame->bpp = palette2fmt[frame->format].bpp;
  1213. frame->bpl = frame->w*frame->bpp;
  1214. frame->status = FBUFFER_BUSY;
  1215. frame->next = 0;
  1216. { /* add to tail of queue */
  1217.   struct vidinfo* oldframe = ztv->workqueue;
  1218.   if (!oldframe) ztv->workqueue = frame;
  1219.   else {
  1220.     while (oldframe->next) oldframe = oldframe->next;
  1221.     oldframe->next = frame;
  1222.   }
  1223. }
  1224. write_unlock_irq(&ztv->lock);
  1225. zoran_cap(ztv, 1);
  1226. break;
  1227.  }
  1228.  case VIDIOCGMBUF:
  1229.  {
  1230. struct video_mbuf mb;
  1231. int i;
  1232. DEBUG(printk(CARD_DEBUG "VIDIOCGMBUFn",CARD));
  1233. mb.size = ZORAN_MAX_FBUFSIZE;
  1234. mb.frames = ZORAN_MAX_FBUFFERS;
  1235. for (i=0; i<ZORAN_MAX_FBUFFERS; i++)
  1236. mb.offsets[i] = i*ZORAN_MAX_FBUFFER;
  1237. if(copy_to_user(arg, &mb,sizeof(mb)))
  1238. return -EFAULT;
  1239. break;
  1240.  }
  1241.  case VIDIOCGUNIT:
  1242.  {
  1243. struct video_unit vu;
  1244. DEBUG(printk(CARD_DEBUG "VIDIOCGUNITn",CARD));
  1245. vu.video = ztv->video_dev.minor;
  1246. vu.vbi = ztv->vbi_dev.minor;
  1247. vu.radio = VIDEO_NO_UNIT;
  1248. vu.audio = VIDEO_NO_UNIT;
  1249. vu.teletext = VIDEO_NO_UNIT;
  1250. if(copy_to_user(arg, &vu,sizeof(vu)))
  1251. return -EFAULT;
  1252. break;
  1253.  }
  1254.  case VIDIOCGFREQ:
  1255.  {
  1256. unsigned long v = ztv->tuner_freq;
  1257. if (copy_to_user(arg,&v,sizeof(v)))
  1258. return -EFAULT;
  1259. DEBUG(printk(CARD_DEBUG "VIDIOCGFREQn",CARD));
  1260. break;
  1261.  }
  1262.  case VIDIOCSFREQ:
  1263.  {
  1264. unsigned long v;
  1265. if (copy_from_user(&v, arg, sizeof(v)))
  1266. return -EFAULT;
  1267. DEBUG(printk(CARD_DEBUG "VIDIOCSFREQn",CARD));
  1268. if (ztv->have_tuner) {
  1269. int fixme = v;
  1270. if (i2c_control_device(&(ztv->i2c), I2C_DRIVERID_TUNER, TUNER_SET_TVFREQ, &fixme) < 0)
  1271. return -EAGAIN;
  1272. }
  1273. ztv->tuner_freq = v;
  1274. break;
  1275.  }
  1276.  /* Why isn't this in the API?
  1277.   * And why doesn't it take a buffer number?
  1278.  case BTTV_FIELDNR: 
  1279.  {
  1280. unsigned long v = ztv->lastfieldnr;
  1281. if (copy_to_user(arg,&v,sizeof(v)))
  1282. return -EFAULT;
  1283. DEBUG(printk(CARD_DEBUG "BTTV_FIELDNRn",CARD));
  1284. break;
  1285.  }
  1286.  */
  1287.  default:
  1288. return -ENOIOCTLCMD;
  1289. }
  1290. return 0;
  1291. }
  1292. static
  1293. int zoran_mmap(struct video_device* dev, const char* adr, unsigned long size)
  1294. {
  1295. struct zoran* ztv = (struct zoran*)dev;
  1296. unsigned long start = (unsigned long)adr;
  1297. unsigned long pos;
  1298. DEBUG(printk(CARD_DEBUG "zoran_mmap(0x%p,%ld)n",CARD,adr,size));
  1299. /* sanity checks */
  1300. if (size > ZORAN_MAX_FBUFSIZE || !ztv->fbuffer)
  1301. return -EINVAL;
  1302. /* start mapping the whole shabang to user memory */
  1303. pos = (unsigned long)ztv->fbuffer;
  1304. while (size>0) {
  1305. unsigned long page = virt_to_phys((void*)pos);
  1306. if (remap_page_range(start, page, PAGE_SIZE, PAGE_SHARED))
  1307. return -EAGAIN;
  1308. start += PAGE_SIZE;
  1309. pos += PAGE_SIZE;
  1310. size -= PAGE_SIZE;
  1311. }
  1312. return 0;
  1313. }
  1314. static struct video_device zr36120_template=
  1315. {
  1316. owner: THIS_MODULE,
  1317. name: "UNSET",
  1318. type: VID_TYPE_TUNER|VID_TYPE_CAPTURE|VID_TYPE_OVERLAY,
  1319. hardware: VID_HARDWARE_ZR36120,
  1320. open: zoran_open,
  1321. close: zoran_close,
  1322. read: zoran_read,
  1323. write: zoran_write,
  1324. poll: zoran_poll,
  1325. ioctl: zoran_ioctl,
  1326. mmap: zoran_mmap,
  1327. minor: -1,
  1328. };
  1329. static
  1330. int vbi_open(struct video_device *dev, int flags)
  1331. {
  1332. struct zoran *ztv = (struct zoran*)dev->priv;
  1333. struct vidinfo* item;
  1334. DEBUG(printk(CARD_DEBUG "vbi_open(dev,%d)n",CARD,flags));
  1335. /*
  1336.  * During VBI device open, we continiously grab VBI-like
  1337.  * data in the vbi buffer when we have nothing to do.
  1338.  * Only when there is an explicit request for VBI data
  1339.  * (read call) we /force/ a read.
  1340.  */
  1341. /* allocate buffers */
  1342. for (item=ztv->readinfo; item!=ztv->readinfo+ZORAN_VBI_BUFFERS; item++)
  1343. {
  1344. item->status = FBUFFER_FREE;
  1345. /* alloc */
  1346. if (!item->memadr) {
  1347. item->memadr = bmalloc(ZORAN_VBI_BUFSIZE);
  1348. if (!item->memadr) {
  1349. /* could not get a buffer, bail out */
  1350. while (item != ztv->readinfo) {
  1351. item--;
  1352. bfree(item->memadr, ZORAN_VBI_BUFSIZE);
  1353. item->memadr = 0;
  1354. item->busadr = 0;
  1355. }
  1356. return -ENOBUFS;
  1357. }
  1358. }
  1359. /* determine the DMAable address */
  1360. item->busadr = virt_to_bus(item->memadr);
  1361. }
  1362. /* do the common part of all open's */
  1363. zoran_common_open(ztv, flags);
  1364. set_bit(STATE_VBI, &ztv->state);
  1365. /* start read-ahead */
  1366. zoran_cap(ztv, 1);
  1367. return 0;
  1368. }
  1369. static
  1370. void vbi_close(struct video_device *dev)
  1371. {
  1372. struct zoran *ztv = (struct zoran*)dev->priv;
  1373. struct vidinfo* item;
  1374. DEBUG(printk(CARD_DEBUG "vbi_close(dev)n",CARD));
  1375. /* driver specific closure */
  1376. clear_bit(STATE_VBI, &ztv->state);
  1377. zoran_common_close(ztv);
  1378.         /*
  1379.          *      This is sucky but right now I can't find a good way to
  1380.          *      be sure its safe to free the buffer. We wait 5-6 fields
  1381.          *      which is more than sufficient to be sure.
  1382.          */
  1383.         current->state = TASK_UNINTERRUPTIBLE;
  1384.         schedule_timeout(HZ/10);        /* Wait 1/10th of a second */
  1385. for (item=ztv->readinfo; item!=ztv->readinfo+ZORAN_VBI_BUFFERS; item++)
  1386. {
  1387. if (item->memadr)
  1388. bfree(item->memadr, ZORAN_VBI_BUFSIZE);
  1389. item->memadr = 0;
  1390. }
  1391. }
  1392. /*
  1393.  * This read function could be used reentrant in a SMP situation.
  1394.  *
  1395.  * This is made possible by the spinlock which is kept till we
  1396.  * found and marked a buffer for our own use. The lock must
  1397.  * be released as soon as possible to prevent lock contention.
  1398.  */
  1399. static
  1400. long vbi_read(struct video_device* dev, char* buf, unsigned long count, int nonblock)
  1401. {
  1402. struct zoran *ztv = (struct zoran*)dev->priv;
  1403. unsigned long max;
  1404. struct vidinfo* unused = 0;
  1405. struct vidinfo* done = 0;
  1406. DEBUG(printk(CARD_DEBUG "vbi_read(0x%p,%ld,%d)n",CARD,buf,count,nonblock));
  1407. /* find ourself a free or completed buffer */
  1408. for (;;) {
  1409. struct vidinfo* item;
  1410. write_lock_irq(&ztv->lock);
  1411. for (item=ztv->readinfo; item!=ztv->readinfo+ZORAN_VBI_BUFFERS; item++) {
  1412. if (!unused && item->status == FBUFFER_FREE)
  1413. unused = item;
  1414. if (!done && item->status == FBUFFER_DONE)
  1415. done = item;
  1416. }
  1417. if (done || unused)
  1418. break;
  1419. /* no more free buffers, wait for them. */
  1420. write_unlock_irq(&ztv->lock);
  1421. if (nonblock)
  1422. return -EWOULDBLOCK;
  1423. interruptible_sleep_on(&ztv->vbiq);
  1424. if (signal_pending(current))
  1425. return -EINTR;
  1426. }
  1427. /* Do we have 'ready' data? */
  1428. if (!done) {
  1429. /* no? than this will take a while... */
  1430. if (nonblock) {
  1431. write_unlock_irq(&ztv->lock);
  1432. return -EWOULDBLOCK;
  1433. }
  1434. /* mark the unused buffer as wanted */
  1435. unused->status = FBUFFER_BUSY;
  1436. unused->next = 0;
  1437. { /* add to tail of queue */
  1438.   struct vidinfo* oldframe = ztv->workqueue;
  1439.   if (!oldframe) ztv->workqueue = unused;
  1440.   else {
  1441.     while (oldframe->next) oldframe = oldframe->next;
  1442.     oldframe->next = unused;
  1443.   }
  1444. }
  1445. write_unlock_irq(&ztv->lock);
  1446. /* tell the state machine we want it filled /NOW/ */
  1447. zoran_cap(ztv, 1);
  1448. /* wait till this buffer gets grabbed */
  1449. while (unused->status == FBUFFER_BUSY) {
  1450. interruptible_sleep_on(&ztv->vbiq);
  1451. /* see if a signal did it */
  1452. if (signal_pending(current))
  1453. return -EINTR;
  1454. }
  1455. done = unused;
  1456. }
  1457. else
  1458. write_unlock_irq(&ztv->lock);
  1459. /* Yes! we got data! */
  1460. max = done->bpl * -done->h;
  1461. if (count > max)
  1462. count = max;
  1463. /* check if the user gave us enough room to write the data */
  1464. if (!access_ok(VERIFY_WRITE, buf, count)) {
  1465. count = -EFAULT;
  1466. goto out;
  1467. }
  1468. /*
  1469.  * Now transform/strip the data from YUV to Y-only
  1470.  * NB. Assume the Y is in the LSB of the YUV data.
  1471.  */
  1472. {
  1473. unsigned char* optr = buf;
  1474. unsigned char* eptr = buf+count;
  1475. /* are we beeing accessed from an old driver? */
  1476. if (count == 2*19*2048) {
  1477. /*
  1478.  * Extreme HACK, old VBI programs expect 2048 points
  1479.  * of data, and we only got 864 orso. Double each 
  1480.  * datapoint and clear the rest of the line.
  1481.  * This way we have appear to have a
  1482.  * sample_frequency of 29.5 Mc.
  1483.  */
  1484. int x,y;
  1485. unsigned char* iptr = done->memadr+1;
  1486. for (y=done->h; optr<eptr && y<0; y++)
  1487. {
  1488. /* copy to doubled data to userland */
  1489. for (x=0; optr+1<eptr && x<-done->w; x++)
  1490. {
  1491. unsigned char a = iptr[x*2];
  1492. *optr++ = a;
  1493. *optr++ = a;
  1494. }
  1495. /* and clear the rest of the line */
  1496. for (x*=2; optr<eptr && x<done->bpl; x++)
  1497. *optr++ = 0;
  1498. /* next line */
  1499. iptr += done->bpl;
  1500. }
  1501. }
  1502. else {
  1503. /*
  1504.  * Other (probably newer) programs asked
  1505.  * us what geometry we are using, and are
  1506.  * reading the correct size.
  1507.  */
  1508. int x,y;
  1509. unsigned char* iptr = done->memadr+1;
  1510. for (y=done->h; optr<eptr && y<0; y++)
  1511. {
  1512. /* copy to doubled data to userland */
  1513. for (x=0; optr<eptr && x<-done->w; x++)
  1514. *optr++ = iptr[x*2];
  1515. /* and clear the rest of the line */
  1516. for (;optr<eptr && x<done->bpl; x++)
  1517. *optr++ = 0;
  1518. /* next line */
  1519. iptr += done->bpl;
  1520. }
  1521. }
  1522. /* API compliance:
  1523.  * place the framenumber (half fieldnr) in the last long
  1524.  */
  1525. ((ulong*)eptr)[-1] = done->fieldnr/2;
  1526. }
  1527. /* keep the engine running */
  1528. done->status = FBUFFER_FREE;
  1529. zoran_cap(ztv, 1);
  1530. /* tell listeners this buffer just became free */
  1531. wake_up_interruptible(&ztv->vbiq);
  1532. /* goodbye */
  1533. out:
  1534. DEBUG(printk(CARD_DEBUG "vbi_read() returns %lun",CARD,count));
  1535. return count;
  1536. }
  1537. #if LINUX_VERSION_CODE >= 0x020100
  1538. static
  1539. unsigned int vbi_poll(struct video_device *dev, struct file *file, poll_table *wait)
  1540. {
  1541. struct zoran *ztv = (struct zoran*)dev->priv;
  1542. struct vidinfo* item;
  1543. unsigned int mask = 0;
  1544. poll_wait(file, &ztv->vbiq, wait);
  1545. for (item=ztv->readinfo; item!=ztv->readinfo+ZORAN_VBI_BUFFERS; item++)
  1546. if (item->status == FBUFFER_DONE)
  1547. {
  1548. mask |= (POLLIN | POLLRDNORM);
  1549. break;
  1550. }
  1551. DEBUG(printk(CARD_DEBUG "vbi_poll()=%xn",CARD,mask));
  1552. return mask;
  1553. }
  1554. #endif
  1555. static
  1556. int vbi_ioctl(struct video_device *dev, unsigned int cmd, void *arg)
  1557. {
  1558. struct zoran* ztv = (struct zoran*)dev->priv;
  1559. switch (cmd) {
  1560.  case VIDIOCGVBIFMT:
  1561.  {
  1562. struct vbi_format f;
  1563. DEBUG(printk(CARD_DEBUG "VIDIOCGVBIINFOn",CARD));
  1564. f.sampling_rate = 14750000UL;
  1565. f.samples_per_line = -ztv->readinfo[0].w;
  1566. f.sample_format = VIDEO_PALETTE_RAW;
  1567. f.start[0] = f.start[1] = ztv->readinfo[0].y;
  1568. f.start[1] += 312;
  1569. f.count[0] = f.count[1] = -ztv->readinfo[0].h;
  1570. f.flags = VBI_INTERLACED;
  1571. if (copy_to_user(arg,&f,sizeof(f)))
  1572. return -EFAULT;
  1573. break;
  1574.  }
  1575.  case VIDIOCSVBIFMT:
  1576.  {
  1577. struct vbi_format f;
  1578. int i;
  1579. if (copy_from_user(&f, arg,sizeof(f)))
  1580. return -EFAULT;
  1581. DEBUG(printk(CARD_DEBUG "VIDIOCSVBIINFO(%d,%d,%d,%d,%d,%d,%d,%x)n",CARD,f.sampling_rate,f.samples_per_line,f.sample_format,f.start[0],f.start[1],f.count[0],f.count[1],f.flags));
  1582. /* lots of parameters are fixed... (PAL) */
  1583. if (f.sampling_rate != 14750000UL ||
  1584.     f.samples_per_line > 864 ||
  1585.     f.sample_format != VIDEO_PALETTE_RAW ||
  1586.     f.start[0] < 0 ||
  1587.     f.start[0] != f.start[1]-312 ||
  1588.     f.count[0] != f.count[1] ||
  1589.     f.start[0]+f.count[0] >= 288 ||
  1590.     f.flags != VBI_INTERLACED)
  1591. return -EINVAL;
  1592. write_lock_irq(&ztv->lock);
  1593. ztv->readinfo[0].y = f.start[0];
  1594. ztv->readinfo[0].w = -f.samples_per_line;
  1595. ztv->readinfo[0].h = -f.count[0];
  1596. ztv->readinfo[0].bpl = f.samples_per_line*ztv->readinfo[0].bpp;
  1597. for (i=1; i<ZORAN_VBI_BUFFERS; i++)
  1598. ztv->readinfo[i] = ztv->readinfo[i];
  1599. write_unlock_irq(&ztv->lock);
  1600. break;
  1601.  }
  1602.  default:
  1603. return -ENOIOCTLCMD;
  1604. }
  1605. return 0;
  1606. }
  1607. static struct video_device vbi_template=
  1608. {
  1609. owner: THIS_MODULE,
  1610. name: "UNSET",
  1611. type: VID_TYPE_CAPTURE|VID_TYPE_TELETEXT,
  1612. hardware: VID_HARDWARE_ZR36120,
  1613. open: vbi_open,
  1614. close: vbi_close,
  1615. read: vbi_read,
  1616. write: zoran_write,
  1617. poll: vbi_poll,
  1618. ioctl: vbi_ioctl,
  1619. minor: -1,
  1620. };
  1621. /*
  1622.  *      Scan for a Zoran chip, request the irq and map the io memory
  1623.  */
  1624. static
  1625. int __init find_zoran(void)
  1626. {
  1627. int result;
  1628. struct zoran *ztv;
  1629. struct pci_dev *dev = NULL;
  1630. unsigned char revision;
  1631. int zoran_num=0;
  1632. while ((dev = pci_find_device(PCI_VENDOR_ID_ZORAN,PCI_DEVICE_ID_ZORAN_36120, dev)))
  1633. {
  1634. /* Ok, a ZR36120/ZR36125 found! */
  1635. ztv = &zorans[zoran_num];
  1636. ztv->dev = dev;
  1637. if (pci_enable_device(dev))
  1638. return -EIO;
  1639. pci_read_config_byte(dev, PCI_CLASS_REVISION, &revision);
  1640. printk(KERN_INFO "zoran: Zoran %x (rev %d) ",
  1641. dev->device, revision);
  1642. printk("bus: %d, devfn: %d, irq: %d, ",
  1643. dev->bus->number, dev->devfn, dev->irq);
  1644. printk("memory: 0x%08lx.n", ztv->zoran_adr);
  1645. ztv->zoran_mem = ioremap(ztv->zoran_adr, 0x1000);
  1646. DEBUG(printk(KERN_DEBUG "zoran: mapped-memory at 0x%pn",ztv->zoran_mem));
  1647. result = request_irq(dev->irq, zoran_irq,
  1648. SA_SHIRQ|SA_INTERRUPT,"zoran",(void *)ztv);
  1649. if (result==-EINVAL)
  1650. {
  1651. iounmap(ztv->zoran_mem);
  1652. printk(KERN_ERR "zoran: Bad irq number or handlern");
  1653. return -EINVAL;
  1654. }
  1655. if (result==-EBUSY)
  1656. printk(KERN_ERR "zoran: IRQ %d busy, change your PnP config in BIOSn",dev->irq);
  1657. if (result < 0) {
  1658. iounmap(ztv->zoran_mem);
  1659. return result;
  1660. }
  1661. /* Enable bus-mastering */
  1662. pci_set_master(dev);
  1663. zoran_num++;
  1664. }
  1665. if(zoran_num)
  1666. printk(KERN_INFO "zoran: %d Zoran card(s) found.n",zoran_num);
  1667. return zoran_num;
  1668. }
  1669. static
  1670. int __init init_zoran(int card)
  1671. {
  1672. struct zoran *ztv = &zorans[card];
  1673. int i;
  1674. /* if the given cardtype valid? */
  1675. if (cardtype[card]>=NRTVCARDS) {
  1676. printk(KERN_INFO "invalid cardtype(%d) detectedn",cardtype[card]);
  1677. return -1;
  1678. }
  1679. /* reset the zoran */
  1680. zrand(~ZORAN_PCI_SOFTRESET,ZORAN_PCI);
  1681. udelay(10);
  1682. zror(ZORAN_PCI_SOFTRESET,ZORAN_PCI);
  1683. udelay(10);
  1684. /* zoran chip specific details */
  1685. ztv->card = tvcards+cardtype[card]; /* point to the selected card */
  1686. ztv->norm = 0; /* PAL */
  1687. ztv->tuner_freq = 0;
  1688. /* videocard details */
  1689. ztv->swidth = 800;
  1690. ztv->sheight = 600;
  1691. ztv->depth = 16;
  1692. /* State details */
  1693. ztv->fbuffer = 0;
  1694. ztv->overinfo.kindof = FBUFFER_OVERLAY;
  1695. ztv->overinfo.status = FBUFFER_FREE;
  1696. ztv->overinfo.x = 0;
  1697. ztv->overinfo.y = 0;
  1698. ztv->overinfo.w = 768; /* 640 */
  1699. ztv->overinfo.h = 576; /* 480 */
  1700. ztv->overinfo.format = VIDEO_PALETTE_RGB565;
  1701. ztv->overinfo.bpp = palette2fmt[ztv->overinfo.format].bpp;
  1702. ztv->overinfo.bpl = ztv->overinfo.bpp*ztv->swidth;
  1703. ztv->overinfo.busadr = 0;
  1704. ztv->overinfo.memadr = 0;
  1705. ztv->overinfo.overlay = 0;
  1706. for (i=0; i<ZORAN_MAX_FBUFFERS; i++) {
  1707. ztv->grabinfo[i] = ztv->overinfo;
  1708. ztv->grabinfo[i].kindof = FBUFFER_GRAB;
  1709. }
  1710. init_waitqueue_head(&ztv->grabq);
  1711. /* VBI details */
  1712. ztv->readinfo[0] = ztv->overinfo;
  1713. ztv->readinfo[0].kindof = FBUFFER_VBI;
  1714. ztv->readinfo[0].w = -864;
  1715. ztv->readinfo[0].h = -38;
  1716. ztv->readinfo[0].format = VIDEO_PALETTE_YUV422;
  1717. ztv->readinfo[0].bpp = palette2fmt[ztv->readinfo[0].format].bpp;
  1718. ztv->readinfo[0].bpl = 1024*ztv->readinfo[0].bpp;
  1719. for (i=1; i<ZORAN_VBI_BUFFERS; i++)
  1720. ztv->readinfo[i] = ztv->readinfo[0];
  1721. init_waitqueue_head(&ztv->vbiq);
  1722. /* maintenance data */
  1723. ztv->have_decoder = 0;
  1724. ztv->have_tuner = 0;
  1725. ztv->tuner_type = 0;
  1726. ztv->running = 0;
  1727. ztv->users = 0;
  1728. ztv->lock = RW_LOCK_UNLOCKED;
  1729. ztv->workqueue = 0;
  1730. ztv->fieldnr = 0;
  1731. ztv->lastfieldnr = 0;
  1732. if (triton1)
  1733. zrand(~ZORAN_VDC_TRICOM, ZORAN_VDC);
  1734. /* external FL determines TOP frame */
  1735. zror(ZORAN_VFEC_EXTFL, ZORAN_VFEC); 
  1736. /* set HSpol */
  1737. if (ztv->card->hsync_pos)
  1738. zrwrite(ZORAN_VFEH_HSPOL, ZORAN_VFEH);
  1739. /* set VSpol */
  1740. if (ztv->card->vsync_pos)
  1741. zrwrite(ZORAN_VFEV_VSPOL, ZORAN_VFEV);
  1742. /* Set the proper General Purpuse register bits */
  1743. /* implicit: no softreset, 0 waitstates */
  1744. zrwrite(ZORAN_PCI_SOFTRESET|(ztv->card->gpdir<<0),ZORAN_PCI);
  1745. /* implicit: 3 duration and recovery PCI clocks on guest 0-3 */
  1746. zrwrite(ztv->card->gpval<<24,ZORAN_GUEST);
  1747. /* clear interrupt status */
  1748. zrwrite(~0, ZORAN_ISR);
  1749. /*
  1750.  * i2c template
  1751.  */
  1752. ztv->i2c = zoran_i2c_bus_template;
  1753. sprintf(ztv->i2c.name,"zoran-%d",card);
  1754. ztv->i2c.data = ztv;
  1755. /*
  1756.  * Now add the template and register the device unit
  1757.  */
  1758. ztv->video_dev = zr36120_template;
  1759. strcpy(ztv->video_dev.name, ztv->i2c.name);
  1760. ztv->video_dev.priv = ztv;
  1761. if (video_register_device(&ztv->video_dev, VFL_TYPE_GRABBER, video_nr) < 0)
  1762. return -1;
  1763. ztv->vbi_dev = vbi_template;
  1764. strcpy(ztv->vbi_dev.name, ztv->i2c.name);
  1765. ztv->vbi_dev.priv = ztv;
  1766. if (video_register_device(&ztv->vbi_dev, VFL_TYPE_VBI, vbi_nr) < 0) {
  1767. video_unregister_device(&ztv->video_dev);
  1768. return -1;
  1769. }
  1770. i2c_register_bus(&ztv->i2c);
  1771. /* set interrupt mask - the PIN enable will be set later */
  1772. zrwrite(ZORAN_ICR_GIRQ0|ZORAN_ICR_GIRQ1|ZORAN_ICR_CODE, ZORAN_ICR);
  1773. printk(KERN_INFO "%s: installed %sn",ztv->i2c.name,ztv->card->name);
  1774. return 0;
  1775. }
  1776. static
  1777. void release_zoran(int max)
  1778. {
  1779. struct zoran *ztv;
  1780. int i;
  1781. for (i=0;i<max; i++) 
  1782. {
  1783. ztv = &zorans[i];
  1784. /* turn off all capturing, DMA and IRQs */
  1785. /* reset the zoran */
  1786. zrand(~ZORAN_PCI_SOFTRESET,ZORAN_PCI);
  1787. udelay(10);
  1788. zror(ZORAN_PCI_SOFTRESET,ZORAN_PCI);
  1789. udelay(10);
  1790. /* first disable interrupts before unmapping the memory! */
  1791. zrwrite(0, ZORAN_ICR);
  1792. zrwrite(0xffffffffUL,ZORAN_ISR);
  1793. /* free it */
  1794. free_irq(ztv->dev->irq,ztv);
  1795.  
  1796.      /* unregister i2c_bus */
  1797. i2c_unregister_bus((&ztv->i2c));
  1798. /* unmap and free memory */
  1799. if (ztv->zoran_mem)
  1800. iounmap(ztv->zoran_mem);
  1801. video_unregister_device(&ztv->video_dev);
  1802. video_unregister_device(&ztv->vbi_dev);
  1803. }
  1804. }
  1805. void __exit zr36120_exit(void)
  1806. {
  1807. release_zoran(zoran_cards);
  1808. }
  1809. int __init zr36120_init(void)
  1810. {
  1811. int card;
  1812.  
  1813. handle_chipset();
  1814. zoran_cards = find_zoran();
  1815. if (zoran_cards<0)
  1816. /* no cards found, no need for a driver */
  1817. return -EIO;
  1818. /* initialize Zorans */
  1819. for (card=0; card<zoran_cards; card++) {
  1820. if (init_zoran(card)<0) {
  1821. /* only release the zorans we have registered */
  1822. release_zoran(card);
  1823. return -EIO;
  1824. }
  1825. return 0;
  1826. }
  1827. module_init(zr36120_init);
  1828. module_exit(zr36120_exit);