/* Maestro PCI sound card radio driver for Linux support * (c) 2000 A. Tlalka, atlka@pg.gda.pl * Notes on the hardware * *  + Frequency control is done digitally *  + No volume control - only mute/unmute - you have to use Aux line volume *  control on Maestro card to set the volume *  + Radio status (tuned/not_tuned and stereo/mono) is valid some time after *  frequency setting (>100ms) and only when the radio is unmuted. *  version 0.02 *  + io port is automatically detected - only the first radio is used *  version 0.03 *  + thread access locking additions *  version 0.04 * + code improvements * + VIDEO_TUNER_LOW is permanent */#include <linux/module.h>#include <linux/init.h>#include <linux/ioport.h>#include <linux/delay.h>#include <linux/sched.h>#include <asm/io.h>#include <asm/uaccess.h>#include "compat.h"#if LINUX_VERSION_CODE > KERNEL_VERSION(2,6,15)#include <linux/mutex.h>#endif#include <linux/pci.h>#include <linux/videodev.h>#define DRIVER_VERSION	"0.05"#define GPIO_DATA	0x60   /* port offset from ESS_IO_BASE */#define IO_MASK		4      /* mask      register offset from GPIO_DATA				bits 1=unmask write to given bit */#define IO_DIR		8      /* direction register offset from GPIO_DATA				bits 0/1=read/write direction */#define GPIO6		0x0040 /* mask bits for GPIO lines */#define GPIO7		0x0080#define GPIO8		0x0100#define GPIO9		0x0200#define STR_DATA	GPIO6  /* radio TEA5757 pins and GPIO bits */#define STR_CLK		GPIO7#define STR_WREN	GPIO8#define STR_MOST	GPIO9#define FREQ_LO		 50*16000#define FREQ_HI		150*16000#define FREQ_IF		171200 /* 10.7*16000   */#define FREQ_STEP	200    /* 12.5*16      */#define FREQ2BITS(x)	((((unsigned int)(x)+FREQ_IF+(FREQ_STEP<<1))\			/(FREQ_STEP<<2))<<2) /* (x==fmhz*16*1000) -> bits */#define BITS2FREQ(x)	((x) * FREQ_STEP - FREQ_IF)static int radio_nr = -1;module_param(radio_nr, int, 0);static int radio_ioctl(struct inode *inode, struct file *file,	unsigned int cmd, unsigned long arg);static int maestro_probe(struct pci_dev *pdev, const struct pci_device_id *ent);static void maestro_remove(struct pci_dev *pdev);static struct pci_device_id maestro_r_pci_tbl[] = {	{ PCI_DEVICE(PCI_VENDOR_ID_ESS, PCI_DEVICE_ID_ESS_ESS1968),		.class = PCI_CLASS_MULTIMEDIA_AUDIO << 8,		.class_mask = 0xffff00 },	{ PCI_DEVICE(PCI_VENDOR_ID_ESS, PCI_DEVICE_ID_ESS_ESS1978),		.class = PCI_CLASS_MULTIMEDIA_AUDIO << 8,		.class_mask = 0xffff00 },	{ 0 }};MODULE_DEVICE_TABLE(pci, maestro_r_pci_tbl);static struct pci_driver maestro_r_driver = {	.name		= "maestro_radio",	.id_table	= maestro_r_pci_tbl,	.probe		= maestro_probe,	.remove		= __devexit_p(maestro_remove),};static struct file_operations maestro_fops = {	.owner		= THIS_MODULE,	.open           = video_exclusive_open,	.release        = video_exclusive_release,	.ioctl		= radio_ioctl,	.compat_ioctl	= v4l_compat_ioctl32,	.llseek         = no_llseek,};static struct video_device maestro_radio = {	.name		= "Maestro radio",	.type		= VID_TYPE_TUNER,	.hardware	= VID_HARDWARE_SF16MI,	.fops		= &maestro_fops,};struct radio_device {	u16	io,	/* base of Maestro card radio io (GPIO_DATA)*/		muted,	/* VIDEO_AUDIO_MUTE */		stereo,	/* VIDEO_TUNER_STEREO_ON */		tuned;	/* signal strength (0 or 0xffff) */	struct mutex lock;};static u32 radio_bits_get(struct radio_device *dev){	register u16 io=dev->io, l, rdata;	register u32 data=0;	u16 omask;	omask = inw(io + IO_MASK);	outw(~(STR_CLK | STR_WREN), io + IO_MASK);	outw(0, io);	udelay(16);	for (l=24;l--;) {		outw(STR_CLK, io);		/* HI state */		udelay(2);		if(!l)			dev->tuned = inw(io) & STR_MOST ? 0 : 0xffff;		outw(0, io);			/* LO state */		udelay(2);		data <<= 1;			/* shift data */		rdata = inw(io);		if(!l)			dev->stereo =  rdata & STR_MOST ?			0 : VIDEO_TUNER_STEREO_ON;		else			if(rdata & STR_DATA)				data++;		udelay(2);	}	if(dev->muted)		outw(STR_WREN, io);	udelay(4);	outw(omask, io + IO_MASK);	return data & 0x3ffe;}static void radio_bits_set(struct radio_device *dev, u32 data){	register u16 io=dev->io, l, bits;	u16 omask, odir;	omask = inw(io + IO_MASK);	odir  = (inw(io + IO_DIR) & ~STR_DATA) | (STR_CLK | STR_WREN);	outw(odir | STR_DATA, io + IO_DIR);	outw(~(STR_DATA | STR_CLK | STR_WREN), io + IO_MASK);	udelay(16);	for (l=25;l;l--) {		bits = ((data >> 18) & STR_DATA) | STR_WREN ;		data <<= 1;			/* shift data */		outw(bits, io);			/* start strobe */		udelay(2);		outw(bits | STR_CLK, io);	/* HI level */		udelay(2);		outw(bits, io);			/* LO level */		udelay(4);	}	if(!dev->muted)		outw(0, io);	udelay(4);	outw(omask, io + IO_MASK);	outw(odir, io + IO_DIR);	msleep(125);}static inline int radio_function(struct inode *inode, struct file *file,	unsigned int cmd, void *arg){	struct video_device *dev = video_devdata(file);	struct radio_device *card = video_get_drvdata(dev);	switch (cmd) {	case VIDIOCGCAP: {		struct video_capability *v = arg;		memset(v, 0, sizeof(*v));		strcpy(v->name, "Maestro radio");		v->type = VID_TYPE_TUNER;		v->channels = v->audios = 1;		return 0;	} case VIDIOCGTUNER: {		struct video_tuner *v = arg;		if (v->tuner)			return -EINVAL;		(void)radio_bits_get(card);		v->flags = VIDEO_TUNER_LOW | card->stereo;		v->signal = card->tuned;		strcpy(v->name, "FM");		v->rangelow = FREQ_LO;		v->rangehigh = FREQ_HI;		v->mode = VIDEO_MODE_AUTO;		return 0;	} case VIDIOCSTUNER: {		struct video_tuner *v = arg;		if (v->tuner != 0)			return -EINVAL;		return 0;	} case VIDIOCGFREQ: {		unsigned long *freq = arg;		*freq = BITS2FREQ(radio_bits_get(card));		return 0;	} case VIDIOCSFREQ: {		unsigned long *freq = arg;		if (*freq < FREQ_LO || *freq > FREQ_HI)			return -EINVAL;		radio_bits_set(card, FREQ2BITS(*freq));		return 0;	} case VIDIOCGAUDIO: {		struct video_audio *v = arg;		memset(v, 0, sizeof(*v));		strcpy(v->name, "Radio");		v->flags = VIDEO_AUDIO_MUTABLE | card->muted;		v->mode = VIDEO_SOUND_STEREO;		return 0;	} case VIDIOCSAUDIO: {		struct video_audio *v = arg;		if (v->audio)			return -EINVAL;		{			register u16 io = card->io;			register u16 omask = inw(io + IO_MASK);			outw(~STR_WREN, io + IO_MASK);			outw((card->muted = v->flags & VIDEO_AUDIO_MUTE) ?				STR_WREN : 0, io);			udelay(4);			outw(omask, io + IO_MASK);			msleep(125);			return 0;		}	} case VIDIOCGUNIT: {		struct video_unit *v = arg;		v->video = VIDEO_NO_UNIT;		v->vbi = VIDEO_NO_UNIT;		v->radio = dev->minor;		v->audio = 0;		v->teletext = VIDEO_NO_UNIT;		return 0;	} default:		return -ENOIOCTLCMD;	}}static int radio_ioctl(struct inode *inode, struct file *file,	unsigned int cmd, unsigned long arg){	struct video_device *dev = video_devdata(file);	struct radio_device *card = video_get_drvdata(dev);	int ret;	mutex_lock(&card->lock);	ret = video_usercopy(inode, file, cmd, arg, radio_function);	mutex_unlock(&card->lock);	return ret;}static u16 __devinit radio_power_on(struct radio_device *dev){	register u16 io = dev->io;	register u32 ofreq;	u16 omask, odir;	omask = inw(io + IO_MASK);	odir = (inw(io + IO_DIR) & ~STR_DATA) | (STR_CLK | STR_WREN);	outw(odir & ~STR_WREN, io + IO_DIR);	dev->muted = inw(io) & STR_WREN ? 0 : VIDEO_AUDIO_MUTE;	outw(odir, io + IO_DIR);	outw(~(STR_WREN | STR_CLK), io + IO_MASK);	outw(dev->muted ? 0 : STR_WREN, io);	udelay(16);	outw(omask, io + IO_MASK);	ofreq = radio_bits_get(dev);	if ((ofreq < FREQ2BITS(FREQ_LO)) || (ofreq > FREQ2BITS(FREQ_HI)))		ofreq = FREQ2BITS(FREQ_LO);	radio_bits_set(dev, ofreq);	return (ofreq == radio_bits_get(dev));}static int __devinit maestro_probe(struct pci_dev *pdev,	const struct pci_device_id *ent){	struct radio_device *radio_unit;	struct video_device *maestro_radio_inst;	int retval;	retval = pci_enable_device(pdev);	if (retval) {		dev_err(&pdev->dev, "enabling pci device failed!\n");		goto err;	}	retval = -ENOMEM;	radio_unit = kzalloc(sizeof(*radio_unit), GFP_KERNEL);	if (radio_unit == NULL) {		dev_err(&pdev->dev, "not enough memory\n");		goto err;	}	radio_unit->io = pci_resource_start(pdev, 0) + GPIO_DATA;	mutex_init(&radio_unit->lock);	maestro_radio_inst = video_device_alloc();	if (maestro_radio_inst == NULL) {		dev_err(&pdev->dev, "not enough memory\n");		goto errfr;	}	memcpy(maestro_radio_inst, &maestro_radio, sizeof(maestro_radio));	video_set_drvdata(maestro_radio_inst, radio_unit);	pci_set_drvdata(pdev, maestro_radio_inst);	retval = video_register_device(maestro_radio_inst, VFL_TYPE_RADIO,		radio_nr);	if (retval) {		printk(KERN_ERR "can't register video device!\n");		goto errfr1;	}	if (!radio_power_on(radio_unit)) {		retval = -EIO;		goto errunr;	}	dev_info(&pdev->dev, "version " DRIVER_VERSION " time " __TIME__ "  "		 __DATE__ "\n");	dev_info(&pdev->dev, "radio chip initialized\n");	return 0;errunr:	video_unregister_device(maestro_radio_inst);errfr1:	kfree(maestro_radio_inst);errfr:	kfree(radio_unit);err:	return retval;}static void __devexit maestro_remove(struct pci_dev *pdev){	struct video_device *vdev = pci_get_drvdata(pdev);	video_unregister_device(vdev);}static int __init maestro_radio_init(void){	int retval = pci_register_driver(&maestro_r_driver);	if (retval)		printk(KERN_ERR "error during registration pci driver\n");	return retval;}static void __exit maestro_radio_exit(void){	pci_unregister_driver(&maestro_r_driver);}module_init(maestro_radio_init);module_exit(maestro_radio_exit);MODULE_AUTHOR("Adam Tlalka, atlka@pg.gda.pl");MODULE_DESCRIPTION("Radio driver for the Maestro PCI sound card radio.");MODULE_LICENSE("GPL");