/* *************************************************************************** *      *     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)#endifstruct 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 );