2005-04-16 18:20:36 -04:00
/* GemTek radio card driver for Linux (C) 1998 Jonas Munsin <jmunsin@iki.fi>
*
* GemTek hasn ' t released any specs on the card , so the protocol had to
* be reverse engineered with dosemu .
*
* Besides the protocol changes , this is mostly a copy of :
*
* RadioTrack II driver for Linux radio support ( C ) 1998 Ben Pfaff
2006-04-08 15:06:16 -04:00
*
2005-04-16 18:20:36 -04:00
* Based on RadioTrack I / RadioReveal ( C ) 1997 M . Kirkwood
* Converted to new API by Alan Cox < Alan . Cox @ linux . org >
* Various bugfixes and enhancements by Russell Kroll < rkroll @ exploits . org >
*
* TODO : Allow for more than one of these foolish entities : - )
*
2006-08-08 08:10:01 -04:00
* Converted to V4L2 API by Mauro Carvalho Chehab < mchehab @ infradead . org >
2005-04-16 18:20:36 -04:00
*/
# include <linux/module.h> /* Modules */
# include <linux/init.h> /* Initdata */
2005-09-13 04:25:15 -04:00
# include <linux/ioport.h> /* request_region */
2005-04-16 18:20:36 -04:00
# include <linux/delay.h> /* udelay */
# include <asm/io.h> /* outb, outb_p */
# include <asm/uaccess.h> /* copy to/from user */
2006-08-08 08:10:01 -04:00
# include <linux/videodev2.h> /* kernel radio structs */
2006-06-05 09:26:32 -04:00
# include <media/v4l2-common.h>
2005-04-16 18:20:36 -04:00
# include <linux/spinlock.h>
2006-08-08 08:10:01 -04:00
# include <linux/version.h> /* for KERNEL_VERSION MACRO */
# define RADIO_VERSION KERNEL_VERSION(0,0,2)
static struct v4l2_queryctrl radio_qctrl [ ] = {
{
. id = V4L2_CID_AUDIO_MUTE ,
. name = " Mute " ,
. minimum = 0 ,
. maximum = 1 ,
. default_value = 1 ,
. type = V4L2_CTRL_TYPE_BOOLEAN ,
} , {
. id = V4L2_CID_AUDIO_VOLUME ,
. name = " Volume " ,
. minimum = 0 ,
. maximum = 65535 ,
. step = 65535 ,
. default_value = 0xff ,
. type = V4L2_CTRL_TYPE_INTEGER ,
}
} ;
2005-04-16 18:20:36 -04:00
# ifndef CONFIG_RADIO_GEMTEK_PORT
# define CONFIG_RADIO_GEMTEK_PORT -1
# endif
2006-04-08 15:06:16 -04:00
static int io = CONFIG_RADIO_GEMTEK_PORT ;
2005-04-16 18:20:36 -04:00
static int radio_nr = - 1 ;
static spinlock_t lock ;
struct gemtek_device
{
int port ;
unsigned long curfreq ;
int muted ;
} ;
/* local things */
/* the correct way to mute the gemtek may be to write the last written
* frequency | | 0x10 , but just writing 0x10 once seems to do it as well
*/
static void gemtek_mute ( struct gemtek_device * dev )
{
2006-04-08 15:06:16 -04:00
if ( dev - > muted )
2005-04-16 18:20:36 -04:00
return ;
spin_lock ( & lock ) ;
outb ( 0x10 , io ) ;
spin_unlock ( & lock ) ;
dev - > muted = 1 ;
}
static void gemtek_unmute ( struct gemtek_device * dev )
{
if ( dev - > muted = = 0 )
return ;
spin_lock ( & lock ) ;
outb ( 0x20 , io ) ;
spin_unlock ( & lock ) ;
dev - > muted = 0 ;
}
static void zero ( void )
{
outb_p ( 0x04 , io ) ;
udelay ( 5 ) ;
outb_p ( 0x05 , io ) ;
udelay ( 5 ) ;
}
static void one ( void )
{
outb_p ( 0x06 , io ) ;
udelay ( 5 ) ;
outb_p ( 0x07 , io ) ;
udelay ( 5 ) ;
}
static int gemtek_setfreq ( struct gemtek_device * dev , unsigned long freq )
{
int i ;
/* freq = 78.25*((float)freq/16000.0 + 10.52); */
freq / = 16 ;
freq + = 10520 ;
freq * = 7825 ;
freq / = 100000 ;
spin_lock ( & lock ) ;
2006-04-08 15:06:16 -04:00
2005-04-16 18:20:36 -04:00
/* 2 start bits */
outb_p ( 0x03 , io ) ;
udelay ( 5 ) ;
outb_p ( 0x07 , io ) ;
udelay ( 5 ) ;
2006-04-08 15:06:16 -04:00
/* 28 frequency bits (lsb first) */
2005-04-16 18:20:36 -04:00
for ( i = 0 ; i < 14 ; i + + )
if ( freq & ( 1 < < i ) )
one ( ) ;
else
zero ( ) ;
2006-04-08 15:06:16 -04:00
/* 36 unknown bits */
2005-04-16 18:20:36 -04:00
for ( i = 0 ; i < 11 ; i + + )
zero ( ) ;
one ( ) ;
for ( i = 0 ; i < 4 ; i + + )
zero ( ) ;
one ( ) ;
zero ( ) ;
/* 2 end bits */
outb_p ( 0x03 , io ) ;
udelay ( 5 ) ;
outb_p ( 0x07 , io ) ;
udelay ( 5 ) ;
spin_unlock ( & lock ) ;
2006-04-08 15:06:16 -04:00
2005-04-16 18:20:36 -04:00
return 0 ;
}
static int gemtek_getsigstr ( struct gemtek_device * dev )
{
spin_lock ( & lock ) ;
inb ( io ) ;
udelay ( 5 ) ;
spin_unlock ( & lock ) ;
if ( inb ( io ) & 8 ) /* bit set = no signal present */
return 0 ;
return 1 ; /* signal present */
}
static int gemtek_do_ioctl ( struct inode * inode , struct file * file ,
unsigned int cmd , void * arg )
{
struct video_device * dev = video_devdata ( file ) ;
struct gemtek_device * rt = dev - > priv ;
switch ( cmd )
{
2006-08-08 08:10:01 -04:00
case VIDIOC_QUERYCAP :
2005-04-16 18:20:36 -04:00
{
2006-08-08 08:10:01 -04:00
struct v4l2_capability * v = arg ;
2005-04-16 18:20:36 -04:00
memset ( v , 0 , sizeof ( * v ) ) ;
2006-08-08 08:10:01 -04:00
strlcpy ( v - > driver , " radio-gemtek " , sizeof ( v - > driver ) ) ;
strlcpy ( v - > card , " GemTek " , sizeof ( v - > card ) ) ;
sprintf ( v - > bus_info , " ISA " ) ;
v - > version = RADIO_VERSION ;
v - > capabilities = V4L2_CAP_TUNER ;
2005-04-16 18:20:36 -04:00
return 0 ;
}
2006-08-08 08:10:01 -04:00
case VIDIOC_G_TUNER :
2005-04-16 18:20:36 -04:00
{
2006-08-08 08:10:01 -04:00
struct v4l2_tuner * v = arg ;
if ( v - > index > 0 )
2005-04-16 18:20:36 -04:00
return - EINVAL ;
2006-08-08 08:10:01 -04:00
memset ( v , 0 , sizeof ( * v ) ) ;
2005-04-16 18:20:36 -04:00
strcpy ( v - > name , " FM " ) ;
2006-08-08 08:10:01 -04:00
v - > type = V4L2_TUNER_RADIO ;
v - > rangelow = ( 87 * 16000 ) ;
v - > rangehigh = ( 108 * 16000 ) ;
v - > rxsubchans = V4L2_TUNER_SUB_MONO ;
v - > capability = V4L2_TUNER_CAP_LOW ;
v - > audmode = V4L2_TUNER_MODE_MONO ;
v - > signal = 0xFFFF * gemtek_getsigstr ( rt ) ;
2005-04-16 18:20:36 -04:00
return 0 ;
}
2006-08-08 08:10:01 -04:00
case VIDIOC_S_TUNER :
2005-04-16 18:20:36 -04:00
{
2006-08-08 08:10:01 -04:00
struct v4l2_tuner * v = arg ;
if ( v - > index > 0 )
2005-04-16 18:20:36 -04:00
return - EINVAL ;
2006-08-08 08:10:01 -04:00
2005-04-16 18:20:36 -04:00
return 0 ;
}
2006-08-08 08:10:01 -04:00
case VIDIOC_S_FREQUENCY :
2005-04-16 18:20:36 -04:00
{
2006-08-08 08:10:01 -04:00
struct v4l2_frequency * f = arg ;
rt - > curfreq = f - > frequency ;
2005-04-16 18:20:36 -04:00
/* needs to be called twice in order for getsigstr to work */
gemtek_setfreq ( rt , rt - > curfreq ) ;
gemtek_setfreq ( rt , rt - > curfreq ) ;
return 0 ;
}
2006-08-08 08:10:01 -04:00
case VIDIOC_G_FREQUENCY :
2005-04-16 18:20:36 -04:00
{
2006-08-08 08:10:01 -04:00
struct v4l2_frequency * f = arg ;
2005-04-16 18:20:36 -04:00
2006-08-08 08:10:01 -04:00
f - > type = V4L2_TUNER_RADIO ;
f - > frequency = rt - > curfreq ;
2005-04-16 18:20:36 -04:00
return 0 ;
}
2006-08-08 08:10:01 -04:00
case VIDIOC_QUERYCTRL :
{
struct v4l2_queryctrl * qc = arg ;
int i ;
for ( i = 0 ; i < ARRAY_SIZE ( radio_qctrl ) ; i + + ) {
if ( qc - > id & & qc - > id = = radio_qctrl [ i ] . id ) {
memcpy ( qc , & ( radio_qctrl [ i ] ) ,
sizeof ( * qc ) ) ;
return ( 0 ) ;
}
}
return - EINVAL ;
}
case VIDIOC_G_CTRL :
{
struct v4l2_control * ctrl = arg ;
switch ( ctrl - > id ) {
case V4L2_CID_AUDIO_MUTE :
ctrl - > value = rt - > muted ;
return ( 0 ) ;
case V4L2_CID_AUDIO_VOLUME :
if ( rt - > muted )
ctrl - > value = 0 ;
else
ctrl - > value = 65535 ;
return ( 0 ) ;
}
return - EINVAL ;
}
case VIDIOC_S_CTRL :
{
struct v4l2_control * ctrl = arg ;
switch ( ctrl - > id ) {
case V4L2_CID_AUDIO_MUTE :
if ( ctrl - > value ) {
gemtek_mute ( rt ) ;
} else {
gemtek_unmute ( rt ) ;
}
return ( 0 ) ;
case V4L2_CID_AUDIO_VOLUME :
if ( ctrl - > value ) {
gemtek_unmute ( rt ) ;
} else {
gemtek_mute ( rt ) ;
}
return ( 0 ) ;
}
return - EINVAL ;
}
2005-04-16 18:20:36 -04:00
default :
2006-08-08 08:10:01 -04:00
return v4l_compat_translate_ioctl ( inode , file , cmd , arg ,
gemtek_do_ioctl ) ;
2005-04-16 18:20:36 -04:00
}
}
static int gemtek_ioctl ( struct inode * inode , struct file * file ,
unsigned int cmd , unsigned long arg )
{
return video_usercopy ( inode , file , cmd , arg , gemtek_do_ioctl ) ;
}
static struct gemtek_device gemtek_unit ;
static struct file_operations gemtek_fops = {
. owner = THIS_MODULE ,
. open = video_exclusive_open ,
. release = video_exclusive_release ,
. ioctl = gemtek_ioctl ,
2006-01-09 12:24:57 -05:00
. compat_ioctl = v4l_compat_ioctl32 ,
2005-04-16 18:20:36 -04:00
. llseek = no_llseek ,
} ;
static struct video_device gemtek_radio =
{
. owner = THIS_MODULE ,
. name = " GemTek radio " ,
. type = VID_TYPE_TUNER ,
2006-08-08 08:10:01 -04:00
. hardware = 0 ,
2005-04-16 18:20:36 -04:00
. fops = & gemtek_fops ,
} ;
static int __init gemtek_init ( void )
{
if ( io = = - 1 )
{
printk ( KERN_ERR " You must set an I/O address with io=0x20c, io=0x30c, io=0x24c or io=0x34c (io=0x020c or io=0x248 for the combined sound/radiocard) \n " ) ;
return - EINVAL ;
}
2006-04-08 15:06:16 -04:00
if ( ! request_region ( io , 4 , " gemtek " ) )
2005-04-16 18:20:36 -04:00
{
printk ( KERN_ERR " gemtek: port 0x%x already in use \n " , io ) ;
return - EBUSY ;
}
gemtek_radio . priv = & gemtek_unit ;
2006-04-08 15:06:16 -04:00
2005-04-16 18:20:36 -04:00
if ( video_register_device ( & gemtek_radio , VFL_TYPE_RADIO , radio_nr ) = = - 1 )
{
release_region ( io , 4 ) ;
return - EINVAL ;
}
printk ( KERN_INFO " GemTek Radio Card driver. \n " ) ;
spin_lock_init ( & lock ) ;
/* this is _maybe_ unnecessary */
outb ( 0x01 , io ) ;
2006-04-08 15:06:16 -04:00
/* mute card - prevents noisy bootups */
2005-04-16 18:20:36 -04:00
gemtek_unit . muted = 0 ;
gemtek_mute ( & gemtek_unit ) ;
return 0 ;
}
MODULE_AUTHOR ( " Jonas Munsin " ) ;
MODULE_DESCRIPTION ( " A driver for the GemTek Radio Card " ) ;
MODULE_LICENSE ( " GPL " ) ;
module_param ( io , int , 0 ) ;
MODULE_PARM_DESC ( io , " I/O address of the GemTek card (0x20c, 0x30c, 0x24c or 0x34c (0x20c or 0x248 have been reported to work for the combined sound/radiocard)). " ) ;
module_param ( radio_nr , int , 0 ) ;
static void __exit gemtek_cleanup ( void )
{
video_unregister_device ( & gemtek_radio ) ;
release_region ( io , 4 ) ;
}
module_init ( gemtek_init ) ;
module_exit ( gemtek_cleanup ) ;
/*
Local variables :
compile - command : " gcc -c -DMODVERSIONS -D__KERNEL__ -DMODULE -O6 -Wall -Wstrict-prototypes -I /home/blp/tmp/linux-2.1.111-rtrack/include radio-rtrack2.c "
End :
*/