f1ac046d7b
Signed-off-by: Alexey Dobriyan <adobriyan@gmail.com> Signed-off-by: Andrew Morton <akpm@osdl.org> Signed-off-by: Linus Torvalds <torvalds@osdl.org>
621 lines
14 KiB
C
621 lines
14 KiB
C
/* radio-cadet.c - A video4linux driver for the ADS Cadet AM/FM Radio Card
|
|
*
|
|
* by Fred Gleason <fredg@wava.com>
|
|
* Version 0.3.3
|
|
*
|
|
* (Loosely) based on code for the Aztech radio card by
|
|
*
|
|
* Russell Kroll (rkroll@exploits.org)
|
|
* Quay Ly
|
|
* Donald Song
|
|
* Jason Lewis (jlewis@twilight.vtc.vsc.edu)
|
|
* Scott McGrath (smcgrath@twilight.vtc.vsc.edu)
|
|
* William McGrath (wmcgrath@twilight.vtc.vsc.edu)
|
|
*
|
|
* History:
|
|
* 2000-04-29 Russell Kroll <rkroll@exploits.org>
|
|
* Added ISAPnP detection for Linux 2.3/2.4
|
|
*
|
|
* 2001-01-10 Russell Kroll <rkroll@exploits.org>
|
|
* Removed dead CONFIG_RADIO_CADET_PORT code
|
|
* PnP detection on load is now default (no args necessary)
|
|
*
|
|
* 2002-01-17 Adam Belay <ambx1@neo.rr.com>
|
|
* Updated to latest pnp code
|
|
*
|
|
* 2003-01-31 Alan Cox <alan@redhat.com>
|
|
* Cleaned up locking, delay code, general odds and ends
|
|
*/
|
|
|
|
#include <linux/module.h> /* Modules */
|
|
#include <linux/init.h> /* Initdata */
|
|
#include <linux/ioport.h> /* request_region */
|
|
#include <linux/delay.h> /* udelay */
|
|
#include <asm/io.h> /* outb, outb_p */
|
|
#include <asm/uaccess.h> /* copy to/from user */
|
|
#include <linux/videodev.h> /* kernel radio structs */
|
|
#include <linux/param.h>
|
|
#include <linux/pnp.h>
|
|
|
|
#define RDS_BUFFER 256
|
|
|
|
static int io=-1; /* default to isapnp activation */
|
|
static int radio_nr = -1;
|
|
static int users=0;
|
|
static int curtuner=0;
|
|
static int tunestat=0;
|
|
static int sigstrength=0;
|
|
static wait_queue_head_t read_queue;
|
|
static struct timer_list readtimer;
|
|
static __u8 rdsin=0,rdsout=0,rdsstat=0;
|
|
static unsigned char rdsbuf[RDS_BUFFER];
|
|
static spinlock_t cadet_io_lock;
|
|
|
|
static int cadet_probe(void);
|
|
|
|
/*
|
|
* Signal Strength Threshold Values
|
|
* The V4L API spec does not define any particular unit for the signal
|
|
* strength value. These values are in microvolts of RF at the tuner's input.
|
|
*/
|
|
static __u16 sigtable[2][4]={{5,10,30,150},{28,40,63,1000}};
|
|
|
|
static int cadet_getrds(void)
|
|
{
|
|
int rdsstat=0;
|
|
|
|
spin_lock(&cadet_io_lock);
|
|
outb(3,io); /* Select Decoder Control/Status */
|
|
outb(inb(io+1)&0x7f,io+1); /* Reset RDS detection */
|
|
spin_unlock(&cadet_io_lock);
|
|
|
|
msleep(100);
|
|
|
|
spin_lock(&cadet_io_lock);
|
|
outb(3,io); /* Select Decoder Control/Status */
|
|
if((inb(io+1)&0x80)!=0) {
|
|
rdsstat|=VIDEO_TUNER_RDS_ON;
|
|
}
|
|
if((inb(io+1)&0x10)!=0) {
|
|
rdsstat|=VIDEO_TUNER_MBS_ON;
|
|
}
|
|
spin_unlock(&cadet_io_lock);
|
|
return rdsstat;
|
|
}
|
|
|
|
static int cadet_getstereo(void)
|
|
{
|
|
int ret = 0;
|
|
if(curtuner != 0) /* Only FM has stereo capability! */
|
|
return 0;
|
|
|
|
spin_lock(&cadet_io_lock);
|
|
outb(7,io); /* Select tuner control */
|
|
if( (inb(io+1) & 0x40) == 0)
|
|
ret = 1;
|
|
spin_unlock(&cadet_io_lock);
|
|
return ret;
|
|
}
|
|
|
|
static unsigned cadet_gettune(void)
|
|
{
|
|
int curvol,i;
|
|
unsigned fifo=0;
|
|
|
|
/*
|
|
* Prepare for read
|
|
*/
|
|
|
|
spin_lock(&cadet_io_lock);
|
|
|
|
outb(7,io); /* Select tuner control */
|
|
curvol=inb(io+1); /* Save current volume/mute setting */
|
|
outb(0x00,io+1); /* Ensure WRITE-ENABLE is LOW */
|
|
tunestat=0xffff;
|
|
|
|
/*
|
|
* Read the shift register
|
|
*/
|
|
for(i=0;i<25;i++) {
|
|
fifo=(fifo<<1)|((inb(io+1)>>7)&0x01);
|
|
if(i<24) {
|
|
outb(0x01,io+1);
|
|
tunestat&=inb(io+1);
|
|
outb(0x00,io+1);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Restore volume/mute setting
|
|
*/
|
|
outb(curvol,io+1);
|
|
spin_unlock(&cadet_io_lock);
|
|
|
|
return fifo;
|
|
}
|
|
|
|
static unsigned cadet_getfreq(void)
|
|
{
|
|
int i;
|
|
unsigned freq=0,test,fifo=0;
|
|
|
|
/*
|
|
* Read current tuning
|
|
*/
|
|
fifo=cadet_gettune();
|
|
|
|
/*
|
|
* Convert to actual frequency
|
|
*/
|
|
if(curtuner==0) { /* FM */
|
|
test=12500;
|
|
for(i=0;i<14;i++) {
|
|
if((fifo&0x01)!=0) {
|
|
freq+=test;
|
|
}
|
|
test=test<<1;
|
|
fifo=fifo>>1;
|
|
}
|
|
freq-=10700000; /* IF frequency is 10.7 MHz */
|
|
freq=(freq*16)/1000000; /* Make it 1/16 MHz */
|
|
}
|
|
if(curtuner==1) { /* AM */
|
|
freq=((fifo&0x7fff)-2010)*16;
|
|
}
|
|
|
|
return freq;
|
|
}
|
|
|
|
static void cadet_settune(unsigned fifo)
|
|
{
|
|
int i;
|
|
unsigned test;
|
|
|
|
spin_lock(&cadet_io_lock);
|
|
|
|
outb(7,io); /* Select tuner control */
|
|
/*
|
|
* Write the shift register
|
|
*/
|
|
test=0;
|
|
test=(fifo>>23)&0x02; /* Align data for SDO */
|
|
test|=0x1c; /* SDM=1, SWE=1, SEN=1, SCK=0 */
|
|
outb(7,io); /* Select tuner control */
|
|
outb(test,io+1); /* Initialize for write */
|
|
for(i=0;i<25;i++) {
|
|
test|=0x01; /* Toggle SCK High */
|
|
outb(test,io+1);
|
|
test&=0xfe; /* Toggle SCK Low */
|
|
outb(test,io+1);
|
|
fifo=fifo<<1; /* Prepare the next bit */
|
|
test=0x1c|((fifo>>23)&0x02);
|
|
outb(test,io+1);
|
|
}
|
|
spin_unlock(&cadet_io_lock);
|
|
}
|
|
|
|
static void cadet_setfreq(unsigned freq)
|
|
{
|
|
unsigned fifo;
|
|
int i,j,test;
|
|
int curvol;
|
|
|
|
/*
|
|
* Formulate a fifo command
|
|
*/
|
|
fifo=0;
|
|
if(curtuner==0) { /* FM */
|
|
test=102400;
|
|
freq=(freq*1000)/16; /* Make it kHz */
|
|
freq+=10700; /* IF is 10700 kHz */
|
|
for(i=0;i<14;i++) {
|
|
fifo=fifo<<1;
|
|
if(freq>=test) {
|
|
fifo|=0x01;
|
|
freq-=test;
|
|
}
|
|
test=test>>1;
|
|
}
|
|
}
|
|
if(curtuner==1) { /* AM */
|
|
fifo=(freq/16)+2010; /* Make it kHz */
|
|
fifo|=0x100000; /* Select AM Band */
|
|
}
|
|
|
|
/*
|
|
* Save current volume/mute setting
|
|
*/
|
|
|
|
spin_lock(&cadet_io_lock);
|
|
outb(7,io); /* Select tuner control */
|
|
curvol=inb(io+1);
|
|
spin_unlock(&cadet_io_lock);
|
|
|
|
/*
|
|
* Tune the card
|
|
*/
|
|
for(j=3;j>-1;j--) {
|
|
cadet_settune(fifo|(j<<16));
|
|
|
|
spin_lock(&cadet_io_lock);
|
|
outb(7,io); /* Select tuner control */
|
|
outb(curvol,io+1);
|
|
spin_unlock(&cadet_io_lock);
|
|
|
|
msleep(100);
|
|
|
|
cadet_gettune();
|
|
if((tunestat & 0x40) == 0) { /* Tuned */
|
|
sigstrength=sigtable[curtuner][j];
|
|
return;
|
|
}
|
|
}
|
|
sigstrength=0;
|
|
}
|
|
|
|
|
|
static int cadet_getvol(void)
|
|
{
|
|
int ret = 0;
|
|
|
|
spin_lock(&cadet_io_lock);
|
|
|
|
outb(7,io); /* Select tuner control */
|
|
if((inb(io + 1) & 0x20) != 0)
|
|
ret = 0xffff;
|
|
|
|
spin_unlock(&cadet_io_lock);
|
|
return ret;
|
|
}
|
|
|
|
|
|
static void cadet_setvol(int vol)
|
|
{
|
|
spin_lock(&cadet_io_lock);
|
|
outb(7,io); /* Select tuner control */
|
|
if(vol>0)
|
|
outb(0x20,io+1);
|
|
else
|
|
outb(0x00,io+1);
|
|
spin_unlock(&cadet_io_lock);
|
|
}
|
|
|
|
static void cadet_handler(unsigned long data)
|
|
{
|
|
/*
|
|
* Service the RDS fifo
|
|
*/
|
|
|
|
if(spin_trylock(&cadet_io_lock))
|
|
{
|
|
outb(0x3,io); /* Select RDS Decoder Control */
|
|
if((inb(io+1)&0x20)!=0) {
|
|
printk(KERN_CRIT "cadet: RDS fifo overflow\n");
|
|
}
|
|
outb(0x80,io); /* Select RDS fifo */
|
|
while((inb(io)&0x80)!=0) {
|
|
rdsbuf[rdsin]=inb(io+1);
|
|
if(rdsin==rdsout)
|
|
printk(KERN_WARNING "cadet: RDS buffer overflow\n");
|
|
else
|
|
rdsin++;
|
|
}
|
|
spin_unlock(&cadet_io_lock);
|
|
}
|
|
|
|
/*
|
|
* Service pending read
|
|
*/
|
|
if( rdsin!=rdsout)
|
|
wake_up_interruptible(&read_queue);
|
|
|
|
/*
|
|
* Clean up and exit
|
|
*/
|
|
init_timer(&readtimer);
|
|
readtimer.function=cadet_handler;
|
|
readtimer.data=(unsigned long)0;
|
|
readtimer.expires=jiffies+(HZ/20);
|
|
add_timer(&readtimer);
|
|
}
|
|
|
|
|
|
|
|
static ssize_t cadet_read(struct file *file, char __user *data,
|
|
size_t count, loff_t *ppos)
|
|
{
|
|
int i=0;
|
|
unsigned char readbuf[RDS_BUFFER];
|
|
|
|
if(rdsstat==0) {
|
|
spin_lock(&cadet_io_lock);
|
|
rdsstat=1;
|
|
outb(0x80,io); /* Select RDS fifo */
|
|
spin_unlock(&cadet_io_lock);
|
|
init_timer(&readtimer);
|
|
readtimer.function=cadet_handler;
|
|
readtimer.data=(unsigned long)0;
|
|
readtimer.expires=jiffies+(HZ/20);
|
|
add_timer(&readtimer);
|
|
}
|
|
if(rdsin==rdsout) {
|
|
if (file->f_flags & O_NONBLOCK)
|
|
return -EWOULDBLOCK;
|
|
interruptible_sleep_on(&read_queue);
|
|
}
|
|
while( i<count && rdsin!=rdsout)
|
|
readbuf[i++]=rdsbuf[rdsout++];
|
|
|
|
if (copy_to_user(data,readbuf,i))
|
|
return -EFAULT;
|
|
return i;
|
|
}
|
|
|
|
|
|
|
|
static int cadet_do_ioctl(struct inode *inode, struct file *file,
|
|
unsigned int cmd, void *arg)
|
|
{
|
|
switch(cmd)
|
|
{
|
|
case VIDIOCGCAP:
|
|
{
|
|
struct video_capability *v = arg;
|
|
memset(v,0,sizeof(*v));
|
|
v->type=VID_TYPE_TUNER;
|
|
v->channels=2;
|
|
v->audios=1;
|
|
strcpy(v->name, "ADS Cadet");
|
|
return 0;
|
|
}
|
|
case VIDIOCGTUNER:
|
|
{
|
|
struct video_tuner *v = arg;
|
|
if((v->tuner<0)||(v->tuner>1)) {
|
|
return -EINVAL;
|
|
}
|
|
switch(v->tuner) {
|
|
case 0:
|
|
strcpy(v->name,"FM");
|
|
v->rangelow=1400; /* 87.5 MHz */
|
|
v->rangehigh=1728; /* 108.0 MHz */
|
|
v->flags=0;
|
|
v->mode=0;
|
|
v->mode|=VIDEO_MODE_AUTO;
|
|
v->signal=sigstrength;
|
|
if(cadet_getstereo()==1) {
|
|
v->flags|=VIDEO_TUNER_STEREO_ON;
|
|
}
|
|
v->flags|=cadet_getrds();
|
|
break;
|
|
case 1:
|
|
strcpy(v->name,"AM");
|
|
v->rangelow=8320; /* 520 kHz */
|
|
v->rangehigh=26400; /* 1650 kHz */
|
|
v->flags=0;
|
|
v->flags|=VIDEO_TUNER_LOW;
|
|
v->mode=0;
|
|
v->mode|=VIDEO_MODE_AUTO;
|
|
v->signal=sigstrength;
|
|
break;
|
|
}
|
|
return 0;
|
|
}
|
|
case VIDIOCSTUNER:
|
|
{
|
|
struct video_tuner *v = arg;
|
|
if((v->tuner<0)||(v->tuner>1)) {
|
|
return -EINVAL;
|
|
}
|
|
curtuner=v->tuner;
|
|
return 0;
|
|
}
|
|
case VIDIOCGFREQ:
|
|
{
|
|
unsigned long *freq = arg;
|
|
*freq = cadet_getfreq();
|
|
return 0;
|
|
}
|
|
case VIDIOCSFREQ:
|
|
{
|
|
unsigned long *freq = arg;
|
|
if((curtuner==0)&&((*freq<1400)||(*freq>1728))) {
|
|
return -EINVAL;
|
|
}
|
|
if((curtuner==1)&&((*freq<8320)||(*freq>26400))) {
|
|
return -EINVAL;
|
|
}
|
|
cadet_setfreq(*freq);
|
|
return 0;
|
|
}
|
|
case VIDIOCGAUDIO:
|
|
{
|
|
struct video_audio *v = arg;
|
|
memset(v,0, sizeof(*v));
|
|
v->flags=VIDEO_AUDIO_MUTABLE|VIDEO_AUDIO_VOLUME;
|
|
if(cadet_getstereo()==0) {
|
|
v->mode=VIDEO_SOUND_MONO;
|
|
} else {
|
|
v->mode=VIDEO_SOUND_STEREO;
|
|
}
|
|
v->volume=cadet_getvol();
|
|
v->step=0xffff;
|
|
strcpy(v->name, "Radio");
|
|
return 0;
|
|
}
|
|
case VIDIOCSAUDIO:
|
|
{
|
|
struct video_audio *v = arg;
|
|
if(v->audio)
|
|
return -EINVAL;
|
|
cadet_setvol(v->volume);
|
|
if(v->flags&VIDEO_AUDIO_MUTE)
|
|
cadet_setvol(0);
|
|
else
|
|
cadet_setvol(0xffff);
|
|
return 0;
|
|
}
|
|
default:
|
|
return -ENOIOCTLCMD;
|
|
}
|
|
}
|
|
|
|
static int cadet_ioctl(struct inode *inode, struct file *file,
|
|
unsigned int cmd, unsigned long arg)
|
|
{
|
|
return video_usercopy(inode, file, cmd, arg, cadet_do_ioctl);
|
|
}
|
|
|
|
static int cadet_open(struct inode *inode, struct file *file)
|
|
{
|
|
if(users)
|
|
return -EBUSY;
|
|
users++;
|
|
init_waitqueue_head(&read_queue);
|
|
return 0;
|
|
}
|
|
|
|
static int cadet_release(struct inode *inode, struct file *file)
|
|
{
|
|
del_timer_sync(&readtimer);
|
|
rdsstat=0;
|
|
users--;
|
|
return 0;
|
|
}
|
|
|
|
|
|
static struct file_operations cadet_fops = {
|
|
.owner = THIS_MODULE,
|
|
.open = cadet_open,
|
|
.release = cadet_release,
|
|
.read = cadet_read,
|
|
.ioctl = cadet_ioctl,
|
|
.llseek = no_llseek,
|
|
};
|
|
|
|
static struct video_device cadet_radio=
|
|
{
|
|
.owner = THIS_MODULE,
|
|
.name = "Cadet radio",
|
|
.type = VID_TYPE_TUNER,
|
|
.hardware = VID_HARDWARE_CADET,
|
|
.fops = &cadet_fops,
|
|
};
|
|
|
|
static struct pnp_device_id cadet_pnp_devices[] = {
|
|
/* ADS Cadet AM/FM Radio Card */
|
|
{.id = "MSM0c24", .driver_data = 0},
|
|
{.id = ""}
|
|
};
|
|
|
|
MODULE_DEVICE_TABLE(pnp, cadet_pnp_devices);
|
|
|
|
static int cadet_pnp_probe(struct pnp_dev * dev, const struct pnp_device_id *dev_id)
|
|
{
|
|
if (!dev)
|
|
return -ENODEV;
|
|
/* only support one device */
|
|
if (io > 0)
|
|
return -EBUSY;
|
|
|
|
if (!pnp_port_valid(dev, 0)) {
|
|
return -ENODEV;
|
|
}
|
|
|
|
io = pnp_port_start(dev, 0);
|
|
|
|
printk ("radio-cadet: PnP reports device at %#x\n", io);
|
|
|
|
return io;
|
|
}
|
|
|
|
static struct pnp_driver cadet_pnp_driver = {
|
|
.name = "radio-cadet",
|
|
.id_table = cadet_pnp_devices,
|
|
.probe = cadet_pnp_probe,
|
|
.remove = NULL,
|
|
};
|
|
|
|
static int cadet_probe(void)
|
|
{
|
|
static int iovals[8]={0x330,0x332,0x334,0x336,0x338,0x33a,0x33c,0x33e};
|
|
int i;
|
|
|
|
for(i=0;i<8;i++) {
|
|
io=iovals[i];
|
|
if (request_region(io, 2, "cadet-probe")) {
|
|
cadet_setfreq(1410);
|
|
if(cadet_getfreq()==1410) {
|
|
release_region(io, 2);
|
|
return io;
|
|
}
|
|
release_region(io, 2);
|
|
}
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
/*
|
|
* io should only be set if the user has used something like
|
|
* isapnp (the userspace program) to initialize this card for us
|
|
*/
|
|
|
|
static int __init cadet_init(void)
|
|
{
|
|
spin_lock_init(&cadet_io_lock);
|
|
|
|
/*
|
|
* If a probe was requested then probe ISAPnP first (safest)
|
|
*/
|
|
if (io < 0)
|
|
pnp_register_driver(&cadet_pnp_driver);
|
|
/*
|
|
* If that fails then probe unsafely if probe is requested
|
|
*/
|
|
if(io < 0)
|
|
io = cadet_probe ();
|
|
|
|
/*
|
|
* Else we bail out
|
|
*/
|
|
|
|
if(io < 0) {
|
|
#ifdef MODULE
|
|
printk(KERN_ERR "You must set an I/O address with io=0x???\n");
|
|
#endif
|
|
goto fail;
|
|
}
|
|
if (!request_region(io,2,"cadet"))
|
|
goto fail;
|
|
if(video_register_device(&cadet_radio,VFL_TYPE_RADIO,radio_nr)==-1) {
|
|
release_region(io,2);
|
|
goto fail;
|
|
}
|
|
printk(KERN_INFO "ADS Cadet Radio Card at 0x%x\n",io);
|
|
return 0;
|
|
fail:
|
|
pnp_unregister_driver(&cadet_pnp_driver);
|
|
return -1;
|
|
}
|
|
|
|
|
|
|
|
MODULE_AUTHOR("Fred Gleason, Russell Kroll, Quay Lu, Donald Song, Jason Lewis, Scott McGrath, William McGrath");
|
|
MODULE_DESCRIPTION("A driver for the ADS Cadet AM/FM/RDS radio card.");
|
|
MODULE_LICENSE("GPL");
|
|
|
|
module_param(io, int, 0);
|
|
MODULE_PARM_DESC(io, "I/O address of Cadet card (0x330,0x332,0x334,0x336,0x338,0x33a,0x33c,0x33e)");
|
|
module_param(radio_nr, int, 0);
|
|
|
|
static void __exit cadet_cleanup_module(void)
|
|
{
|
|
video_unregister_device(&cadet_radio);
|
|
release_region(io,2);
|
|
pnp_unregister_driver(&cadet_pnp_driver);
|
|
}
|
|
|
|
module_init(cadet_init);
|
|
module_exit(cadet_cleanup_module);
|
|
|