2 * stradis.c - stradis 4:2:2 mpeg decoder driver
4 * Stradis 4:2:2 MPEG-2 Decoder Driver
5 * Copyright (C) 1999 Nathan Laredo <laredo@gnu.org>
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 #include <linux/module.h>
23 #include <linux/delay.h>
24 #include <linux/errno.h>
26 #include <linux/kernel.h>
27 #include <linux/major.h>
28 #include <linux/slab.h>
30 #include <linux/init.h>
31 #include <linux/poll.h>
32 #include <linux/pci.h>
33 #include <linux/signal.h>
35 #include <linux/ioport.h>
36 #include <asm/pgtable.h>
38 #include <linux/sched.h>
39 #include <asm/types.h>
40 #include <linux/types.h>
41 #include <linux/interrupt.h>
42 #include <asm/uaccess.h>
43 #include <linux/vmalloc.h>
44 #include <linux/videodev.h>
45 #include <media/v4l2-common.h>
48 #include "saa7146reg.h"
53 #define DEBUG(x) /* debug driver */
54 #undef IDEBUG /* debug irq handler */
55 #undef MDEBUG /* debug memory management */
59 static struct saa7146 saa7146s
[SAA7146_MAX
];
61 static int saa_num
; /* number of SAA7146s in use */
63 static int video_nr
= -1;
64 module_param(video_nr
, int, 0);
65 MODULE_LICENSE("GPL");
67 #define nDebNormal 0x00480000
68 #define nDebNoInc 0x00480000
69 #define nDebVideo 0xd0480000
70 #define nDebAudio 0xd0400000
71 #define nDebDMA 0x02c80000
73 #define oDebNormal 0x13c80000
74 #define oDebNoInc 0x13c80000
75 #define oDebVideo 0xd1080000
76 #define oDebAudio 0xd1080000
77 #define oDebDMA 0x03080000
79 #define NewCard (saa->boardcfg[3])
80 #define ChipControl (saa->boardcfg[1])
81 #define NTSCFirstActive (saa->boardcfg[4])
82 #define PALFirstActive (saa->boardcfg[5])
83 #define NTSCLastActive (saa->boardcfg[54])
84 #define PALLastActive (saa->boardcfg[55])
85 #define Have2MB (saa->boardcfg[18] & 0x40)
86 #define HaveCS8420 (saa->boardcfg[18] & 0x04)
87 #define IBMMPEGCD20 (saa->boardcfg[18] & 0x20)
88 #define HaveCS3310 (saa->boardcfg[18] & 0x01)
89 #define CS3310MaxLvl ((saa->boardcfg[30] << 8) | saa->boardcfg[31])
90 #define HaveCS4341 (saa->boardcfg[40] == 2)
91 #define SDIType (saa->boardcfg[27])
92 #define CurrentMode (saa->boardcfg[2])
94 #define debNormal (NewCard ? nDebNormal : oDebNormal)
95 #define debNoInc (NewCard ? nDebNoInc : oDebNoInc)
96 #define debVideo (NewCard ? nDebVideo : oDebVideo)
97 #define debAudio (NewCard ? nDebAudio : oDebAudio)
98 #define debDMA (NewCard ? nDebDMA : oDebDMA)
100 #ifdef USE_RESCUE_EEPROM_SDM275
101 static unsigned char rescue_eeprom
[64] = {
102 0x00, 0x01, 0x04, 0x13, 0x26, 0x0f, 0x10, 0x00, 0x00, 0x00, 0x43, 0x63,
103 0x22, 0x01, 0x29, 0x15, 0x73, 0x00, 0x1f, 'd', 'e', 'c', 'x', 'l',
104 'd', 'v', 'a', 0x02, 0x00, 0x01, 0x00, 0xcc, 0xa4, 0x63, 0x09, 0xe2,
105 0x10, 0x00, 0x0a, 0x00, 0x02, 0x02, 'd', 'e', 'c', 'x', 'l', 'a',
106 0x00, 0x00, 0x42, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
107 0x00, 0x00, 0x00, 0x00,
111 /* ----------------------------------------------------------------------- */
112 /* Hardware I2C functions */
113 static void I2CWipe(struct saa7146
*saa
)
116 /* set i2c to ~=100kHz, abort transfer, clear busy */
117 saawrite(0x600 | SAA7146_I2C_ABORT
, SAA7146_I2C_STATUS
);
118 saawrite((SAA7146_MC2_UPLD_I2C
<< 16) |
119 SAA7146_MC2_UPLD_I2C
, SAA7146_MC2
);
120 /* wait for i2c registers to be programmed */
121 for (i
= 0; i
< 1000 &&
122 !(saaread(SAA7146_MC2
) & SAA7146_MC2_UPLD_I2C
); i
++)
124 saawrite(0x600, SAA7146_I2C_STATUS
);
125 saawrite((SAA7146_MC2_UPLD_I2C
<< 16) |
126 SAA7146_MC2_UPLD_I2C
, SAA7146_MC2
);
127 /* wait for i2c registers to be programmed */
128 for (i
= 0; i
< 1000 &&
129 !(saaread(SAA7146_MC2
) & SAA7146_MC2_UPLD_I2C
); i
++)
131 saawrite(0x600, SAA7146_I2C_STATUS
);
132 saawrite((SAA7146_MC2_UPLD_I2C
<< 16) |
133 SAA7146_MC2_UPLD_I2C
, SAA7146_MC2
);
134 /* wait for i2c registers to be programmed */
135 for (i
= 0; i
< 1000 &&
136 !(saaread(SAA7146_MC2
) & SAA7146_MC2_UPLD_I2C
); i
++)
141 static int I2CRead(struct saa7146
*saa
, unsigned char addr
,
142 unsigned char subaddr
, int dosub
)
146 if (saaread(SAA7146_I2C_STATUS
) & 0x3c)
149 i
< 1000 && (saaread(SAA7146_I2C_STATUS
) & SAA7146_I2C_BUSY
);
155 saawrite(((addr
& 0xfe) << 24) | (((addr
| 1) & 0xff) << 8) |
156 ((subaddr
& 0xff) << 16) | 0xed, SAA7146_I2C_TRANSFER
);
158 saawrite(((addr
& 0xfe) << 24) | (((addr
| 1) & 0xff) << 16) |
159 0xf1, SAA7146_I2C_TRANSFER
);
160 saawrite((SAA7146_MC2_UPLD_I2C
<< 16) |
161 SAA7146_MC2_UPLD_I2C
, SAA7146_MC2
);
162 /* wait for i2c registers to be programmed */
163 for (i
= 0; i
< 1000 &&
164 !(saaread(SAA7146_MC2
) & SAA7146_MC2_UPLD_I2C
); i
++)
166 /* wait for valid data */
167 for (i
= 0; i
< 1000 &&
168 (saaread(SAA7146_I2C_STATUS
) & SAA7146_I2C_BUSY
); i
++)
170 if (saaread(SAA7146_I2C_STATUS
) & SAA7146_I2C_ERR
)
173 printk("i2c setup read timeout\n");
174 saawrite(0x41, SAA7146_I2C_TRANSFER
);
175 saawrite((SAA7146_MC2_UPLD_I2C
<< 16) |
176 SAA7146_MC2_UPLD_I2C
, SAA7146_MC2
);
177 /* wait for i2c registers to be programmed */
178 for (i
= 0; i
< 1000 &&
179 !(saaread(SAA7146_MC2
) & SAA7146_MC2_UPLD_I2C
); i
++)
181 /* wait for valid data */
182 for (i
= 0; i
< 1000 &&
183 (saaread(SAA7146_I2C_TRANSFER
) & SAA7146_I2C_BUSY
); i
++)
185 if (saaread(SAA7146_I2C_TRANSFER
) & SAA7146_I2C_ERR
)
188 printk("i2c read timeout\n");
189 return ((saaread(SAA7146_I2C_TRANSFER
) >> 24) & 0xff);
192 /* set both to write both bytes, reset it to write only b1 */
194 static int I2CWrite(struct saa7146
*saa
, unsigned char addr
, unsigned char b1
,
195 unsigned char b2
, int both
)
200 if (saaread(SAA7146_I2C_STATUS
) & 0x3c)
202 for (i
= 0; i
< 1000 &&
203 (saaread(SAA7146_I2C_STATUS
) & SAA7146_I2C_BUSY
); i
++)
207 data
= ((addr
& 0xfe) << 24) | ((b1
& 0xff) << 16);
209 data
|= ((b2
& 0xff) << 8) | 0xe5;
212 saawrite(data
, SAA7146_I2C_TRANSFER
);
213 saawrite((SAA7146_MC2_UPLD_I2C
<< 16) | SAA7146_MC2_UPLD_I2C
,
218 static void attach_inform(struct saa7146
*saa
, int id
)
222 DEBUG(printk(KERN_DEBUG
"stradis%d: i2c: device found=%02x\n", saa
->nr
,
224 if (id
== 0xa0) { /* we have rev2 or later board, fill in info */
225 for (i
= 0; i
< 64; i
++)
226 saa
->boardcfg
[i
] = I2CRead(saa
, 0xa0, i
, 1);
227 #ifdef USE_RESCUE_EEPROM_SDM275
228 if (saa
->boardcfg
[0] != 0) {
229 printk("stradis%d: WARNING: EEPROM STORED VALUES HAVE "
230 "BEEN IGNORED\n", saa
->nr
);
231 for (i
= 0; i
< 64; i
++)
232 saa
->boardcfg
[i
] = rescue_eeprom
[i
];
235 printk("stradis%d: config =", saa
->nr
);
236 for (i
= 0; i
< 51; i
++) {
237 printk(" %02x", saa
->boardcfg
[i
]);
243 static void I2CBusScan(struct saa7146
*saa
)
246 for (i
= 0; i
< 0xff; i
+= 2)
247 if ((I2CRead(saa
, i
, 0, 0)) >= 0)
248 attach_inform(saa
, i
);
251 static int debiwait_maxwait
;
253 static int wait_for_debi_done(struct saa7146
*saa
)
257 /* wait for registers to be programmed */
258 for (i
= 0; i
< 100000 &&
259 !(saaread(SAA7146_MC2
) & SAA7146_MC2_UPLD_DEBI
); i
++)
260 saaread(SAA7146_MC2
);
261 /* wait for transfer to complete */
262 for (i
= 0; i
< 500000 &&
263 (saaread(SAA7146_PSR
) & SAA7146_PSR_DEBI_S
); i
++)
264 saaread(SAA7146_MC2
);
266 if (i
> debiwait_maxwait
)
267 printk("wait-for-debi-done maxwait: %d\n",
268 debiwait_maxwait
= i
);
276 static int debiwrite(struct saa7146
*saa
, u32 config
, int addr
,
280 if (count
<= 0 || count
> 32764)
282 if (wait_for_debi_done(saa
) < 0)
284 saawrite(config
, SAA7146_DEBI_CONFIG
);
285 if (count
<= 4) /* immediate transfer */
286 saawrite(val
, SAA7146_DEBI_AD
);
287 else /* block transfer */
288 saawrite(virt_to_bus(saa
->dmadebi
), SAA7146_DEBI_AD
);
289 saawrite((cmd
= (count
<< 17) | (addr
& 0xffff)), SAA7146_DEBI_COMMAND
);
290 saawrite((SAA7146_MC2_UPLD_DEBI
<< 16) | SAA7146_MC2_UPLD_DEBI
,
295 static u32
debiread(struct saa7146
*saa
, u32 config
, int addr
, int count
)
299 if (count
> 32764 || count
<= 0)
301 if (wait_for_debi_done(saa
) < 0)
303 saawrite(virt_to_bus(saa
->dmadebi
), SAA7146_DEBI_AD
);
304 saawrite((count
<< 17) | 0x10000 | (addr
& 0xffff),
305 SAA7146_DEBI_COMMAND
);
306 saawrite(config
, SAA7146_DEBI_CONFIG
);
307 saawrite((SAA7146_MC2_UPLD_DEBI
<< 16) | SAA7146_MC2_UPLD_DEBI
,
309 if (count
> 4) /* not an immediate transfer */
311 wait_for_debi_done(saa
);
312 result
= saaread(SAA7146_DEBI_AD
);
322 static void do_irq_send_data(struct saa7146
*saa
)
324 int split
, audbytes
, vidbytes
;
326 saawrite(SAA7146_PSR_PIN1
, SAA7146_IER
);
327 /* if special feature mode in effect, disable audio sending */
328 if (saa
->playmode
!= VID_PLAY_NORMAL
)
329 saa
->audtail
= saa
->audhead
= 0;
330 if (saa
->audhead
<= saa
->audtail
)
331 audbytes
= saa
->audtail
- saa
->audhead
;
333 audbytes
= 65536 - (saa
->audhead
- saa
->audtail
);
334 if (saa
->vidhead
<= saa
->vidtail
)
335 vidbytes
= saa
->vidtail
- saa
->vidhead
;
337 vidbytes
= 524288 - (saa
->vidhead
- saa
->vidtail
);
338 if (audbytes
== 0 && vidbytes
== 0 && saa
->osdtail
== saa
->osdhead
) {
339 saawrite(0, SAA7146_IER
);
342 /* if at least 1 block audio waiting and audio fifo isn't full */
343 if (audbytes
>= 2048 && (debiread(saa
, debNormal
, IBM_MP2_AUD_FIFO
, 2)
345 if (saa
->audhead
> saa
->audtail
)
346 split
= 65536 - saa
->audhead
;
350 if (split
> 0 && split
< 2048) {
351 memcpy(saa
->dmadebi
, saa
->audbuf
+ saa
->audhead
, split
);
356 memcpy(saa
->dmadebi
+ split
, saa
->audbuf
+ saa
->audhead
,
358 saa
->audhead
+= audbytes
;
359 saa
->audhead
&= 0xffff;
360 debiwrite(saa
, debAudio
, (NewCard
? IBM_MP2_AUD_FIFO
:
361 IBM_MP2_AUD_FIFOW
), 0, 2048);
362 wake_up_interruptible(&saa
->audq
);
363 /* if at least 1 block video waiting and video fifo isn't full */
364 } else if (vidbytes
>= 30720 && (debiread(saa
, debNormal
,
365 IBM_MP2_FIFO
, 2)) < 16384) {
366 if (saa
->vidhead
> saa
->vidtail
)
367 split
= 524288 - saa
->vidhead
;
371 if (split
> 0 && split
< 30720) {
372 memcpy(saa
->dmadebi
, saa
->vidbuf
+ saa
->vidhead
, split
);
377 memcpy(saa
->dmadebi
+ split
, saa
->vidbuf
+ saa
->vidhead
,
379 saa
->vidhead
+= vidbytes
;
380 saa
->vidhead
&= 0x7ffff;
381 debiwrite(saa
, debVideo
, (NewCard
? IBM_MP2_FIFO
:
382 IBM_MP2_FIFOW
), 0, 30720);
383 wake_up_interruptible(&saa
->vidq
);
385 saawrite(SAA7146_PSR_DEBI_S
| SAA7146_PSR_PIN1
, SAA7146_IER
);
388 static void send_osd_data(struct saa7146
*saa
)
390 int size
= saa
->osdtail
- saa
->osdhead
;
393 /* ensure some multiple of 8 bytes is transferred */
394 size
= 8 * ((size
+ 8) >> 3);
396 debiwrite(saa
, debNormal
, IBM_MP2_OSD_ADDR
,
397 (saa
->osdhead
>> 3), 2);
398 memcpy(saa
->dmadebi
, &saa
->osdbuf
[saa
->osdhead
], size
);
399 saa
->osdhead
+= size
;
400 /* block transfer of next 8 bytes to ~32k bytes */
401 debiwrite(saa
, debNormal
, IBM_MP2_OSD_DATA
, 0, size
);
403 if (saa
->osdhead
>= saa
->osdtail
) {
404 saa
->osdhead
= saa
->osdtail
= 0;
405 debiwrite(saa
, debNormal
, IBM_MP2_MASK0
, 0xc00c, 2);
409 static irqreturn_t
saa7146_irq(int irq
, void *dev_id
)
411 struct saa7146
*saa
= dev_id
;
418 /* get/clear interrupt status bits */
419 stat
= saaread(SAA7146_ISR
);
420 astat
= stat
& saaread(SAA7146_IER
);
424 saawrite(astat
, SAA7146_ISR
);
425 if (astat
& SAA7146_PSR_DEBI_S
) {
426 do_irq_send_data(saa
);
428 if (astat
& SAA7146_PSR_PIN1
) {
430 /* the following read will trigger DEBI_S */
431 istat
= debiread(saa
, debNormal
, IBM_MP2_HOST_INT
, 2);
433 saawrite(0, SAA7146_IER
);
435 saawrite(SAA7146_PSR_DEBI_S
|
436 SAA7146_PSR_PIN1
, SAA7146_IER
);
438 if (istat
& 0x20) { /* Video Start */
439 saa
->vidinfo
.frame_count
++;
441 if (istat
& 0x400) { /* Picture Start */
442 /* update temporal reference */
444 if (istat
& 0x200) { /* Picture Resolution Change */
445 /* read new resolution */
447 if (istat
& 0x100) { /* New User Data found */
448 /* read new user data */
450 if (istat
& 0x1000) { /* new GOP/SMPTE */
453 if (istat
& 0x8000) { /* Sequence Start Code */
454 /* reset frame counter, load sizes */
455 saa
->vidinfo
.frame_count
= 0;
456 saa
->vidinfo
.h_size
= 704;
457 saa
->vidinfo
.v_size
= 480;
459 if (saa
->endmarkhead
!= saa
->endmarktail
) {
461 saa
->endmark
[saa
->endmarkhead
];
463 if (saa
->endmarkhead
>= MAX_MARKS
)
464 saa
->endmarkhead
= 0;
468 if (istat
& 0x4000) { /* Sequence Error Code */
469 if (saa
->endmarkhead
!= saa
->endmarktail
) {
471 saa
->endmark
[saa
->endmarkhead
];
473 if (saa
->endmarkhead
>= MAX_MARKS
)
474 saa
->endmarkhead
= 0;
479 if (astat
& SAA7146_PSR_PPEF
) {
480 IDEBUG(printk("stradis%d irq: PPEF\n", saa
->nr
));
482 if (astat
& SAA7146_PSR_PABO
) {
483 IDEBUG(printk("stradis%d irq: PABO\n", saa
->nr
));
485 if (astat
& SAA7146_PSR_PPED
) {
486 IDEBUG(printk("stradis%d irq: PPED\n", saa
->nr
));
488 if (astat
& SAA7146_PSR_RPS_I1
) {
489 IDEBUG(printk("stradis%d irq: RPS_I1\n", saa
->nr
));
491 if (astat
& SAA7146_PSR_RPS_I0
) {
492 IDEBUG(printk("stradis%d irq: RPS_I0\n", saa
->nr
));
494 if (astat
& SAA7146_PSR_RPS_LATE1
) {
495 IDEBUG(printk("stradis%d irq: RPS_LATE1\n", saa
->nr
));
497 if (astat
& SAA7146_PSR_RPS_LATE0
) {
498 IDEBUG(printk("stradis%d irq: RPS_LATE0\n", saa
->nr
));
500 if (astat
& SAA7146_PSR_RPS_E1
) {
501 IDEBUG(printk("stradis%d irq: RPS_E1\n", saa
->nr
));
503 if (astat
& SAA7146_PSR_RPS_E0
) {
504 IDEBUG(printk("stradis%d irq: RPS_E0\n", saa
->nr
));
506 if (astat
& SAA7146_PSR_RPS_TO1
) {
507 IDEBUG(printk("stradis%d irq: RPS_TO1\n", saa
->nr
));
509 if (astat
& SAA7146_PSR_RPS_TO0
) {
510 IDEBUG(printk("stradis%d irq: RPS_TO0\n", saa
->nr
));
512 if (astat
& SAA7146_PSR_UPLD
) {
513 IDEBUG(printk("stradis%d irq: UPLD\n", saa
->nr
));
515 if (astat
& SAA7146_PSR_DEBI_E
) {
516 IDEBUG(printk("stradis%d irq: DEBI_E\n", saa
->nr
));
518 if (astat
& SAA7146_PSR_I2C_S
) {
519 IDEBUG(printk("stradis%d irq: I2C_S\n", saa
->nr
));
521 if (astat
& SAA7146_PSR_I2C_E
) {
522 IDEBUG(printk("stradis%d irq: I2C_E\n", saa
->nr
));
524 if (astat
& SAA7146_PSR_A2_IN
) {
525 IDEBUG(printk("stradis%d irq: A2_IN\n", saa
->nr
));
527 if (astat
& SAA7146_PSR_A2_OUT
) {
528 IDEBUG(printk("stradis%d irq: A2_OUT\n", saa
->nr
));
530 if (astat
& SAA7146_PSR_A1_IN
) {
531 IDEBUG(printk("stradis%d irq: A1_IN\n", saa
->nr
));
533 if (astat
& SAA7146_PSR_A1_OUT
) {
534 IDEBUG(printk("stradis%d irq: A1_OUT\n", saa
->nr
));
536 if (astat
& SAA7146_PSR_AFOU
) {
537 IDEBUG(printk("stradis%d irq: AFOU\n", saa
->nr
));
539 if (astat
& SAA7146_PSR_V_PE
) {
540 IDEBUG(printk("stradis%d irq: V_PE\n", saa
->nr
));
542 if (astat
& SAA7146_PSR_VFOU
) {
543 IDEBUG(printk("stradis%d irq: VFOU\n", saa
->nr
));
545 if (astat
& SAA7146_PSR_FIDA
) {
546 IDEBUG(printk("stradis%d irq: FIDA\n", saa
->nr
));
548 if (astat
& SAA7146_PSR_FIDB
) {
549 IDEBUG(printk("stradis%d irq: FIDB\n", saa
->nr
));
551 if (astat
& SAA7146_PSR_PIN3
) {
552 IDEBUG(printk("stradis%d irq: PIN3\n", saa
->nr
));
554 if (astat
& SAA7146_PSR_PIN2
) {
555 IDEBUG(printk("stradis%d irq: PIN2\n", saa
->nr
));
557 if (astat
& SAA7146_PSR_PIN0
) {
558 IDEBUG(printk("stradis%d irq: PIN0\n", saa
->nr
));
560 if (astat
& SAA7146_PSR_ECS
) {
561 IDEBUG(printk("stradis%d irq: ECS\n", saa
->nr
));
563 if (astat
& SAA7146_PSR_EC3S
) {
564 IDEBUG(printk("stradis%d irq: EC3S\n", saa
->nr
));
566 if (astat
& SAA7146_PSR_EC0S
) {
567 IDEBUG(printk("stradis%d irq: EC0S\n", saa
->nr
));
572 printk(KERN_WARNING
"stradis%d: irq loop %d\n",
575 saawrite(0, SAA7146_IER
);
577 "stradis%d: IRQ loop cleared\n", saa
->nr
);
580 return IRQ_RETVAL(handled
);
583 static int ibm_send_command(struct saa7146
*saa
,
584 int command
, int data
, int chain
)
589 debiwrite(saa
, debNormal
, IBM_MP2_COMMAND
, (command
<< 1)| 1,2);
591 debiwrite(saa
, debNormal
, IBM_MP2_COMMAND
, command
<< 1, 2);
592 debiwrite(saa
, debNormal
, IBM_MP2_CMD_DATA
, data
, 2);
593 debiwrite(saa
, debNormal
, IBM_MP2_CMD_STAT
, 1, 2);
594 for (i
= 0; i
< 100 &&
595 (debiread(saa
, debNormal
, IBM_MP2_CMD_STAT
, 2) & 1); i
++)
602 static void cs4341_setlevel(struct saa7146
*saa
, int left
, int right
)
604 I2CWrite(saa
, 0x22, 0x03, left
> 94 ? 94 : left
, 2);
605 I2CWrite(saa
, 0x22, 0x04, right
> 94 ? 94 : right
, 2);
608 static void initialize_cs4341(struct saa7146
*saa
)
611 for (i
= 0; i
< 200; i
++) {
612 /* auto mute off, power on, no de-emphasis */
613 /* I2S data up to 24-bit 64xFs internal SCLK */
614 I2CWrite(saa
, 0x22, 0x01, 0x11, 2);
615 /* ATAPI mixer settings */
616 I2CWrite(saa
, 0x22, 0x02, 0x49, 2);
617 /* attenuation left 3db */
618 I2CWrite(saa
, 0x22, 0x03, 0x00, 2);
619 /* attenuation right 3db */
620 I2CWrite(saa
, 0x22, 0x04, 0x00, 2);
621 I2CWrite(saa
, 0x22, 0x01, 0x10, 2);
622 if (I2CRead(saa
, 0x22, 0x02, 1) == 0x49)
626 printk("stradis%d: CS4341 initialized (%d)\n", saa
->nr
, i
);
630 static void initialize_cs8420(struct saa7146
*saa
, int pro
)
635 sequence
= mode8420pro
;
637 sequence
= mode8420con
;
638 for (i
= 0; i
< INIT8420LEN
; i
++)
639 I2CWrite(saa
, 0x20, init8420
[i
* 2], init8420
[i
* 2 + 1], 2);
640 for (i
= 0; i
< MODE8420LEN
; i
++)
641 I2CWrite(saa
, 0x20, sequence
[i
* 2], sequence
[i
* 2 + 1], 2);
642 printk("stradis%d: CS8420 initialized\n", saa
->nr
);
645 static void initialize_saa7121(struct saa7146
*saa
, int dopal
)
650 sequence
= init7121pal
;
652 sequence
= init7121ntsc
;
653 mod
= saaread(SAA7146_PSR
) & 0x08;
654 /* initialize PAL/NTSC video encoder */
655 for (i
= 0; i
< INIT7121LEN
; i
++) {
656 if (NewCard
) { /* handle new card encoder differences */
657 if (sequence
[i
* 2] == 0x3a)
658 I2CWrite(saa
, 0x88, 0x3a, 0x13, 2);
659 else if (sequence
[i
* 2] == 0x6b)
660 I2CWrite(saa
, 0x88, 0x6b, 0x20, 2);
661 else if (sequence
[i
* 2] == 0x6c)
662 I2CWrite(saa
, 0x88, 0x6c,
663 dopal
? 0x09 : 0xf5, 2);
664 else if (sequence
[i
* 2] == 0x6d)
665 I2CWrite(saa
, 0x88, 0x6d,
666 dopal
? 0x20 : 0x00, 2);
667 else if (sequence
[i
* 2] == 0x7a)
668 I2CWrite(saa
, 0x88, 0x7a,
669 dopal
? (PALFirstActive
- 1) :
670 (NTSCFirstActive
- 4), 2);
671 else if (sequence
[i
* 2] == 0x7b)
672 I2CWrite(saa
, 0x88, 0x7b,
673 dopal
? PALLastActive
:
676 I2CWrite(saa
, 0x88, sequence
[i
* 2],
677 sequence
[i
* 2 + 1], 2);
679 if (sequence
[i
* 2] == 0x6b && mod
)
680 I2CWrite(saa
, 0x88, 0x6b,
681 (sequence
[i
* 2 + 1] ^ 0x09), 2);
682 else if (sequence
[i
* 2] == 0x7a)
683 I2CWrite(saa
, 0x88, 0x7a,
684 dopal
? (PALFirstActive
- 1) :
685 (NTSCFirstActive
- 4), 2);
686 else if (sequence
[i
* 2] == 0x7b)
687 I2CWrite(saa
, 0x88, 0x7b,
688 dopal
? PALLastActive
:
691 I2CWrite(saa
, 0x88, sequence
[i
* 2],
692 sequence
[i
* 2 + 1], 2);
697 static void set_genlock_offset(struct saa7146
*saa
, int noffset
)
700 int PixelsPerLine
= 858;
701 if (CurrentMode
== VIDEO_MODE_PAL
)
705 else if (noffset
< -500)
707 nCode
= noffset
+ 0x100;
711 nCode
= 0x400 + PixelsPerLine
+ nCode
;
712 debiwrite(saa
, debNormal
, XILINX_GLDELAY
, nCode
, 2);
715 static void set_out_format(struct saa7146
*saa
, int mode
)
717 initialize_saa7121(saa
, (mode
== VIDEO_MODE_NTSC
? 0 : 1));
718 saa
->boardcfg
[2] = mode
;
719 /* do not adjust analog video parameters here, use saa7121 init */
720 /* you will affect the SDI output on the new card */
721 if (mode
== VIDEO_MODE_PAL
) { /* PAL */
722 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0x0808, 2);
724 saawrite(0x012002c0, SAA7146_NUM_LINE_BYTE1
);
726 debiwrite(saa
, debNormal
, IBM_MP2_DISP_MODE
, 0xe100, 2);
729 debiwrite(saa
, debNormal
, IBM_MP2_DISP_MODE
,
730 NewCard
? 0xe500 : 0x6500, 2);
731 debiwrite(saa
, debNormal
, IBM_MP2_DISP_DLY
,
733 (NewCard
? PALFirstActive
: PALFirstActive
- 6), 2);
735 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0x0800, 2);
737 saawrite(0x00f002c0, SAA7146_NUM_LINE_BYTE1
);
738 debiwrite(saa
, debNormal
, IBM_MP2_DISP_MODE
,
739 NewCard
? 0xe100 : 0x6100, 2);
740 debiwrite(saa
, debNormal
, IBM_MP2_DISP_DLY
,
742 (NewCard
? NTSCFirstActive
: NTSCFirstActive
- 6), 2);
746 /* Intialize bitmangler to map from a byte value to the mangled word that
747 * must be output to program the Xilinx part through the DEBI port.
748 * Xilinx Data Bit->DEBI Bit: 0->15 1->7 2->6 3->12 4->11 5->2 6->1 7->0
749 * transfer FPGA code, init IBM chip, transfer IBM microcode
750 * rev2 card mangles: 0->7 1->6 2->5 3->4 4->3 5->2 6->1 7->0
752 static u16 bitmangler
[256];
754 static int initialize_fpga(struct video_code
*bitdata
)
756 int i
, num
, startindex
, failure
= 0, loadtwo
, loadfile
= 0;
761 /* verify fpga code */
762 for (startindex
= 0; startindex
< bitdata
->datasize
; startindex
++)
763 if (bitdata
->data
[startindex
] == 255)
765 if (startindex
== bitdata
->datasize
) {
766 printk(KERN_INFO
"stradis: bad fpga code\n");
769 /* initialize all detected cards */
770 for (num
= 0; num
< saa_num
; num
++) {
771 saa
= &saa7146s
[num
];
772 if (saa
->boardcfg
[0] > 20)
773 continue; /* card was programmed */
774 loadtwo
= (saa
->boardcfg
[18] & 0x10);
775 if (!NewCard
) /* we have an old board */
776 for (i
= 0; i
< 256; i
++)
777 bitmangler
[i
] = ((i
& 0x01) << 15) |
778 ((i
& 0x02) << 6) | ((i
& 0x04) << 4) |
779 ((i
& 0x08) << 9) | ((i
& 0x10) << 7) |
780 ((i
& 0x20) >> 3) | ((i
& 0x40) >> 5) |
782 else /* else we have a new board */
783 for (i
= 0; i
< 256; i
++)
784 bitmangler
[i
] = ((i
& 0x01) << 7) |
785 ((i
& 0x02) << 5) | ((i
& 0x04) << 3) |
786 ((i
& 0x08) << 1) | ((i
& 0x10) >> 1) |
787 ((i
& 0x20) >> 3) | ((i
& 0x40) >> 5) |
790 dmabuf
= (u16
*) saa
->dmadebi
;
791 newdma
= (u8
*) saa
->dmadebi
;
792 if (NewCard
) { /* SDM2xxx */
793 if (!strncmp(bitdata
->loadwhat
, "decoder2", 8))
794 continue; /* fpga not for this card */
795 if (!strncmp(&saa
->boardcfg
[42], bitdata
->loadwhat
, 8))
797 else if (loadtwo
&& !strncmp(&saa
->boardcfg
[19],
798 bitdata
->loadwhat
, 8))
800 else if (!saa
->boardcfg
[42] && !strncmp("decxl",
801 bitdata
->loadwhat
, 8))
802 loadfile
= 1; /* special */
804 continue; /* fpga not for this card */
805 if (loadfile
!= 1 && loadfile
!= 2)
806 continue; /* skip to next card */
807 if (saa
->boardcfg
[0] && loadfile
== 1)
808 continue; /* skip to next card */
809 if (saa
->boardcfg
[0] != 1 && loadfile
== 2)
810 continue; /* skip to next card */
811 saa
->boardcfg
[0]++; /* mark fpga handled */
812 printk("stradis%d: loading %s\n", saa
->nr
,
814 if (loadtwo
&& loadfile
== 2)
815 goto send_fpga_stuff
;
816 /* turn on the Audio interface to set PROG low */
817 saawrite(0x00400040, SAA7146_GPIO_CTRL
);
818 saaread(SAA7146_PSR
); /* ensure posted write */
819 /* wait for everyone to reset */
821 saawrite(0x00400000, SAA7146_GPIO_CTRL
);
822 } else { /* original card */
823 if (strncmp(bitdata
->loadwhat
, "decoder2", 8))
824 continue; /* fpga not for this card */
825 /* Pull the Xilinx PROG signal WS3 low */
826 saawrite(0x02000200, SAA7146_MC1
);
827 /* Turn on the Audio interface so can set PROG low */
828 saawrite(0x000000c0, SAA7146_ACON1
);
829 /* Pull the Xilinx INIT signal (GPIO2) low */
830 saawrite(0x00400000, SAA7146_GPIO_CTRL
);
831 /* Make sure everybody resets */
832 saaread(SAA7146_PSR
); /* ensure posted write */
834 /* Release the Xilinx PROG signal */
835 saawrite(0x00000000, SAA7146_ACON1
);
836 /* Turn off the Audio interface */
837 saawrite(0x02000000, SAA7146_MC1
);
839 /* Release Xilinx INIT signal (WS2) */
840 saawrite(0x00000000, SAA7146_GPIO_CTRL
);
841 /* Wait for the INIT to go High */
843 i
< 10000 && !(saaread(SAA7146_PSR
) & SAA7146_PSR_PIN2
);
847 printk(KERN_INFO
"stradis%d: no fpga INIT\n", saa
->nr
);
852 for (i
= startindex
; i
< bitdata
->datasize
; i
++)
853 newdma
[i
- startindex
] =
854 bitmangler
[bitdata
->data
[i
]];
855 debiwrite(saa
, 0x01420000, 0, 0,
856 ((bitdata
->datasize
- startindex
) + 5));
857 if (loadtwo
&& loadfile
== 1) {
858 printk("stradis%d: awaiting 2nd FPGA bitfile\n",
860 continue; /* skip to next card */
863 for (i
= startindex
; i
< bitdata
->datasize
; i
++)
864 dmabuf
[i
- startindex
] =
865 bitmangler
[bitdata
->data
[i
]];
866 debiwrite(saa
, 0x014a0000, 0, 0,
867 ((bitdata
->datasize
- startindex
) + 5) * 2);
870 i
< 1000 && !(saaread(SAA7146_PSR
) & SAA7146_PSR_PIN2
);
874 printk(KERN_INFO
"stradis%d: FPGA load failed\n",
880 /* Pull the Xilinx INIT signal (GPIO2) low */
881 saawrite(0x00400000, SAA7146_GPIO_CTRL
);
882 saaread(SAA7146_PSR
); /* ensure posted write */
884 saawrite(0x00000000, SAA7146_GPIO_CTRL
);
887 printk(KERN_INFO
"stradis%d: FPGA Loaded\n", saa
->nr
);
888 saa
->boardcfg
[0] = 26; /* mark fpga programmed */
889 /* set VXCO to its lowest frequency */
890 debiwrite(saa
, debNormal
, XILINX_PWM
, 0, 2);
894 debiwrite(saa
, debNormal
, XILINX_CS3310_CMPLT
,
896 /* set VXCO to PWM mode, release reset, blank on */
897 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0xffc4, 2);
901 debiwrite(saa
, debNormal
, XILINX_CTL0
,
904 /* set source Black */
905 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0x1707, 2);
906 saa
->boardcfg
[4] = 22; /* set NTSC First Active Line */
907 saa
->boardcfg
[5] = 23; /* set PAL First Active Line */
908 saa
->boardcfg
[54] = 2; /* set NTSC Last Active Line - 256 */
909 saa
->boardcfg
[55] = 54; /* set PAL Last Active Line - 256 */
910 set_out_format(saa
, VIDEO_MODE_NTSC
);
912 /* begin IBM chip init */
913 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, 4, 2);
914 saaread(SAA7146_PSR
); /* wait for reset */
916 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, 0, 2);
917 debiread(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, 2);
918 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, 0x10, 2);
919 debiwrite(saa
, debNormal
, IBM_MP2_CMD_ADDR
, 0, 2);
920 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_MODE
, 0x2e, 2);
923 /* set i2s rate converter to 48KHz */
924 debiwrite(saa
, debNormal
, 0x80c0, 6, 2);
925 /* we must init CS8420 first since rev b pulls i2s */
926 /* master clock low and CS4341 needs i2s master to */
927 /* run the i2c port. */
929 /* 0=consumer, 1=pro */
930 initialize_cs8420(saa
, 0);
934 initialize_cs4341(saa
);
936 debiwrite(saa
, debNormal
, IBM_MP2_INFC_CTL
, 0x48, 2);
937 debiwrite(saa
, debNormal
, IBM_MP2_BEEP_CTL
, 0xa000, 2);
938 debiwrite(saa
, debNormal
, IBM_MP2_DISP_LBOR
, 0, 2);
939 debiwrite(saa
, debNormal
, IBM_MP2_DISP_TBOR
, 0, 2);
941 set_genlock_offset(saa
, 0);
942 debiwrite(saa
, debNormal
, IBM_MP2_FRNT_ATTEN
, 0, 2);
945 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0x8000, 2);
947 /* disable genlock */
948 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0x8080, 2);
955 static int do_ibm_reset(struct saa7146
*saa
)
957 /* failure if decoder not previously programmed */
958 if (saa
->boardcfg
[0] < 37)
962 debiwrite(saa
, debNormal
, XILINX_CS3310_CMPLT
, 0, 2);
963 /* disable interrupts */
964 saawrite(0, SAA7146_IER
);
965 saa
->audhead
= saa
->audtail
= 0;
966 saa
->vidhead
= saa
->vidtail
= 0;
967 /* tristate debi bus, disable debi transfers */
968 saawrite(0x00880000, SAA7146_MC1
);
969 /* ensure posted write */
970 saaread(SAA7146_MC1
);
972 /* re-enable debi transfers */
973 saawrite(0x00880088, SAA7146_MC1
);
974 /* set source Black */
975 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0x1707, 2);
976 /* begin IBM chip init */
977 set_out_format(saa
, CurrentMode
);
978 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, 4, 2);
979 saaread(SAA7146_PSR
); /* wait for reset */
981 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, 0, 2);
982 debiread(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, 2);
983 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, ChipControl
, 2);
984 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_MODE
, 0x2e, 2);
987 /* set i2s rate converter to 48KHz */
988 debiwrite(saa
, debNormal
, 0x80c0, 6, 2);
989 /* we must init CS8420 first since rev b pulls i2s */
990 /* master clock low and CS4341 needs i2s master to */
991 /* run the i2c port. */
993 /* 0=consumer, 1=pro */
994 initialize_cs8420(saa
, 1);
998 initialize_cs4341(saa
);
1000 debiwrite(saa
, debNormal
, IBM_MP2_INFC_CTL
, 0x48, 2);
1001 debiwrite(saa
, debNormal
, IBM_MP2_BEEP_CTL
, 0xa000, 2);
1002 debiwrite(saa
, debNormal
, IBM_MP2_DISP_LBOR
, 0, 2);
1003 debiwrite(saa
, debNormal
, IBM_MP2_DISP_TBOR
, 0, 2);
1005 set_genlock_offset(saa
, 0);
1006 debiwrite(saa
, debNormal
, IBM_MP2_FRNT_ATTEN
, 0, 2);
1007 debiwrite(saa
, debNormal
, IBM_MP2_OSD_SIZE
, 0x2000, 2);
1008 debiwrite(saa
, debNormal
, IBM_MP2_AUD_CTL
, 0x4552, 2);
1009 if (ibm_send_command(saa
, IBM_MP2_CONFIG_DECODER
,
1010 (ChipControl
== 0x43 ? 0xe800 : 0xe000), 1)) {
1011 printk(KERN_ERR
"stradis%d: IBM config failed\n", saa
->nr
);
1014 int i
= CS3310MaxLvl
;
1015 debiwrite(saa
, debNormal
, XILINX_CS3310_CMPLT
, ((i
<< 8)| i
),2);
1017 /* start video decoder */
1018 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
, ChipControl
, 2);
1019 /* 256k vid, 3520 bytes aud */
1020 debiwrite(saa
, debNormal
, IBM_MP2_RB_THRESHOLD
, 0x4037, 2);
1021 debiwrite(saa
, debNormal
, IBM_MP2_AUD_CTL
, 0x4573, 2);
1022 ibm_send_command(saa
, IBM_MP2_PLAY
, 0, 0);
1023 /* enable buffer threshold irq */
1024 debiwrite(saa
, debNormal
, IBM_MP2_MASK0
, 0xc00c, 2);
1025 /* clear pending interrupts */
1026 debiread(saa
, debNormal
, IBM_MP2_HOST_INT
, 2);
1027 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0x1711, 2);
1032 /* load the decoder microcode */
1033 static int initialize_ibmmpeg2(struct video_code
*microcode
)
1036 struct saa7146
*saa
;
1038 for (num
= 0; num
< saa_num
; num
++) {
1039 saa
= &saa7146s
[num
];
1040 /* check that FPGA is loaded */
1041 debiwrite(saa
, debNormal
, IBM_MP2_OSD_SIZE
, 0xa55a, 2);
1042 i
= debiread(saa
, debNormal
, IBM_MP2_OSD_SIZE
, 2);
1044 printk(KERN_INFO
"stradis%d: %04x != 0xa55a\n",
1050 if (!strncmp(microcode
->loadwhat
, "decoder.vid", 11)) {
1051 if (saa
->boardcfg
[0] > 27)
1052 continue; /* skip to next card */
1053 /* load video control store */
1054 saa
->boardcfg
[1] = 0x13; /* no-sync default */
1055 debiwrite(saa
, debNormal
, IBM_MP2_WR_PROT
, 1, 2);
1056 debiwrite(saa
, debNormal
, IBM_MP2_PROC_IADDR
, 0, 2);
1057 for (i
= 0; i
< microcode
->datasize
/ 2; i
++)
1058 debiwrite(saa
, debNormal
, IBM_MP2_PROC_IDATA
,
1059 (microcode
->data
[i
* 2] << 8) |
1060 microcode
->data
[i
* 2 + 1], 2);
1061 debiwrite(saa
, debNormal
, IBM_MP2_PROC_IADDR
, 0, 2);
1062 debiwrite(saa
, debNormal
, IBM_MP2_WR_PROT
, 0, 2);
1063 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
,
1065 saa
->boardcfg
[0] = 28;
1067 if (!strncmp(microcode
->loadwhat
, "decoder.aud", 11)) {
1068 if (saa
->boardcfg
[0] > 35)
1069 continue; /* skip to next card */
1070 /* load audio control store */
1071 debiwrite(saa
, debNormal
, IBM_MP2_WR_PROT
, 1, 2);
1072 debiwrite(saa
, debNormal
, IBM_MP2_AUD_IADDR
, 0, 2);
1073 for (i
= 0; i
< microcode
->datasize
; i
++)
1074 debiwrite(saa
, debNormal
, IBM_MP2_AUD_IDATA
,
1075 microcode
->data
[i
], 1);
1076 debiwrite(saa
, debNormal
, IBM_MP2_AUD_IADDR
, 0, 2);
1077 debiwrite(saa
, debNormal
, IBM_MP2_WR_PROT
, 0, 2);
1078 debiwrite(saa
, debNormal
, IBM_MP2_OSD_SIZE
, 0x2000, 2);
1079 debiwrite(saa
, debNormal
, IBM_MP2_AUD_CTL
, 0x4552, 2);
1080 if (ibm_send_command(saa
, IBM_MP2_CONFIG_DECODER
,
1082 printk(KERN_ERR
"stradis%d: IBM config "
1083 "failed\n", saa
->nr
);
1086 /* set PWM to center value */
1088 debiwrite(saa
, debNormal
, XILINX_PWM
,
1090 (saa
->boardcfg
[13] << 8), 2);
1092 debiwrite(saa
, debNormal
, XILINX_PWM
, 0x46, 2);
1096 debiwrite(saa
, debNormal
, XILINX_CS3310_CMPLT
,
1099 printk(KERN_INFO
"stradis%d: IBM MPEGCD%d Inited\n",
1100 saa
->nr
, 18 + (debiread(saa
, debNormal
,
1101 IBM_MP2_CHIP_CONTROL
, 2) >> 12));
1102 /* start video decoder */
1103 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
,
1105 debiwrite(saa
, debNormal
, IBM_MP2_RB_THRESHOLD
, 0x4037,
1106 2); /* 256k vid, 3520 bytes aud */
1107 debiwrite(saa
, debNormal
, IBM_MP2_AUD_CTL
, 0x4573, 2);
1108 ibm_send_command(saa
, IBM_MP2_PLAY
, 0, 0);
1109 /* enable buffer threshold irq */
1110 debiwrite(saa
, debNormal
, IBM_MP2_MASK0
, 0xc00c, 2);
1111 debiread(saa
, debNormal
, IBM_MP2_HOST_INT
, 2);
1112 /* enable gpio irq */
1113 saawrite(0x00002000, SAA7146_GPIO_CTRL
);
1114 /* enable decoder output to HPS */
1115 debiwrite(saa
, debNormal
, XILINX_CTL0
, 0x1711, 2);
1116 saa
->boardcfg
[0] = 37;
1123 static u32 palette2fmt
[] = { /* some of these YUV translations are wrong */
1124 0xffffffff, 0x86000000, 0x87000000, 0x80000000, 0x8100000, 0x82000000,
1125 0x83000000, 0x00000000, 0x03000000, 0x03000000, 0x0a00000, 0x03000000,
1126 0x06000000, 0x00000000, 0x03000000, 0x0a000000, 0x0300000
1128 static int bpp2fmt
[4] = {
1129 VIDEO_PALETTE_HI240
, VIDEO_PALETTE_RGB565
, VIDEO_PALETTE_RGB24
,
1133 /* I wish I could find a formula to calculate these... */
1134 static u32 h_prescale
[64] = {
1135 0x10000000, 0x18040202, 0x18080000, 0x380c0606, 0x38100204, 0x38140808,
1136 0x38180000, 0x381c0000, 0x3820161c, 0x38242a3b, 0x38281230, 0x382c4460,
1137 0x38301040, 0x38340080, 0x38380000, 0x383c0000, 0x3840fefe, 0x3844ee9f,
1138 0x3848ee9f, 0x384cee9f, 0x3850ee9f, 0x38542a3b, 0x38581230, 0x385c0000,
1139 0x38600000, 0x38640000, 0x38680000, 0x386c0000, 0x38700000, 0x38740000,
1140 0x38780000, 0x387c0000, 0x30800000, 0x38840000, 0x38880000, 0x388c0000,
1141 0x38900000, 0x38940000, 0x38980000, 0x389c0000, 0x38a00000, 0x38a40000,
1142 0x38a80000, 0x38ac0000, 0x38b00000, 0x38b40000, 0x38b80000, 0x38bc0000,
1143 0x38c00000, 0x38c40000, 0x38c80000, 0x38cc0000, 0x38d00000, 0x38d40000,
1144 0x38d80000, 0x38dc0000, 0x38e00000, 0x38e40000, 0x38e80000, 0x38ec0000,
1145 0x38f00000, 0x38f40000, 0x38f80000, 0x38fc0000,
1147 static u32 v_gain
[64] = {
1148 0x016000ff, 0x016100ff, 0x016100ff, 0x016200ff, 0x016200ff, 0x016200ff,
1149 0x016200ff, 0x016300ff, 0x016300ff, 0x016300ff, 0x016300ff, 0x016300ff,
1150 0x016300ff, 0x016300ff, 0x016300ff, 0x016400ff, 0x016400ff, 0x016400ff,
1151 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff,
1152 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff,
1153 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff,
1154 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff,
1155 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff,
1156 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff,
1157 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff,
1158 0x016400ff, 0x016400ff, 0x016400ff, 0x016400ff,
1161 static void saa7146_set_winsize(struct saa7146
*saa
)
1164 int offset
, yacl
, ysci
;
1165 saa
->win
.color_fmt
= format
=
1166 (saa
->win
.depth
== 15) ? palette2fmt
[VIDEO_PALETTE_RGB555
] :
1167 palette2fmt
[bpp2fmt
[(saa
->win
.bpp
- 1) & 3]];
1168 offset
= saa
->win
.x
* saa
->win
.bpp
+ saa
->win
.y
* saa
->win
.bpl
;
1169 saawrite(saa
->win
.vidadr
+ offset
, SAA7146_BASE_EVEN1
);
1170 saawrite(saa
->win
.vidadr
+ offset
+ saa
->win
.bpl
, SAA7146_BASE_ODD1
);
1171 saawrite(saa
->win
.bpl
* 2, SAA7146_PITCH1
);
1172 saawrite(saa
->win
.vidadr
+ saa
->win
.bpl
* saa
->win
.sheight
,
1173 SAA7146_PROT_ADDR1
);
1174 saawrite(0, SAA7146_PAGE1
);
1175 saawrite(format
| 0x60, SAA7146_CLIP_FORMAT_CTRL
);
1176 offset
= (704 / (saa
->win
.width
- 1)) & 0x3f;
1177 saawrite(h_prescale
[offset
], SAA7146_HPS_H_PRESCALE
);
1178 offset
= (720896 / saa
->win
.width
) / (offset
+ 1);
1179 saawrite((offset
<< 12) | 0x0c, SAA7146_HPS_H_SCALE
);
1180 if (CurrentMode
== VIDEO_MODE_NTSC
) {
1181 yacl
= /*(480 / saa->win.height - 1) & 0x3f */ 0;
1182 ysci
= 1024 - (saa
->win
.height
* 1024 / 480);
1184 yacl
= /*(576 / saa->win.height - 1) & 0x3f */ 0;
1185 ysci
= 1024 - (saa
->win
.height
* 1024 / 576);
1187 saawrite((1 << 31) | (ysci
<< 21) | (yacl
<< 15), SAA7146_HPS_V_SCALE
);
1188 saawrite(v_gain
[yacl
], SAA7146_HPS_V_GAIN
);
1189 saawrite(((SAA7146_MC2_UPLD_DMA1
| SAA7146_MC2_UPLD_HPS_V
|
1190 SAA7146_MC2_UPLD_HPS_H
) << 16) | (SAA7146_MC2_UPLD_DMA1
|
1191 SAA7146_MC2_UPLD_HPS_V
| SAA7146_MC2_UPLD_HPS_H
), SAA7146_MC2
);
1194 /* clip_draw_rectangle(cm,x,y,w,h) -- handle clipping an area
1195 * bitmap is fixed width, 128 bytes (1024 pixels represented)
1196 * arranged most-sigificant-bit-left in 32-bit words
1197 * based on saa7146 clipping hardware, it swaps bytes if LE
1198 * much of this makes up for egcs brain damage -- so if you
1199 * are wondering "why did he do this?" it is because the C
1200 * was adjusted to generate the optimal asm output without
1201 * writing non-portable __asm__ directives.
1204 static void clip_draw_rectangle(u32
*clipmap
, int x
, int y
, int w
, int h
)
1206 register int startword
, endword
;
1207 register u32 bitsleft
, bitsright
;
1217 if (w
<= 0 || h
<= 0 || x
> 1023 || y
> 639)
1218 return; /* throw away bad clips */
1223 startword
= (x
>> 5);
1224 endword
= ((x
+ w
) >> 5);
1225 bitsleft
= (0xffffffff >> (x
& 31));
1226 bitsright
= (0xffffffff << (~((x
+ w
) - (endword
<< 5))));
1227 temp
= &clipmap
[(y
<< 5) + startword
];
1228 w
= endword
- startword
;
1230 bitsleft
|= bitsright
;
1231 for (y
= 0; y
< h
; y
++) {
1236 for (y
= 0; y
< h
; y
++) {
1237 *temp
++ |= bitsleft
;
1238 for (x
= 1; x
< w
; x
++)
1239 *temp
++ = 0xffffffff;
1246 static void make_clip_tab(struct saa7146
*saa
, struct video_clip
*cr
, int ncr
)
1248 int i
, width
, height
;
1251 clipmap
= saa
->dmavid2
;
1252 if ((width
= saa
->win
.width
) > 1023)
1253 width
= 1023; /* sanity check */
1254 if ((height
= saa
->win
.height
) > 640)
1255 height
= 639; /* sanity check */
1256 if (ncr
> 0) { /* rectangles pased */
1257 /* convert rectangular clips to a bitmap */
1258 memset(clipmap
, 0, VIDEO_CLIPMAP_SIZE
); /* clear map */
1259 for (i
= 0; i
< ncr
; i
++)
1260 clip_draw_rectangle(clipmap
, cr
[i
].x
, cr
[i
].y
,
1261 cr
[i
].width
, cr
[i
].height
);
1263 /* clip against viewing window AND screen
1264 so we do not have to rely on the user program
1266 clip_draw_rectangle(clipmap
, (saa
->win
.x
+ width
> saa
->win
.swidth
) ?
1267 (saa
->win
.swidth
- saa
->win
.x
) : width
, 0, 1024, 768);
1268 clip_draw_rectangle(clipmap
, 0,
1269 (saa
->win
.y
+ height
> saa
->win
.sheight
) ?
1270 (saa
->win
.sheight
- saa
->win
.y
) : height
, 1024, 768);
1272 clip_draw_rectangle(clipmap
, 0, 0, -saa
->win
.x
, 768);
1274 clip_draw_rectangle(clipmap
, 0, 0, 1024, -saa
->win
.y
);
1277 static int saa_ioctl(struct inode
*inode
, struct file
*file
,
1278 unsigned int cmd
, unsigned long argl
)
1280 struct saa7146
*saa
= file
->private_data
;
1281 void __user
*arg
= (void __user
*)argl
;
1286 struct video_capability b
;
1287 strcpy(b
.name
, saa
->video_dev
.name
);
1288 b
.type
= VID_TYPE_CAPTURE
| VID_TYPE_OVERLAY
|
1289 VID_TYPE_CLIPPING
| VID_TYPE_FRAMERAM
|
1297 if (copy_to_user(arg
, &b
, sizeof(b
)))
1303 struct video_picture p
= saa
->picture
;
1304 if (saa
->win
.depth
== 8)
1305 p
.palette
= VIDEO_PALETTE_HI240
;
1306 if (saa
->win
.depth
== 15)
1307 p
.palette
= VIDEO_PALETTE_RGB555
;
1308 if (saa
->win
.depth
== 16)
1309 p
.palette
= VIDEO_PALETTE_RGB565
;
1310 if (saa
->win
.depth
== 24)
1311 p
.palette
= VIDEO_PALETTE_RGB24
;
1312 if (saa
->win
.depth
== 32)
1313 p
.palette
= VIDEO_PALETTE_RGB32
;
1314 if (copy_to_user(arg
, &p
, sizeof(p
)))
1320 struct video_picture p
;
1322 if (copy_from_user(&p
, arg
, sizeof(p
)))
1324 if (p
.palette
< ARRAY_SIZE(palette2fmt
)) {
1325 format
= palette2fmt
[p
.palette
];
1326 saa
->win
.color_fmt
= format
;
1327 saawrite(format
| 0x60,
1328 SAA7146_CLIP_FORMAT_CTRL
);
1330 saawrite(((p
.brightness
& 0xff00) << 16) |
1331 ((p
.contrast
& 0xfe00) << 7) |
1332 ((p
.colour
& 0xfe00) >> 9), SAA7146_BCS_CTRL
);
1334 /* upload changed registers */
1335 saawrite(((SAA7146_MC2_UPLD_HPS_H
|
1336 SAA7146_MC2_UPLD_HPS_V
) << 16) |
1337 SAA7146_MC2_UPLD_HPS_H
|
1338 SAA7146_MC2_UPLD_HPS_V
, SAA7146_MC2
);
1343 struct video_window vw
;
1344 struct video_clip
*vcp
= NULL
;
1346 if (copy_from_user(&vw
, arg
, sizeof(vw
)))
1350 if (vw
.flags
|| vw
.width
< 16 || vw
.height
< 16) {
1351 saawrite((SAA7146_MC1_TR_E_1
<< 16),
1355 /* 32-bit align start and adjust width */
1356 if (saa
->win
.bpp
< 4) {
1358 vw
.x
= (vw
.x
+ 3) & ~3;
1364 saa
->win
.width
= vw
.width
;
1365 if (saa
->win
.width
> 768)
1366 saa
->win
.width
= 768;
1367 saa
->win
.height
= vw
.height
;
1368 if (CurrentMode
== VIDEO_MODE_NTSC
) {
1369 if (saa
->win
.height
> 480)
1370 saa
->win
.height
= 480;
1372 if (saa
->win
.height
> 576)
1373 saa
->win
.height
= 576;
1377 saawrite((SAA7146_MC1_TR_E_1
<< 16), SAA7146_MC1
);
1378 saa7146_set_winsize(saa
);
1383 if (vw
.clipcount
< 0) {
1384 if (copy_from_user(saa
->dmavid2
, vw
.clips
,
1385 VIDEO_CLIPMAP_SIZE
))
1387 } else if (vw
.clipcount
> 16384) {
1389 } else if (vw
.clipcount
> 0) {
1390 vcp
= vmalloc(sizeof(struct video_clip
) *
1394 if (copy_from_user(vcp
, vw
.clips
,
1395 sizeof(struct video_clip
) *
1400 } else /* nothing clipped */
1401 memset(saa
->dmavid2
, 0, VIDEO_CLIPMAP_SIZE
);
1403 make_clip_tab(saa
, vcp
, vw
.clipcount
);
1404 if (vw
.clipcount
> 0)
1407 /* start capture & clip dma if we have an address */
1408 if ((saa
->cap
& 3) && saa
->win
.vidadr
!= 0)
1409 saawrite(((SAA7146_MC1_TR_E_1
|
1410 SAA7146_MC1_TR_E_2
) << 16) | 0xffff,
1416 struct video_window vw
;
1419 vw
.width
= saa
->win
.width
;
1420 vw
.height
= saa
->win
.height
;
1423 if (copy_to_user(arg
, &vw
, sizeof(vw
)))
1430 if (copy_from_user(&v
, arg
, sizeof(v
)))
1434 saawrite((SAA7146_MC1_TR_E_1
<< 16),
1437 if (saa
->win
.vidadr
== 0 || saa
->win
.width
== 0
1438 || saa
->win
.height
== 0)
1441 saawrite((SAA7146_MC1_TR_E_1
<< 16) | 0xffff,
1448 struct video_buffer v
;
1449 v
.base
= (void *)saa
->win
.vidadr
;
1450 v
.height
= saa
->win
.sheight
;
1451 v
.width
= saa
->win
.swidth
;
1452 v
.depth
= saa
->win
.depth
;
1453 v
.bytesperline
= saa
->win
.bpl
;
1454 if (copy_to_user(arg
, &v
, sizeof(v
)))
1461 struct video_buffer v
;
1462 if (!capable(CAP_SYS_ADMIN
))
1464 if (copy_from_user(&v
, arg
, sizeof(v
)))
1466 if (v
.depth
!= 8 && v
.depth
!= 15 && v
.depth
!= 16 &&
1467 v
.depth
!= 24 && v
.depth
!= 32 && v
.width
> 16 &&
1468 v
.height
> 16 && v
.bytesperline
> 16)
1471 saa
->win
.vidadr
= (unsigned long)v
.base
;
1472 saa
->win
.sheight
= v
.height
;
1473 saa
->win
.swidth
= v
.width
;
1474 saa
->win
.bpp
= ((v
.depth
+ 7) & 0x38) / 8;
1475 saa
->win
.depth
= v
.depth
;
1476 saa
->win
.bpl
= v
.bytesperline
;
1478 DEBUG(printk("Display at %p is %d by %d, bytedepth %d, "
1479 "bpl %d\n", v
.base
, v
.width
, v
.height
,
1480 saa
->win
.bpp
, saa
->win
.bpl
));
1481 saa7146_set_winsize(saa
);
1486 /* Will be handled higher up .. */
1492 struct video_audio v
;
1494 v
.flags
&= ~(VIDEO_AUDIO_MUTE
| VIDEO_AUDIO_MUTABLE
);
1495 v
.flags
|= VIDEO_AUDIO_MUTABLE
| VIDEO_AUDIO_VOLUME
;
1496 strcpy(v
.name
, "MPEG");
1497 v
.mode
= VIDEO_SOUND_STEREO
;
1498 if (copy_to_user(arg
, &v
, sizeof(v
)))
1504 struct video_audio v
;
1506 if (copy_from_user(&v
, arg
, sizeof(v
)))
1508 i
= (~(v
.volume
>> 8)) & 0xff;
1510 if (v
.flags
& VIDEO_AUDIO_MUTE
)
1511 debiwrite(saa
, debNormal
,
1512 IBM_MP2_FRNT_ATTEN
, 0xffff, 2);
1513 if (!(v
.flags
& VIDEO_AUDIO_MUTE
))
1514 debiwrite(saa
, debNormal
,
1515 IBM_MP2_FRNT_ATTEN
, 0x0000, 2);
1516 if (v
.flags
& VIDEO_AUDIO_VOLUME
)
1517 debiwrite(saa
, debNormal
,
1521 if (v
.flags
& VIDEO_AUDIO_MUTE
)
1522 cs4341_setlevel(saa
, 0xff, 0xff);
1523 if (!(v
.flags
& VIDEO_AUDIO_MUTE
))
1524 cs4341_setlevel(saa
, 0, 0);
1525 if (v
.flags
& VIDEO_AUDIO_VOLUME
)
1526 cs4341_setlevel(saa
, i
, i
);
1534 struct video_unit vu
;
1535 vu
.video
= saa
->video_dev
.minor
;
1536 vu
.vbi
= VIDEO_NO_UNIT
;
1537 vu
.radio
= VIDEO_NO_UNIT
;
1538 vu
.audio
= VIDEO_NO_UNIT
;
1539 vu
.teletext
= VIDEO_NO_UNIT
;
1540 if (copy_to_user(arg
, &vu
, sizeof(vu
)))
1544 case VIDIOCSPLAYMODE
:
1546 struct video_play_mode pmode
;
1547 if (copy_from_user((void *)&pmode
, arg
,
1548 sizeof(struct video_play_mode
)))
1550 switch (pmode
.mode
) {
1551 case VID_PLAY_VID_OUT_MODE
:
1552 if (pmode
.p1
!= VIDEO_MODE_NTSC
&&
1553 pmode
.p1
!= VIDEO_MODE_PAL
)
1555 set_out_format(saa
, pmode
.p1
);
1557 case VID_PLAY_GENLOCK
:
1558 debiwrite(saa
, debNormal
, XILINX_CTL0
,
1559 pmode
.p1
? 0x8000 : 0x8080, 2);
1561 set_genlock_offset(saa
, pmode
.p2
);
1563 case VID_PLAY_NORMAL
:
1564 debiwrite(saa
, debNormal
,
1565 IBM_MP2_CHIP_CONTROL
, ChipControl
, 2);
1566 ibm_send_command(saa
, IBM_MP2_PLAY
, 0, 0);
1567 saa
->playmode
= pmode
.mode
;
1569 case VID_PLAY_PAUSE
:
1570 /* IBM removed the PAUSE command */
1571 /* they say use SINGLE_FRAME now */
1572 case VID_PLAY_SINGLE_FRAME
:
1573 ibm_send_command(saa
, IBM_MP2_SINGLE_FRAME
,0,0);
1574 if (saa
->playmode
== pmode
.mode
) {
1575 debiwrite(saa
, debNormal
,
1576 IBM_MP2_CHIP_CONTROL
,
1579 saa
->playmode
= pmode
.mode
;
1581 case VID_PLAY_FAST_FORWARD
:
1582 ibm_send_command(saa
, IBM_MP2_FAST_FORWARD
,0,0);
1583 saa
->playmode
= pmode
.mode
;
1585 case VID_PLAY_SLOW_MOTION
:
1586 ibm_send_command(saa
, IBM_MP2_SLOW_MOTION
,
1588 saa
->playmode
= pmode
.mode
;
1590 case VID_PLAY_IMMEDIATE_NORMAL
:
1591 /* ensure transfers resume */
1592 debiwrite(saa
, debNormal
,
1593 IBM_MP2_CHIP_CONTROL
, ChipControl
, 2);
1594 ibm_send_command(saa
, IBM_MP2_IMED_NORM_PLAY
,
1596 saa
->playmode
= VID_PLAY_NORMAL
;
1598 case VID_PLAY_SWITCH_CHANNELS
:
1599 saa
->audhead
= saa
->audtail
= 0;
1600 saa
->vidhead
= saa
->vidtail
= 0;
1601 ibm_send_command(saa
, IBM_MP2_FREEZE_FRAME
,0,1);
1602 ibm_send_command(saa
, IBM_MP2_RESET_AUD_RATE
,
1604 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
,
1606 ibm_send_command(saa
, IBM_MP2_CHANNEL_SWITCH
,
1608 debiwrite(saa
, debNormal
, IBM_MP2_CHIP_CONTROL
,
1610 ibm_send_command(saa
, IBM_MP2_PLAY
, 0, 0);
1611 saa
->playmode
= VID_PLAY_NORMAL
;
1613 case VID_PLAY_FREEZE_FRAME
:
1614 ibm_send_command(saa
, IBM_MP2_FREEZE_FRAME
,0,0);
1615 saa
->playmode
= pmode
.mode
;
1617 case VID_PLAY_STILL_MODE
:
1618 ibm_send_command(saa
, IBM_MP2_SET_STILL_MODE
,
1620 saa
->playmode
= pmode
.mode
;
1622 case VID_PLAY_MASTER_MODE
:
1623 if (pmode
.p1
== VID_PLAY_MASTER_NONE
)
1624 saa
->boardcfg
[1] = 0x13;
1625 else if (pmode
.p1
== VID_PLAY_MASTER_VIDEO
)
1626 saa
->boardcfg
[1] = 0x23;
1627 else if (pmode
.p1
== VID_PLAY_MASTER_AUDIO
)
1628 saa
->boardcfg
[1] = 0x43;
1631 debiwrite(saa
, debNormal
,
1632 IBM_MP2_CHIP_CONTROL
, ChipControl
, 2);
1634 case VID_PLAY_ACTIVE_SCANLINES
:
1635 if (CurrentMode
== VIDEO_MODE_PAL
) {
1636 if (pmode
.p1
< 1 || pmode
.p2
> 625)
1638 saa
->boardcfg
[5] = pmode
.p1
;
1639 saa
->boardcfg
[55] = (pmode
.p1
+
1640 (pmode
.p2
/ 2) - 1) & 0xff;
1642 if (pmode
.p1
< 4 || pmode
.p2
> 525)
1644 saa
->boardcfg
[4] = pmode
.p1
;
1645 saa
->boardcfg
[54] = (pmode
.p1
+
1646 (pmode
.p2
/ 2) - 4) & 0xff;
1648 set_out_format(saa
, CurrentMode
);
1649 case VID_PLAY_RESET
:
1650 return do_ibm_reset(saa
);
1651 case VID_PLAY_END_MARK
:
1652 if (saa
->endmarktail
< saa
->endmarkhead
) {
1653 if (saa
->endmarkhead
-
1654 saa
->endmarktail
< 2)
1656 } else if (saa
->endmarkhead
<=saa
->endmarktail
){
1657 if (saa
->endmarktail
- saa
->endmarkhead
1662 saa
->endmark
[saa
->endmarktail
] = saa
->audtail
;
1664 if (saa
->endmarktail
>= MAX_MARKS
)
1665 saa
->endmarktail
= 0;
1669 case VIDIOCSWRITEMODE
:
1672 if (copy_from_user((void *)&mode
, arg
, sizeof(int)))
1674 if (mode
== VID_WRITE_MPEG_AUD
||
1675 mode
== VID_WRITE_MPEG_VID
||
1676 mode
== VID_WRITE_CC
||
1677 mode
== VID_WRITE_TTX
||
1678 mode
== VID_WRITE_OSD
) {
1679 saa
->writemode
= mode
;
1684 case VIDIOCSMICROCODE
:
1686 struct video_code ucode
;
1689 if (copy_from_user(&ucode
, arg
, sizeof(ucode
)))
1691 if (ucode
.datasize
> 65536 || ucode
.datasize
< 1024 ||
1692 strncmp(ucode
.loadwhat
, "dec", 3))
1694 if ((udata
= vmalloc(ucode
.datasize
)) == NULL
)
1696 if (copy_from_user(udata
, ucode
.data
, ucode
.datasize
)) {
1701 if (!strncmp(ucode
.loadwhat
, "decoder.aud", 11) ||
1702 !strncmp(ucode
.loadwhat
, "decoder.vid", 11))
1703 i
= initialize_ibmmpeg2(&ucode
);
1705 i
= initialize_fpga(&ucode
);
1712 case VIDIOCGCHAN
: /* this makes xawtv happy */
1714 struct video_channel v
;
1715 if (copy_from_user(&v
, arg
, sizeof(v
)))
1717 v
.flags
= VIDEO_VC_AUDIO
;
1719 v
.type
= VID_TYPE_MPEG_DECODER
;
1720 v
.norm
= CurrentMode
;
1721 strcpy(v
.name
, "MPEG2");
1722 if (copy_to_user(arg
, &v
, sizeof(v
)))
1726 case VIDIOCSCHAN
: /* this makes xawtv happy */
1728 struct video_channel v
;
1729 if (copy_from_user(&v
, arg
, sizeof(v
)))
1735 return -ENOIOCTLCMD
;
1740 static int saa_mmap(struct file
*file
, struct vm_area_struct
*vma
)
1742 struct saa7146
*saa
= file
->private_data
;
1743 printk(KERN_DEBUG
"stradis%d: saa_mmap called\n", saa
->nr
);
1747 static ssize_t
saa_read(struct file
*file
, char __user
* buf
,
1748 size_t count
, loff_t
* ppos
)
1753 static ssize_t
saa_write(struct file
*file
, const char __user
* buf
,
1754 size_t count
, loff_t
* ppos
)
1756 struct saa7146
*saa
= file
->private_data
;
1757 unsigned long todo
= count
;
1758 int blocksize
, split
;
1759 unsigned long flags
;
1762 if (saa
->writemode
== VID_WRITE_MPEG_AUD
) {
1763 spin_lock_irqsave(&saa
->lock
, flags
);
1764 if (saa
->audhead
<= saa
->audtail
)
1766 (saa
->audtail
- saa
->audhead
);
1768 blocksize
= saa
->audhead
- saa
->audtail
;
1769 spin_unlock_irqrestore(&saa
->lock
, flags
);
1770 if (blocksize
< 16384) {
1771 saawrite(SAA7146_PSR_DEBI_S
|
1772 SAA7146_PSR_PIN1
, SAA7146_IER
);
1773 saawrite(SAA7146_PSR_PIN1
, SAA7146_PSR
);
1774 /* wait for buffer space to open */
1775 interruptible_sleep_on(&saa
->audq
);
1777 spin_lock_irqsave(&saa
->lock
, flags
);
1778 if (saa
->audhead
<= saa
->audtail
) {
1780 (saa
->audtail
- saa
->audhead
);
1781 split
= 65536 - saa
->audtail
;
1783 blocksize
= saa
->audhead
- saa
->audtail
;
1786 spin_unlock_irqrestore(&saa
->lock
, flags
);
1788 if (blocksize
> todo
)
1790 /* double check that we really have space */
1793 if (split
< blocksize
) {
1794 if (copy_from_user(saa
->audbuf
+
1795 saa
->audtail
, buf
, split
))
1802 if (copy_from_user(saa
->audbuf
+ saa
->audtail
, buf
,
1805 saa
->audtail
+= blocksize
;
1808 saa
->audtail
&= 0xffff;
1809 } else if (saa
->writemode
== VID_WRITE_MPEG_VID
) {
1810 spin_lock_irqsave(&saa
->lock
, flags
);
1811 if (saa
->vidhead
<= saa
->vidtail
)
1812 blocksize
= 524288 -
1813 (saa
->vidtail
- saa
->vidhead
);
1815 blocksize
= saa
->vidhead
- saa
->vidtail
;
1816 spin_unlock_irqrestore(&saa
->lock
, flags
);
1817 if (blocksize
< 65536) {
1818 saawrite(SAA7146_PSR_DEBI_S
|
1819 SAA7146_PSR_PIN1
, SAA7146_IER
);
1820 saawrite(SAA7146_PSR_PIN1
, SAA7146_PSR
);
1821 /* wait for buffer space to open */
1822 interruptible_sleep_on(&saa
->vidq
);
1824 spin_lock_irqsave(&saa
->lock
, flags
);
1825 if (saa
->vidhead
<= saa
->vidtail
) {
1826 blocksize
= 524288 -
1827 (saa
->vidtail
- saa
->vidhead
);
1828 split
= 524288 - saa
->vidtail
;
1830 blocksize
= saa
->vidhead
- saa
->vidtail
;
1833 spin_unlock_irqrestore(&saa
->lock
, flags
);
1835 if (blocksize
> todo
)
1837 /* double check that we really have space */
1840 if (split
< blocksize
) {
1841 if (copy_from_user(saa
->vidbuf
+
1842 saa
->vidtail
, buf
, split
))
1849 if (copy_from_user(saa
->vidbuf
+ saa
->vidtail
, buf
,
1852 saa
->vidtail
+= blocksize
;
1855 saa
->vidtail
&= 0x7ffff;
1856 } else if (saa
->writemode
== VID_WRITE_OSD
) {
1859 if (copy_from_user(saa
->osdbuf
, buf
, count
))
1863 saa
->osdtail
= count
;
1864 debiwrite(saa
, debNormal
, IBM_MP2_OSD_ADDR
, 0, 2);
1865 debiwrite(saa
, debNormal
, IBM_MP2_OSD_LINK_ADDR
, 0, 2);
1866 debiwrite(saa
, debNormal
, IBM_MP2_MASK0
, 0xc00d, 2);
1867 debiwrite(saa
, debNormal
, IBM_MP2_DISP_MODE
,
1868 debiread(saa
, debNormal
,
1869 IBM_MP2_DISP_MODE
, 2) | 1, 2);
1870 /* trigger osd data transfer */
1871 saawrite(SAA7146_PSR_DEBI_S
|
1872 SAA7146_PSR_PIN1
, SAA7146_IER
);
1873 saawrite(SAA7146_PSR_PIN1
, SAA7146_PSR
);
1879 static int saa_open(struct inode
*inode
, struct file
*file
)
1881 struct video_device
*vdev
= video_devdata(file
);
1882 struct saa7146
*saa
= container_of(vdev
, struct saa7146
, video_dev
);
1884 file
->private_data
= saa
;
1888 return 0; /* device open already, don't reset */
1889 saa
->writemode
= VID_WRITE_MPEG_VID
; /* default to video */
1893 static int saa_release(struct inode
*inode
, struct file
*file
)
1895 struct saa7146
*saa
= file
->private_data
;
1898 if (saa
->user
> 0) /* still someone using device */
1900 saawrite(0x007f0000, SAA7146_MC1
); /* stop all overlay dma */
1904 static const struct file_operations saa_fops
= {
1905 .owner
= THIS_MODULE
,
1907 .release
= saa_release
,
1909 #ifdef CONFIG_COMPAT
1910 .compat_ioctl
= v4l_compat_ioctl32
,
1913 .llseek
= no_llseek
,
1918 /* template for video_device-structure */
1919 static struct video_device saa_template
= {
1921 .type
= VID_TYPE_CAPTURE
| VID_TYPE_OVERLAY
,
1926 static int __devinit
configure_saa7146(struct pci_dev
*pdev
, int num
)
1929 struct saa7146
*saa
= pci_get_drvdata(pdev
);
1931 saa
->endmarkhead
= saa
->endmarktail
= 0;
1932 saa
->win
.x
= saa
->win
.y
= 0;
1933 saa
->win
.width
= saa
->win
.cropwidth
= 720;
1934 saa
->win
.height
= saa
->win
.cropheight
= 480;
1935 saa
->win
.cropx
= saa
->win
.cropy
= 0;
1937 saa
->win
.depth
= 16;
1938 saa
->win
.color_fmt
= palette2fmt
[VIDEO_PALETTE_RGB565
];
1939 saa
->win
.bpl
= 1024 * saa
->win
.bpp
;
1940 saa
->win
.swidth
= 1024;
1941 saa
->win
.sheight
= 768;
1942 saa
->picture
.brightness
= 32768;
1943 saa
->picture
.contrast
= 38768;
1944 saa
->picture
.colour
= 32768;
1947 saa
->playmode
= VID_PLAY_NORMAL
;
1948 memset(saa
->boardcfg
, 0, 64); /* clear board config area */
1949 saa
->saa7146_mem
= NULL
;
1950 saa
->dmavid1
= saa
->dmavid2
= saa
->dmavid3
= saa
->dmaa1in
=
1951 saa
->dmaa1out
= saa
->dmaa2in
= saa
->dmaa2out
=
1952 saa
->pagevid1
= saa
->pagevid2
= saa
->pagevid3
= saa
->pagea1in
=
1953 saa
->pagea1out
= saa
->pagea2in
= saa
->pagea2out
=
1954 saa
->pagedebi
= saa
->dmaRPS1
= saa
->dmaRPS2
= saa
->pageRPS1
=
1955 saa
->pageRPS2
= NULL
;
1956 saa
->audbuf
= saa
->vidbuf
= saa
->osdbuf
= saa
->dmadebi
= NULL
;
1957 saa
->audhead
= saa
->vidtail
= 0;
1959 init_waitqueue_head(&saa
->i2cq
);
1960 init_waitqueue_head(&saa
->audq
);
1961 init_waitqueue_head(&saa
->debiq
);
1962 init_waitqueue_head(&saa
->vidq
);
1963 spin_lock_init(&saa
->lock
);
1965 retval
= pci_enable_device(pdev
);
1967 dev_err(&pdev
->dev
, "%d: pci_enable_device failed!\n", num
);
1971 saa
->id
= pdev
->device
;
1972 saa
->irq
= pdev
->irq
;
1973 saa
->video_dev
.minor
= -1;
1974 saa
->saa7146_adr
= pci_resource_start(pdev
, 0);
1975 pci_read_config_byte(pdev
, PCI_CLASS_REVISION
, &saa
->revision
);
1977 saa
->saa7146_mem
= ioremap(saa
->saa7146_adr
, 0x200);
1978 if (saa
->saa7146_mem
== NULL
) {
1979 dev_err(&pdev
->dev
, "%d: ioremap failed!\n", num
);
1984 memcpy(&saa
->video_dev
, &saa_template
, sizeof(saa_template
));
1985 saawrite(0, SAA7146_IER
); /* turn off all interrupts */
1987 retval
= request_irq(saa
->irq
, saa7146_irq
, IRQF_SHARED
| IRQF_DISABLED
,
1989 if (retval
== -EINVAL
)
1990 dev_err(&pdev
->dev
, "%d: Bad irq number or handler\n", num
);
1991 else if (retval
== -EBUSY
)
1992 dev_err(&pdev
->dev
, "%d: IRQ %ld busy, change your PnP config "
1993 "in BIOS\n", num
, saa
->irq
);
1997 pci_set_master(pdev
);
1998 retval
= video_register_device(&saa
->video_dev
, VFL_TYPE_GRABBER
,
2001 dev_err(&pdev
->dev
, "%d: error in registering video device!\n",
2008 iounmap(saa
->saa7146_mem
);
2013 static int __devinit
init_saa7146(struct pci_dev
*pdev
)
2015 struct saa7146
*saa
= pci_get_drvdata(pdev
);
2018 /* reset the saa7146 */
2019 saawrite(0xffff0000, SAA7146_MC1
);
2021 /* enable debi and i2c transfers and pins */
2022 saawrite(((SAA7146_MC1_EDP
| SAA7146_MC1_EI2C
|
2023 SAA7146_MC1_TR_E_DEBI
) << 16) | 0xffff, SAA7146_MC1
);
2024 /* ensure proper state of chip */
2025 saawrite(0x00000000, SAA7146_PAGE1
);
2026 saawrite(0x00f302c0, SAA7146_NUM_LINE_BYTE1
);
2027 saawrite(0x00000000, SAA7146_PAGE2
);
2028 saawrite(0x01400080, SAA7146_NUM_LINE_BYTE2
);
2029 saawrite(0x00000000, SAA7146_DD1_INIT
);
2030 saawrite(0x00000000, SAA7146_DD1_STREAM_B
);
2031 saawrite(0x00000000, SAA7146_DD1_STREAM_A
);
2032 saawrite(0x00000000, SAA7146_BRS_CTRL
);
2033 saawrite(0x80400040, SAA7146_BCS_CTRL
);
2034 saawrite(0x0000e000 /*| (1<<29) */ , SAA7146_HPS_CTRL
);
2035 saawrite(0x00000060, SAA7146_CLIP_FORMAT_CTRL
);
2036 saawrite(0x00000000, SAA7146_ACON1
);
2037 saawrite(0x00000000, SAA7146_ACON2
);
2038 saawrite(0x00000600, SAA7146_I2C_STATUS
);
2039 saawrite(((SAA7146_MC2_UPLD_D1_B
| SAA7146_MC2_UPLD_D1_A
|
2040 SAA7146_MC2_UPLD_BRS
| SAA7146_MC2_UPLD_HPS_H
|
2041 SAA7146_MC2_UPLD_HPS_V
| SAA7146_MC2_UPLD_DMA2
|
2042 SAA7146_MC2_UPLD_DMA1
| SAA7146_MC2_UPLD_I2C
) << 16) | 0xffff,
2044 /* setup arbitration control registers */
2045 saawrite(0x1412121a, SAA7146_PCI_BT_V1
);
2047 /* allocate 32k dma buffer + 4k for page table */
2048 if ((saa
->dmadebi
= kmalloc(32768 + 4096, GFP_KERNEL
)) == NULL
) {
2049 dev_err(&pdev
->dev
, "%d: debi kmalloc failed\n", saa
->nr
);
2053 saa
->pagedebi
= saa
->dmadebi
+ 32768; /* top 4k is for mmu */
2054 saawrite(virt_to_bus(saa
->pagedebi
) /*|0x800 */ , SAA7146_DEBI_PAGE
);
2055 for (i
= 0; i
< 12; i
++) /* setup mmu page table */
2056 saa
->pagedebi
[i
] = virt_to_bus((saa
->dmadebi
+ i
* 4096));
2058 saa
->audhead
= saa
->vidhead
= saa
->osdhead
= 0;
2059 saa
->audtail
= saa
->vidtail
= saa
->osdtail
= 0;
2060 if (saa
->vidbuf
== NULL
&& (saa
->vidbuf
= vmalloc(524288)) == NULL
) {
2061 dev_err(&pdev
->dev
, "%d: malloc failed\n", saa
->nr
);
2064 if (saa
->audbuf
== NULL
&& (saa
->audbuf
= vmalloc(65536)) == NULL
) {
2065 dev_err(&pdev
->dev
, "%d: malloc failed\n", saa
->nr
);
2068 if (saa
->osdbuf
== NULL
&& (saa
->osdbuf
= vmalloc(131072)) == NULL
) {
2069 dev_err(&pdev
->dev
, "%d: malloc failed\n", saa
->nr
);
2072 /* allocate 81920 byte buffer for clipping */
2073 if ((saa
->dmavid2
= kzalloc(VIDEO_CLIPMAP_SIZE
, GFP_KERNEL
)) == NULL
) {
2074 dev_err(&pdev
->dev
, "%d: clip kmalloc failed\n", saa
->nr
);
2077 /* setup clipping registers */
2078 saawrite(virt_to_bus(saa
->dmavid2
), SAA7146_BASE_EVEN2
);
2079 saawrite(virt_to_bus(saa
->dmavid2
) + 128, SAA7146_BASE_ODD2
);
2080 saawrite(virt_to_bus(saa
->dmavid2
) + VIDEO_CLIPMAP_SIZE
,
2081 SAA7146_PROT_ADDR2
);
2082 saawrite(256, SAA7146_PITCH2
);
2083 saawrite(4, SAA7146_PAGE2
); /* dma direction: read, no byteswap */
2084 saawrite(((SAA7146_MC2_UPLD_DMA2
) << 16) | SAA7146_MC2_UPLD_DMA2
,
2093 saa
->audbuf
= saa
->osdbuf
= saa
->vidbuf
= NULL
;
2098 static void stradis_release_saa(struct pci_dev
*pdev
)
2101 struct saa7146
*saa
= pci_get_drvdata(pdev
);
2103 /* turn off all capturing, DMA and IRQs */
2104 saawrite(0xffff0000, SAA7146_MC1
); /* reset chip */
2105 saawrite(0, SAA7146_MC2
);
2106 saawrite(0, SAA7146_IER
);
2107 saawrite(0xffffffffUL
, SAA7146_ISR
);
2109 /* disable PCI bus-mastering */
2110 pci_read_config_byte(pdev
, PCI_COMMAND
, &command
);
2111 command
&= ~PCI_COMMAND_MASTER
;
2112 pci_write_config_byte(pdev
, PCI_COMMAND
, command
);
2114 /* unmap and free memory */
2115 saa
->audhead
= saa
->audtail
= saa
->osdhead
= 0;
2116 saa
->vidhead
= saa
->vidtail
= saa
->osdtail
= 0;
2120 kfree(saa
->dmavid2
);
2121 saa
->audbuf
= saa
->vidbuf
= saa
->osdbuf
= NULL
;
2122 saa
->dmavid2
= NULL
;
2123 kfree(saa
->dmadebi
);
2124 kfree(saa
->dmavid1
);
2125 kfree(saa
->dmavid3
);
2126 kfree(saa
->dmaa1in
);
2127 kfree(saa
->dmaa1out
);
2128 kfree(saa
->dmaa2in
);
2129 kfree(saa
->dmaa2out
);
2130 kfree(saa
->dmaRPS1
);
2131 kfree(saa
->dmaRPS2
);
2132 free_irq(saa
->irq
, saa
);
2133 if (saa
->saa7146_mem
)
2134 iounmap(saa
->saa7146_mem
);
2135 if (saa
->video_dev
.minor
!= -1)
2136 video_unregister_device(&saa
->video_dev
);
2139 static int __devinit
stradis_probe(struct pci_dev
*pdev
,
2140 const struct pci_device_id
*ent
)
2142 int retval
= -EINVAL
;
2144 if (saa_num
>= SAA7146_MAX
)
2147 if (!pdev
->subsystem_vendor
)
2148 dev_info(&pdev
->dev
, "%d: rev1 decoder\n", saa_num
);
2150 dev_info(&pdev
->dev
, "%d: SDM2xx found\n", saa_num
);
2152 pci_set_drvdata(pdev
, &saa7146s
[saa_num
]);
2154 retval
= configure_saa7146(pdev
, saa_num
);
2156 dev_err(&pdev
->dev
, "%d: error in configuring\n", saa_num
);
2160 if (init_saa7146(pdev
) < 0) {
2161 dev_err(&pdev
->dev
, "%d: error in initialization\n", saa_num
);
2170 stradis_release_saa(pdev
);
2175 static void __devexit
stradis_remove(struct pci_dev
*pdev
)
2177 stradis_release_saa(pdev
);
2180 static struct pci_device_id stradis_pci_tbl
[] = {
2181 { PCI_DEVICE(PCI_VENDOR_ID_PHILIPS
, PCI_DEVICE_ID_PHILIPS_SAA7146
) },
2186 static struct pci_driver stradis_driver
= {
2188 .id_table
= stradis_pci_tbl
,
2189 .probe
= stradis_probe
,
2190 .remove
= __devexit_p(stradis_remove
)
2193 static int __init
stradis_init(void)
2199 retval
= pci_register_driver(&stradis_driver
);
2201 printk(KERN_ERR
"stradis: Unable to register pci driver.\n");
2206 static void __exit
stradis_exit(void)
2208 pci_unregister_driver(&stradis_driver
);
2209 printk(KERN_INFO
"stradis: module cleanup complete\n");
2212 module_init(stradis_init
);
2213 module_exit(stradis_exit
);