radio-terratec.c 8.9 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4
/* Terratec ActiveRadio ISA Standalone card driver for Linux radio support
 * (c) 1999 R. Offermanns (rolf@offermanns.de)
 * based on the aimslab radio driver from M. Kirkwood
 * many thanks to Michael Becker and Friedhelm Birth (from TerraTec)
5
 *
L
Linus Torvalds 已提交
6 7 8
 *
 * History:
 * 1999-05-21	First preview release
9
 *
L
Linus Torvalds 已提交
10 11 12 13 14 15 16 17 18 19 20 21 22
 *  Notes on the hardware:
 *  There are two "main" chips on the card:
 *  - Philips OM5610 (http://www-us.semiconductors.philips.com/acrobat/datasheets/OM5610_2.pdf)
 *  - Philips SAA6588 (http://www-us.semiconductors.philips.com/acrobat/datasheets/SAA6588_1.pdf)
 *  (you can get the datasheet at the above links)
 *
 *  Frequency control is done digitally -- ie out(port,encodefreq(95.8));
 *  Volume Control is done digitally
 *
 *  there is a I2C controlled RDS decoder (SAA6588)  onboard, which i would like to support someday
 *  (as soon i have understand how to get started :)
 *  If you can help me out with that, please contact me!!
 *
23
 *
24
 * Converted to V4L2 API by Mauro Carvalho Chehab <mchehab@infradead.org>
L
Linus Torvalds 已提交
25 26 27 28
 */

#include <linux/module.h>	/* Modules 			*/
#include <linux/init.h>		/* Initdata			*/
29
#include <linux/ioport.h>	/* request_region		*/
L
Linus Torvalds 已提交
30 31 32
#include <linux/delay.h>	/* udelay			*/
#include <asm/io.h>		/* outb, outb_p			*/
#include <asm/uaccess.h>	/* copy to/from user		*/
33
#include <linux/videodev2.h>	/* kernel radio structs		*/
34
#include <media/v4l2-common.h>
L
Linus Torvalds 已提交
35 36
#include <linux/spinlock.h>

37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58
#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       = 0xff,
		.step          = 1,
		.default_value = 0xff,
		.type          = V4L2_CTRL_TYPE_INTEGER,
	}
};

L
Linus Torvalds 已提交
59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74
#ifndef CONFIG_RADIO_TERRATEC_PORT
#define CONFIG_RADIO_TERRATEC_PORT 0x590
#endif

/**************** this ones are for the terratec *******************/
#define BASEPORT 	0x590
#define VOLPORT 	0x591
#define WRT_DIS 	0x00
#define CLK_OFF		0x00
#define IIC_DATA	0x01
#define IIC_CLK		0x02
#define DATA		0x04
#define CLK_ON 		0x08
#define WRT_EN		0x10
/*******************************************************************/

75
static int io = CONFIG_RADIO_TERRATEC_PORT;
L
Linus Torvalds 已提交
76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113
static int radio_nr = -1;
static spinlock_t lock;

struct tt_device
{
	int port;
	int curvol;
	unsigned long curfreq;
	int muted;
};


/* local things */

static void cardWriteVol(int volume)
{
	int i;
	volume = volume+(volume * 32); // change both channels
	spin_lock(&lock);
	for (i=0;i<8;i++)
	{
		if (volume & (0x80>>i))
			outb(0x80, VOLPORT);
		else outb(0x00, VOLPORT);
	}
	spin_unlock(&lock);
}



static void tt_mute(struct tt_device *dev)
{
	dev->muted = 1;
	cardWriteVol(0);
}

static int tt_setvol(struct tt_device *dev, int vol)
{
114

L
Linus Torvalds 已提交
115 116 117 118 119 120
//	printk(KERN_ERR "setvol called, vol = %d\n", vol);

	if(vol == dev->curvol) {	/* requested volume = current */
		if (dev->muted) {	/* user is unmuting the card  */
			dev->muted = 0;
			cardWriteVol(vol);	/* enable card */
121 122
		}

L
Linus Torvalds 已提交
123 124 125 126 127 128 129 130 131 132
		return 0;
	}

	if(vol == 0) {			/* volume = 0 means mute the card */
		cardWriteVol(0);	/* "turn off card" by setting vol to 0 */
		dev->curvol = vol;	/* track the volume state!	*/
		return 0;
	}

	dev->muted = 0;
133

L
Linus Torvalds 已提交
134
	cardWriteVol(vol);
135

L
Linus Torvalds 已提交
136 137 138 139 140 141 142 143 144 145 146
	dev->curvol = vol;

	return 0;

}


/* this is the worst part in this driver */
/* many more or less strange things are going on here, but hey, it works :) */

static int tt_setfreq(struct tt_device *dev, unsigned long freq1)
147
{
L
Linus Torvalds 已提交
148 149 150 151 152
	int freq;
	int i;
	int p;
	int  temp;
	long rest;
153

L
Linus Torvalds 已提交
154 155 156 157 158 159 160 161 162 163 164 165 166 167
	unsigned char buffer[25];		/* we have to bit shift 25 registers */
	freq = freq1/160;			/* convert the freq. to a nice to handle value */
	for(i=24;i>-1;i--)
		buffer[i]=0;

	rest = freq*10+10700;		/* i once had understood what is going on here */
					/* maybe some wise guy (friedhelm?) can comment this stuff */
	i=13;
	p=10;
	temp=102400;
	while (rest!=0)
	{
		if (rest%temp  == rest)
			buffer[i] = 0;
168
		else
L
Linus Torvalds 已提交
169
		{
170
			buffer[i] = 1;
L
Linus Torvalds 已提交
171 172 173 174 175 176 177 178
			rest = rest-temp;
		}
		i--;
		p--;
		temp = temp/2;
       }

	spin_lock(&lock);
179

L
Linus Torvalds 已提交
180 181
	for (i=24;i>-1;i--)			/* bit shift the values to the radiocard */
	{
182
		if (buffer[i]==1)
L
Linus Torvalds 已提交
183 184 185 186 187 188 189 190 191 192 193
		{
			outb(WRT_EN|DATA, BASEPORT);
			outb(WRT_EN|DATA|CLK_ON  , BASEPORT);
			outb(WRT_EN|DATA, BASEPORT);
		}
		else
		{
			outb(WRT_EN|0x00, BASEPORT);
			outb(WRT_EN|0x00|CLK_ON  , BASEPORT);
		}
	}
194 195
	outb(0x00, BASEPORT);

L
Linus Torvalds 已提交
196
	spin_unlock(&lock);
197 198

	return 0;
L
Linus Torvalds 已提交
199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215
}

static int tt_getsigstr(struct tt_device *dev)		/* TODO */
{
	if (inb(io) & 2)	/* bit set = no signal present	*/
		return 0;
	return 1;		/* signal present		*/
}


/* implement the video4linux api */

static int tt_do_ioctl(struct inode *inode, struct file *file,
		       unsigned int cmd, void *arg)
{
	struct video_device *dev = video_devdata(file);
	struct tt_device *tt=dev->priv;
216

L
Linus Torvalds 已提交
217 218
	switch(cmd)
	{
219
		case VIDIOC_QUERYCAP:
L
Linus Torvalds 已提交
220
		{
221
			struct v4l2_capability *v = arg;
L
Linus Torvalds 已提交
222
			memset(v,0,sizeof(*v));
223 224 225 226 227 228
			strlcpy(v->driver, "radio-terratec", sizeof (v->driver));
			strlcpy(v->card, "ActiveRadio", sizeof (v->card));
			sprintf(v->bus_info,"ISA");
			v->version = RADIO_VERSION;
			v->capabilities = V4L2_CAP_TUNER;

L
Linus Torvalds 已提交
229 230
			return 0;
		}
231
		case VIDIOC_G_TUNER:
L
Linus Torvalds 已提交
232
		{
233 234 235
			struct v4l2_tuner *v = arg;

			if (v->index > 0)
L
Linus Torvalds 已提交
236
				return -EINVAL;
237 238 239 240 241

			memset(v,0,sizeof(*v));
			strcpy(v->name, "FM");
			v->type = V4L2_TUNER_RADIO;

L
Linus Torvalds 已提交
242 243
			v->rangelow=(87*16000);
			v->rangehigh=(108*16000);
244 245 246
			v->rxsubchans =V4L2_TUNER_SUB_MONO;
			v->capability=V4L2_TUNER_CAP_LOW;
			v->audmode = V4L2_TUNER_MODE_MONO;
L
Linus Torvalds 已提交
247
			v->signal=0xFFFF*tt_getsigstr(tt);
248

L
Linus Torvalds 已提交
249 250
			return 0;
		}
251
		case VIDIOC_S_TUNER:
L
Linus Torvalds 已提交
252
		{
253 254 255
			struct v4l2_tuner *v = arg;

			if (v->index > 0)
L
Linus Torvalds 已提交
256
				return -EINVAL;
257

L
Linus Torvalds 已提交
258 259
			return 0;
		}
260
		case VIDIOC_S_FREQUENCY:
L
Linus Torvalds 已提交
261
		{
262 263 264 265
			struct v4l2_frequency *f = arg;

			tt->curfreq = f->frequency;
			tt_setfreq(tt, tt->curfreq);
L
Linus Torvalds 已提交
266 267
			return 0;
		}
268
		case VIDIOC_G_FREQUENCY:
L
Linus Torvalds 已提交
269
		{
270 271 272 273 274
			struct v4l2_frequency *f = arg;

			f->type = V4L2_TUNER_RADIO;
			f->frequency = tt->curfreq;

L
Linus Torvalds 已提交
275 276
			return 0;
		}
277
		case VIDIOC_QUERYCTRL:
278
		{
279 280 281 282 283 284 285 286 287 288 289
			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;
L
Linus Torvalds 已提交
290
		}
291
		case VIDIOC_G_CTRL:
L
Linus Torvalds 已提交
292
		{
293 294 295 296 297 298 299 300 301 302 303 304 305 306
			struct v4l2_control *ctrl= arg;

			switch (ctrl->id) {
				case V4L2_CID_AUDIO_MUTE:
					if (tt->muted)
						ctrl->value=1;
					else
						ctrl->value=0;
					return (0);
				case V4L2_CID_AUDIO_VOLUME:
					ctrl->value=tt->curvol * 6554;
					return (0);
			}
			return -EINVAL;
L
Linus Torvalds 已提交
307
		}
308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326
		case VIDIOC_S_CTRL:
		{
			struct v4l2_control *ctrl= arg;

			switch (ctrl->id) {
				case V4L2_CID_AUDIO_MUTE:
					if (ctrl->value) {
						tt_mute(tt);
					} else {
						tt_setvol(tt,tt->curvol);
					}
					return (0);
				case V4L2_CID_AUDIO_VOLUME:
					tt_setvol(tt,ctrl->value);
					return (0);
			}
			return -EINVAL;
		}

L
Linus Torvalds 已提交
327
		default:
328 329
			return v4l_compat_translate_ioctl(inode,file,cmd,arg,
							  tt_do_ioctl);
L
Linus Torvalds 已提交
330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345
	}
}

static int tt_ioctl(struct inode *inode, struct file *file,
		    unsigned int cmd, unsigned long arg)
{
	return video_usercopy(inode, file, cmd, arg, tt_do_ioctl);
}

static struct tt_device terratec_unit;

static struct file_operations terratec_fops = {
	.owner		= THIS_MODULE,
	.open           = video_exclusive_open,
	.release        = video_exclusive_release,
	.ioctl		= tt_ioctl,
346
	.compat_ioctl	= v4l_compat_ioctl32,
L
Linus Torvalds 已提交
347 348 349 350 351 352 353 354
	.llseek         = no_llseek,
};

static struct video_device terratec_radio=
{
	.owner		= THIS_MODULE,
	.name		= "TerraTec ActiveRadio",
	.type		= VID_TYPE_TUNER,
355
	.hardware	= 0,
L
Linus Torvalds 已提交
356 357 358 359 360 361 362 363 364 365
	.fops           = &terratec_fops,
};

static int __init terratec_init(void)
{
	if(io==-1)
	{
		printk(KERN_ERR "You must set an I/O address with io=0x???\n");
		return -EINVAL;
	}
366
	if (!request_region(io, 2, "terratec"))
L
Linus Torvalds 已提交
367 368 369 370 371 372
	{
		printk(KERN_ERR "TerraTec: port 0x%x already in use\n", io);
		return -EBUSY;
	}

	terratec_radio.priv=&terratec_unit;
373

L
Linus Torvalds 已提交
374
	spin_lock_init(&lock);
375

L
Linus Torvalds 已提交
376 377 378 379 380
	if(video_register_device(&terratec_radio, VFL_TYPE_RADIO, radio_nr)==-1)
	{
		release_region(io,2);
		return -EINVAL;
	}
381

L
Linus Torvalds 已提交
382 383
	printk(KERN_INFO "TERRATEC ActivRadio Standalone card driver.\n");

384
	/* mute card - prevents noisy bootups */
L
Linus Torvalds 已提交
385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403

	/* this ensures that the volume is all the way down  */
	cardWriteVol(0);
	terratec_unit.curvol = 0;

	return 0;
}

MODULE_AUTHOR("R.OFFERMANNS & others");
MODULE_DESCRIPTION("A driver for the TerraTec ActiveRadio Standalone radio card.");
MODULE_LICENSE("GPL");
module_param(io, int, 0);
MODULE_PARM_DESC(io, "I/O address of the TerraTec ActiveRadio card (0x590 or 0x591)");
module_param(radio_nr, int, 0);

static void __exit terratec_cleanup_module(void)
{
	video_unregister_device(&terratec_radio);
	release_region(io,2);
404
	printk(KERN_INFO "TERRATEC ActivRadio Standalone card driver unloaded.\n");
L
Linus Torvalds 已提交
405 406 407 408 409
}

module_init(terratec_init);
module_exit(terratec_cleanup_module);