Viewing file:  radio-gemtek-pci.c (10.13 KB) -rw-r--r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
/*
***************************************************************************
*
* radio-gemtek-pci.c - Gemtek PCI Radio driver
* (C) 2001 Vladimir Shebordaev <vshebordaev@mail.ru>
*
***************************************************************************
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the Free
* Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139,
* USA.
*
***************************************************************************
*
* Gemtek Corp still silently refuses to release any specifications
* of their multimedia devices, so the protocol still has to be
* reverse engineered.
*
* The v4l code was inspired by Jonas Munsin's Gemtek serial line
* radio device driver.
*
* Please, let me know if this piece of code was useful :)
*
* TODO: multiple device support and portability were not tested
*
***************************************************************************
*/
#include <linux/version.h>
#include <linux/config.h>
#include <linux/types.h>
#include <linux/list.h>
#include <linux/module.h>
#include <linux/init.h>
#include <linux/pci.h>
#include <linux/videodev.h>
#include <linux/errno.h>
#include <asm/io.h>
#include <asm/uaccess.h>
#ifndef PCI_VENDOR_ID_GEMTEK
#define PCI_VENDOR_ID_GEMTEK 0x5046
#endif
#ifndef PCI_DEVICE_ID_GEMTEK_PR103
#define PCI_DEVICE_ID_GEMTEK_PR103 0x1001
#endif
#ifndef GEMTEK_PCI_RANGE_LOW
#define GEMTEK_PCI_RANGE_LOW (87*16000)
#endif
#ifndef GEMTEK_PCI_RANGE_HIGH
#define GEMTEK_PCI_RANGE_HIGH (108*16000)
#endif
#ifndef TRUE
#define TRUE (1)
#endif
#ifndef FALSE
#define FALSE (0)
#endif
struct gemtek_pci_card {
struct video_device *videodev;
u32 iobase;
u32 length;
u8 chiprev;
u16 model;
u32 current_frequency;
u8 mute;
};
static const char rcsid[] = "$Id: radio-gemtek-pci.c,v 1.1 2001/07/23 08:08:16 ted Exp ted $";
static int nr_radio = -1;
static int gemtek_pci_open( struct video_device *dev, int flags)
{
struct gemtek_pci_card *card = dev->priv;
/* Paranoid check */
if ( !card )
return -ENODEV;
return 0;
}
static void gemtek_pci_close( struct video_device *dev )
{
/*
* The module usage is managed by 'videodev'
*/
}
static inline u8 gemtek_pci_out( u16 value, u32 port )
{
outw( value, port );
return (u8)value;
}
#define _b0( v ) *((u8 *)&v)
static void __gemtek_pci_cmd( u16 value, u32 port, u8 *last_byte, int keep )
{
register u8 byte = *last_byte;
if ( !value ) {
if ( !keep )
value = (u16)port;
byte &= 0xfd;
} else
byte |= 2;
_b0( value ) = byte;
outw( value, port );
byte |= 1;
_b0( value ) = byte;
outw( value, port );
byte &= 0xfe;
_b0( value ) = byte;
outw( value, port );
*last_byte = byte;
}
static inline void gemtek_pci_nil( u32 port, u8 *last_byte )
{
__gemtek_pci_cmd( 0x00, port, last_byte, FALSE );
}
static inline void gemtek_pci_cmd( u16 cmd, u32 port, u8 *last_byte )
{
__gemtek_pci_cmd( cmd, port, last_byte, TRUE );
}
static void gemtek_pci_setfrequency( struct gemtek_pci_card *card, unsigned long frequency )
{
register int i;
register u32 value = frequency / 200 + 856;
register u16 mask = 0x8000;
u8 last_byte;
u32 port = card->iobase;
last_byte = gemtek_pci_out( 0x06, port );
i = 0;
do {
gemtek_pci_nil( port, &last_byte );
i++;
} while ( i < 9 );
i = 0;
do {
gemtek_pci_cmd( value & mask, port, &last_byte );
mask >>= 1;
i++;
} while ( i < 16 );
outw( 0x10, port );
}
static inline void gemtek_pci_mute( struct gemtek_pci_card *card )
{
outb( 0x1f, card->iobase );
card->mute = TRUE;
}
static inline void gemtek_pci_unmute( struct gemtek_pci_card *card )
{
if ( card->mute ) {
gemtek_pci_setfrequency( card, card->current_frequency );
card->mute = FALSE;
}
}
static inline unsigned int gemtek_pci_getsignal( struct gemtek_pci_card *card )
{
return ( inb( card->iobase ) & 0x08 ) ? 0 : 1;
}
static int gemtek_pci_ioctl( struct video_device *dev, unsigned int cmd, void *arg)
{
struct gemtek_pci_card *card = dev->priv;
switch ( cmd ) {
case VIDIOCGCAP:
{
struct video_capability c;
c.type = VID_TYPE_TUNER;
c.channels = 1;
c.audios = 1;
c.maxwidth = 0;
c.maxheight = 0;
c.minwidth = 0;
c.minheight = 0;
strcpy( c.name, "Gemtek PCI Radio" );
if ( copy_to_user( arg, &c, sizeof( c ) ) )
return -EFAULT;
return 0;
}
case VIDIOCGTUNER:
{
struct video_tuner t;
int signal;
if ( copy_from_user( &t, arg, sizeof( struct video_tuner ) ) )
return -EFAULT;
if ( t.tuner )
return -EINVAL;
signal = gemtek_pci_getsignal( card );
t.rangelow = GEMTEK_PCI_RANGE_LOW;
t.rangehigh = GEMTEK_PCI_RANGE_HIGH;
t.flags = VIDEO_TUNER_LOW | (7 << signal) ;
t.mode = VIDEO_MODE_AUTO;
t.signal = 0xFFFF * signal;
strcpy( t.name, "FM" );
if ( copy_to_user( arg, &t, sizeof( struct video_tuner ) ) )
return -EFAULT;
return 0;
}
case VIDIOCSTUNER:
{
struct video_tuner t;
if ( copy_from_user( &t, arg, sizeof( struct video_tuner ) ) )
return -EFAULT;
if ( t.tuner )
return -EINVAL;
return 0;
}
case VIDIOCGFREQ:
return put_user( card->current_frequency, (u32 *)arg );
case VIDIOCSFREQ:
{
u32 frequency;
if ( get_user( frequency, (u32 *)arg ) )
return -EFAULT;
if ( (frequency < GEMTEK_PCI_RANGE_LOW) || (frequency > GEMTEK_PCI_RANGE_HIGH) )
return -EINVAL;
gemtek_pci_setfrequency( card, frequency );
card->current_frequency = frequency;
card->mute = FALSE;
return 0;
}
case VIDIOCGAUDIO:
{
struct video_audio a;
memset( &a, 0, sizeof( a ) );
a.flags |= VIDEO_AUDIO_MUTABLE;
a.volume = 1;
a.step = 65535;
a.mode = (1 << gemtek_pci_getsignal( card ));
strcpy( a.name, "Radio" );
if ( copy_to_user( arg, &a, sizeof( struct video_audio ) ) )
return -EFAULT;
return 0;
}
case VIDIOCSAUDIO:
{
struct video_audio a;
if ( copy_from_user( &a, arg, sizeof( struct video_audio ) ) )
return -EFAULT;
if ( a.audio )
return -EINVAL;
if ( a.flags & VIDEO_AUDIO_MUTE )
gemtek_pci_mute( card );
else
gemtek_pci_unmute( card );
return 0;
}
default:
return -ENOIOCTLCMD;
}
}
enum {
GEMTEK_PR103
};
static char *card_names[] __devinitdata = {
"GEMTEK_PR103"
};
static struct pci_device_id gemtek_pci_id[] =
{
{ PCI_VENDOR_ID_GEMTEK, PCI_DEVICE_ID_GEMTEK_PR103,
PCI_ANY_ID, PCI_ANY_ID, 0, 0, GEMTEK_PR103 },
{ 0 }
};
MODULE_DEVICE_TABLE( pci, gemtek_pci_id );
static u8 mx = 1;
static char gemtek_pci_videodev_name[] = "Gemtek PCI Radio";
static inline void gemtek_pci_init_struct( struct video_device *dev )
{
memset( dev, 0, sizeof( struct video_device ) );
dev->owner = THIS_MODULE;
strcpy( dev->name , gemtek_pci_videodev_name );
dev->type = VID_TYPE_TUNER;
dev->hardware = VID_HARDWARE_GEMTEK;
dev->open = gemtek_pci_open;
dev->close = gemtek_pci_close;
dev->ioctl = gemtek_pci_ioctl;
}
static int __devinit gemtek_pci_probe( struct pci_dev *pci_dev, const struct pci_device_id *pci_id )
{
struct gemtek_pci_card *card;
struct video_device *devradio;
if ( (card = kmalloc( sizeof( struct gemtek_pci_card ), GFP_KERNEL )) == NULL ) {
printk( KERN_ERR "gemtek_pci: out of memory\n" );
return -ENOMEM;
}
memset( card, 0, sizeof( struct gemtek_pci_card ) );
if ( pci_enable_device( pci_dev ) )
goto err_pci;
card->iobase = pci_resource_start( pci_dev, 0 );
card->length = pci_resource_len( pci_dev, 0 );
if ( request_region( card->iobase, card->length, card_names[pci_id->driver_data] ) == NULL ) {
printk( KERN_ERR "gemtek_pci: i/o port already in use\n" );
goto err_pci;
}
pci_read_config_byte( pci_dev, PCI_REVISION_ID, &card->chiprev );
pci_read_config_word( pci_dev, PCI_SUBSYSTEM_ID, &card->model );
pci_set_drvdata( pci_dev, card );
if ( (devradio = kmalloc( sizeof( struct video_device ), GFP_KERNEL )) == NULL ) {
printk( KERN_ERR "gemtek_pci: out of memory\n" );
goto err_video;
}
gemtek_pci_init_struct( devradio );
if ( video_register_device( devradio, VFL_TYPE_RADIO , nr_radio) == -1 ) {
kfree( devradio );
goto err_video;
}
card->videodev = devradio;
devradio->priv = card;
gemtek_pci_mute( card );
printk( KERN_INFO "Gemtek PCI Radio (rev. %d) found at 0x%04x-0x%04x.\n",
card->chiprev, card->iobase, card->iobase + card->length - 1 );
return 0;
err_video:
release_region( card->iobase, card->length );
err_pci:
kfree( card );
return -ENODEV;
}
static void __devexit gemtek_pci_remove( struct pci_dev *pci_dev )
{
struct gemtek_pci_card *card = pci_get_drvdata( pci_dev );
video_unregister_device( card->videodev );
kfree( card->videodev );
release_region( card->iobase, card->length );
if ( mx )
gemtek_pci_mute( card );
kfree( card );
pci_set_drvdata( pci_dev, NULL );
}
static struct pci_driver gemtek_pci_driver =
{
name: "gemtek_pci",
id_table: gemtek_pci_id,
probe: gemtek_pci_probe,
remove: __devexit_p(gemtek_pci_remove),
};
static int __init gemtek_pci_init_module( void )
{
return pci_module_init( &gemtek_pci_driver );
}
static void __exit gemtek_pci_cleanup_module( void )
{
return pci_unregister_driver( &gemtek_pci_driver );
}
MODULE_AUTHOR( "Vladimir Shebordaev <vshebordaev@mail.ru>" );
MODULE_DESCRIPTION( "The video4linux driver for the Gemtek PCI Radio Card" );
MODULE_LICENSE("GPL");
MODULE_PARM( mx, "b" );
MODULE_PARM_DESC( mx, "single digit: 1 - turn off the turner upon module exit (default), 0 - do not" );
MODULE_PARM( nr_radio, "i");
MODULE_PARM_DESC( nr_radio, "video4linux device number to use");
EXPORT_NO_SYMBOLS;
module_init( gemtek_pci_init_module );
module_exit( gemtek_pci_cleanup_module );
|