]>
Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* radio-cadet.c - A video4linux driver for the ADS Cadet AM/FM Radio Card |
2 | * | |
3 | * by Fred Gleason <fredg@wava.com> | |
4 | * Version 0.3.3 | |
5 | * | |
6 | * (Loosely) based on code for the Aztech radio card by | |
7 | * | |
8 | * Russell Kroll (rkroll@exploits.org) | |
9 | * Quay Ly | |
10 | * Donald Song | |
11 | * Jason Lewis (jlewis@twilight.vtc.vsc.edu) | |
12 | * Scott McGrath (smcgrath@twilight.vtc.vsc.edu) | |
13 | * William McGrath (wmcgrath@twilight.vtc.vsc.edu) | |
14 | * | |
15 | * History: | |
16 | * 2000-04-29 Russell Kroll <rkroll@exploits.org> | |
17 | * Added ISAPnP detection for Linux 2.3/2.4 | |
18 | * | |
19 | * 2001-01-10 Russell Kroll <rkroll@exploits.org> | |
20 | * Removed dead CONFIG_RADIO_CADET_PORT code | |
21 | * PnP detection on load is now default (no args necessary) | |
22 | * | |
23 | * 2002-01-17 Adam Belay <ambx1@neo.rr.com> | |
24 | * Updated to latest pnp code | |
25 | * | |
26 | * 2003-01-31 Alan Cox <alan@redhat.com> | |
27 | * Cleaned up locking, delay code, general odds and ends | |
28 | */ | |
29 | ||
30 | #include <linux/module.h> /* Modules */ | |
31 | #include <linux/init.h> /* Initdata */ | |
fb911ee8 | 32 | #include <linux/ioport.h> /* request_region */ |
1da177e4 LT |
33 | #include <linux/delay.h> /* udelay */ |
34 | #include <asm/io.h> /* outb, outb_p */ | |
35 | #include <asm/uaccess.h> /* copy to/from user */ | |
36 | #include <linux/videodev.h> /* kernel radio structs */ | |
37 | #include <linux/param.h> | |
38 | #include <linux/pnp.h> | |
39 | ||
40 | #define RDS_BUFFER 256 | |
41 | ||
42 | static int io=-1; /* default to isapnp activation */ | |
43 | static int radio_nr = -1; | |
44 | static int users=0; | |
45 | static int curtuner=0; | |
46 | static int tunestat=0; | |
47 | static int sigstrength=0; | |
48 | static wait_queue_head_t read_queue; | |
49 | static struct timer_list readtimer; | |
50 | static __u8 rdsin=0,rdsout=0,rdsstat=0; | |
51 | static unsigned char rdsbuf[RDS_BUFFER]; | |
52 | static spinlock_t cadet_io_lock; | |
53 | ||
54 | static int cadet_probe(void); | |
55 | ||
56 | /* | |
57 | * Signal Strength Threshold Values | |
58 | * The V4L API spec does not define any particular unit for the signal | |
59 | * strength value. These values are in microvolts of RF at the tuner's input. | |
60 | */ | |
61 | static __u16 sigtable[2][4]={{5,10,30,150},{28,40,63,1000}}; | |
62 | ||
63 | static int cadet_getrds(void) | |
64 | { | |
65 | int rdsstat=0; | |
66 | ||
67 | spin_lock(&cadet_io_lock); | |
68 | outb(3,io); /* Select Decoder Control/Status */ | |
69 | outb(inb(io+1)&0x7f,io+1); /* Reset RDS detection */ | |
70 | spin_unlock(&cadet_io_lock); | |
71 | ||
72 | msleep(100); | |
73 | ||
74 | spin_lock(&cadet_io_lock); | |
75 | outb(3,io); /* Select Decoder Control/Status */ | |
76 | if((inb(io+1)&0x80)!=0) { | |
77 | rdsstat|=VIDEO_TUNER_RDS_ON; | |
78 | } | |
79 | if((inb(io+1)&0x10)!=0) { | |
80 | rdsstat|=VIDEO_TUNER_MBS_ON; | |
81 | } | |
82 | spin_unlock(&cadet_io_lock); | |
83 | return rdsstat; | |
84 | } | |
85 | ||
86 | static int cadet_getstereo(void) | |
87 | { | |
88 | int ret = 0; | |
89 | if(curtuner != 0) /* Only FM has stereo capability! */ | |
90 | return 0; | |
91 | ||
92 | spin_lock(&cadet_io_lock); | |
93 | outb(7,io); /* Select tuner control */ | |
94 | if( (inb(io+1) & 0x40) == 0) | |
95 | ret = 1; | |
96 | spin_unlock(&cadet_io_lock); | |
97 | return ret; | |
98 | } | |
99 | ||
100 | static unsigned cadet_gettune(void) | |
101 | { | |
102 | int curvol,i; | |
103 | unsigned fifo=0; | |
104 | ||
105 | /* | |
106 | * Prepare for read | |
107 | */ | |
108 | ||
109 | spin_lock(&cadet_io_lock); | |
110 | ||
111 | outb(7,io); /* Select tuner control */ | |
112 | curvol=inb(io+1); /* Save current volume/mute setting */ | |
113 | outb(0x00,io+1); /* Ensure WRITE-ENABLE is LOW */ | |
114 | tunestat=0xffff; | |
115 | ||
116 | /* | |
117 | * Read the shift register | |
118 | */ | |
119 | for(i=0;i<25;i++) { | |
120 | fifo=(fifo<<1)|((inb(io+1)>>7)&0x01); | |
121 | if(i<24) { | |
122 | outb(0x01,io+1); | |
123 | tunestat&=inb(io+1); | |
124 | outb(0x00,io+1); | |
125 | } | |
126 | } | |
127 | ||
128 | /* | |
129 | * Restore volume/mute setting | |
130 | */ | |
131 | outb(curvol,io+1); | |
132 | spin_unlock(&cadet_io_lock); | |
133 | ||
134 | return fifo; | |
135 | } | |
136 | ||
137 | static unsigned cadet_getfreq(void) | |
138 | { | |
139 | int i; | |
140 | unsigned freq=0,test,fifo=0; | |
141 | ||
142 | /* | |
143 | * Read current tuning | |
144 | */ | |
145 | fifo=cadet_gettune(); | |
146 | ||
147 | /* | |
148 | * Convert to actual frequency | |
149 | */ | |
150 | if(curtuner==0) { /* FM */ | |
151 | test=12500; | |
152 | for(i=0;i<14;i++) { | |
153 | if((fifo&0x01)!=0) { | |
154 | freq+=test; | |
155 | } | |
156 | test=test<<1; | |
157 | fifo=fifo>>1; | |
158 | } | |
159 | freq-=10700000; /* IF frequency is 10.7 MHz */ | |
160 | freq=(freq*16)/1000000; /* Make it 1/16 MHz */ | |
161 | } | |
162 | if(curtuner==1) { /* AM */ | |
163 | freq=((fifo&0x7fff)-2010)*16; | |
164 | } | |
165 | ||
166 | return freq; | |
167 | } | |
168 | ||
169 | static void cadet_settune(unsigned fifo) | |
170 | { | |
171 | int i; | |
172 | unsigned test; | |
173 | ||
174 | spin_lock(&cadet_io_lock); | |
175 | ||
176 | outb(7,io); /* Select tuner control */ | |
177 | /* | |
178 | * Write the shift register | |
179 | */ | |
180 | test=0; | |
181 | test=(fifo>>23)&0x02; /* Align data for SDO */ | |
182 | test|=0x1c; /* SDM=1, SWE=1, SEN=1, SCK=0 */ | |
183 | outb(7,io); /* Select tuner control */ | |
184 | outb(test,io+1); /* Initialize for write */ | |
185 | for(i=0;i<25;i++) { | |
186 | test|=0x01; /* Toggle SCK High */ | |
187 | outb(test,io+1); | |
188 | test&=0xfe; /* Toggle SCK Low */ | |
189 | outb(test,io+1); | |
190 | fifo=fifo<<1; /* Prepare the next bit */ | |
191 | test=0x1c|((fifo>>23)&0x02); | |
192 | outb(test,io+1); | |
193 | } | |
194 | spin_unlock(&cadet_io_lock); | |
195 | } | |
196 | ||
197 | static void cadet_setfreq(unsigned freq) | |
198 | { | |
199 | unsigned fifo; | |
200 | int i,j,test; | |
201 | int curvol; | |
202 | ||
203 | /* | |
204 | * Formulate a fifo command | |
205 | */ | |
206 | fifo=0; | |
207 | if(curtuner==0) { /* FM */ | |
208 | test=102400; | |
209 | freq=(freq*1000)/16; /* Make it kHz */ | |
210 | freq+=10700; /* IF is 10700 kHz */ | |
211 | for(i=0;i<14;i++) { | |
212 | fifo=fifo<<1; | |
213 | if(freq>=test) { | |
214 | fifo|=0x01; | |
215 | freq-=test; | |
216 | } | |
217 | test=test>>1; | |
218 | } | |
219 | } | |
220 | if(curtuner==1) { /* AM */ | |
221 | fifo=(freq/16)+2010; /* Make it kHz */ | |
222 | fifo|=0x100000; /* Select AM Band */ | |
223 | } | |
224 | ||
225 | /* | |
226 | * Save current volume/mute setting | |
227 | */ | |
228 | ||
229 | spin_lock(&cadet_io_lock); | |
230 | outb(7,io); /* Select tuner control */ | |
231 | curvol=inb(io+1); | |
232 | spin_unlock(&cadet_io_lock); | |
233 | ||
234 | /* | |
235 | * Tune the card | |
236 | */ | |
237 | for(j=3;j>-1;j--) { | |
238 | cadet_settune(fifo|(j<<16)); | |
239 | ||
240 | spin_lock(&cadet_io_lock); | |
241 | outb(7,io); /* Select tuner control */ | |
242 | outb(curvol,io+1); | |
243 | spin_unlock(&cadet_io_lock); | |
244 | ||
245 | msleep(100); | |
246 | ||
247 | cadet_gettune(); | |
248 | if((tunestat & 0x40) == 0) { /* Tuned */ | |
249 | sigstrength=sigtable[curtuner][j]; | |
250 | return; | |
251 | } | |
252 | } | |
253 | sigstrength=0; | |
254 | } | |
255 | ||
256 | ||
257 | static int cadet_getvol(void) | |
258 | { | |
259 | int ret = 0; | |
260 | ||
261 | spin_lock(&cadet_io_lock); | |
262 | ||
263 | outb(7,io); /* Select tuner control */ | |
264 | if((inb(io + 1) & 0x20) != 0) | |
265 | ret = 0xffff; | |
266 | ||
267 | spin_unlock(&cadet_io_lock); | |
268 | return ret; | |
269 | } | |
270 | ||
271 | ||
272 | static void cadet_setvol(int vol) | |
273 | { | |
274 | spin_lock(&cadet_io_lock); | |
275 | outb(7,io); /* Select tuner control */ | |
276 | if(vol>0) | |
277 | outb(0x20,io+1); | |
278 | else | |
279 | outb(0x00,io+1); | |
280 | spin_unlock(&cadet_io_lock); | |
281 | } | |
282 | ||
283 | static void cadet_handler(unsigned long data) | |
284 | { | |
285 | /* | |
286 | * Service the RDS fifo | |
287 | */ | |
288 | ||
289 | if(spin_trylock(&cadet_io_lock)) | |
290 | { | |
291 | outb(0x3,io); /* Select RDS Decoder Control */ | |
292 | if((inb(io+1)&0x20)!=0) { | |
293 | printk(KERN_CRIT "cadet: RDS fifo overflow\n"); | |
294 | } | |
295 | outb(0x80,io); /* Select RDS fifo */ | |
296 | while((inb(io)&0x80)!=0) { | |
297 | rdsbuf[rdsin]=inb(io+1); | |
298 | if(rdsin==rdsout) | |
299 | printk(KERN_WARNING "cadet: RDS buffer overflow\n"); | |
300 | else | |
301 | rdsin++; | |
302 | } | |
303 | spin_unlock(&cadet_io_lock); | |
304 | } | |
305 | ||
306 | /* | |
307 | * Service pending read | |
308 | */ | |
309 | if( rdsin!=rdsout) | |
310 | wake_up_interruptible(&read_queue); | |
311 | ||
312 | /* | |
313 | * Clean up and exit | |
314 | */ | |
315 | init_timer(&readtimer); | |
316 | readtimer.function=cadet_handler; | |
317 | readtimer.data=(unsigned long)0; | |
318 | readtimer.expires=jiffies+(HZ/20); | |
319 | add_timer(&readtimer); | |
320 | } | |
321 | ||
322 | ||
323 | ||
324 | static ssize_t cadet_read(struct file *file, char __user *data, | |
325 | size_t count, loff_t *ppos) | |
326 | { | |
327 | int i=0; | |
328 | unsigned char readbuf[RDS_BUFFER]; | |
329 | ||
330 | if(rdsstat==0) { | |
331 | spin_lock(&cadet_io_lock); | |
332 | rdsstat=1; | |
333 | outb(0x80,io); /* Select RDS fifo */ | |
334 | spin_unlock(&cadet_io_lock); | |
335 | init_timer(&readtimer); | |
336 | readtimer.function=cadet_handler; | |
337 | readtimer.data=(unsigned long)0; | |
338 | readtimer.expires=jiffies+(HZ/20); | |
339 | add_timer(&readtimer); | |
340 | } | |
341 | if(rdsin==rdsout) { | |
342 | if (file->f_flags & O_NONBLOCK) | |
343 | return -EWOULDBLOCK; | |
344 | interruptible_sleep_on(&read_queue); | |
345 | } | |
346 | while( i<count && rdsin!=rdsout) | |
347 | readbuf[i++]=rdsbuf[rdsout++]; | |
348 | ||
349 | if (copy_to_user(data,readbuf,i)) | |
350 | return -EFAULT; | |
351 | return i; | |
352 | } | |
353 | ||
354 | ||
355 | ||
356 | static int cadet_do_ioctl(struct inode *inode, struct file *file, | |
357 | unsigned int cmd, void *arg) | |
358 | { | |
359 | switch(cmd) | |
360 | { | |
361 | case VIDIOCGCAP: | |
362 | { | |
363 | struct video_capability *v = arg; | |
364 | memset(v,0,sizeof(*v)); | |
365 | v->type=VID_TYPE_TUNER; | |
366 | v->channels=2; | |
367 | v->audios=1; | |
368 | strcpy(v->name, "ADS Cadet"); | |
369 | return 0; | |
370 | } | |
371 | case VIDIOCGTUNER: | |
372 | { | |
373 | struct video_tuner *v = arg; | |
374 | if((v->tuner<0)||(v->tuner>1)) { | |
375 | return -EINVAL; | |
376 | } | |
377 | switch(v->tuner) { | |
378 | case 0: | |
379 | strcpy(v->name,"FM"); | |
380 | v->rangelow=1400; /* 87.5 MHz */ | |
381 | v->rangehigh=1728; /* 108.0 MHz */ | |
382 | v->flags=0; | |
383 | v->mode=0; | |
384 | v->mode|=VIDEO_MODE_AUTO; | |
385 | v->signal=sigstrength; | |
386 | if(cadet_getstereo()==1) { | |
387 | v->flags|=VIDEO_TUNER_STEREO_ON; | |
388 | } | |
389 | v->flags|=cadet_getrds(); | |
390 | break; | |
391 | case 1: | |
392 | strcpy(v->name,"AM"); | |
393 | v->rangelow=8320; /* 520 kHz */ | |
394 | v->rangehigh=26400; /* 1650 kHz */ | |
395 | v->flags=0; | |
396 | v->flags|=VIDEO_TUNER_LOW; | |
397 | v->mode=0; | |
398 | v->mode|=VIDEO_MODE_AUTO; | |
399 | v->signal=sigstrength; | |
400 | break; | |
401 | } | |
402 | return 0; | |
403 | } | |
404 | case VIDIOCSTUNER: | |
405 | { | |
406 | struct video_tuner *v = arg; | |
407 | if((v->tuner<0)||(v->tuner>1)) { | |
408 | return -EINVAL; | |
409 | } | |
410 | curtuner=v->tuner; | |
411 | return 0; | |
412 | } | |
413 | case VIDIOCGFREQ: | |
414 | { | |
415 | unsigned long *freq = arg; | |
416 | *freq = cadet_getfreq(); | |
417 | return 0; | |
418 | } | |
419 | case VIDIOCSFREQ: | |
420 | { | |
421 | unsigned long *freq = arg; | |
422 | if((curtuner==0)&&((*freq<1400)||(*freq>1728))) { | |
423 | return -EINVAL; | |
424 | } | |
425 | if((curtuner==1)&&((*freq<8320)||(*freq>26400))) { | |
426 | return -EINVAL; | |
427 | } | |
428 | cadet_setfreq(*freq); | |
429 | return 0; | |
430 | } | |
431 | case VIDIOCGAUDIO: | |
432 | { | |
433 | struct video_audio *v = arg; | |
434 | memset(v,0, sizeof(*v)); | |
435 | v->flags=VIDEO_AUDIO_MUTABLE|VIDEO_AUDIO_VOLUME; | |
436 | if(cadet_getstereo()==0) { | |
437 | v->mode=VIDEO_SOUND_MONO; | |
438 | } else { | |
439 | v->mode=VIDEO_SOUND_STEREO; | |
440 | } | |
441 | v->volume=cadet_getvol(); | |
442 | v->step=0xffff; | |
443 | strcpy(v->name, "Radio"); | |
444 | return 0; | |
445 | } | |
446 | case VIDIOCSAUDIO: | |
447 | { | |
448 | struct video_audio *v = arg; | |
449 | if(v->audio) | |
450 | return -EINVAL; | |
451 | cadet_setvol(v->volume); | |
452 | if(v->flags&VIDEO_AUDIO_MUTE) | |
453 | cadet_setvol(0); | |
454 | else | |
455 | cadet_setvol(0xffff); | |
456 | return 0; | |
457 | } | |
458 | default: | |
459 | return -ENOIOCTLCMD; | |
460 | } | |
461 | } | |
462 | ||
463 | static int cadet_ioctl(struct inode *inode, struct file *file, | |
464 | unsigned int cmd, unsigned long arg) | |
465 | { | |
466 | return video_usercopy(inode, file, cmd, arg, cadet_do_ioctl); | |
467 | } | |
468 | ||
469 | static int cadet_open(struct inode *inode, struct file *file) | |
470 | { | |
471 | if(users) | |
472 | return -EBUSY; | |
473 | users++; | |
474 | init_waitqueue_head(&read_queue); | |
475 | return 0; | |
476 | } | |
477 | ||
478 | static int cadet_release(struct inode *inode, struct file *file) | |
479 | { | |
480 | del_timer_sync(&readtimer); | |
481 | rdsstat=0; | |
482 | users--; | |
483 | return 0; | |
484 | } | |
485 | ||
486 | ||
487 | static struct file_operations cadet_fops = { | |
488 | .owner = THIS_MODULE, | |
489 | .open = cadet_open, | |
490 | .release = cadet_release, | |
491 | .read = cadet_read, | |
492 | .ioctl = cadet_ioctl, | |
493 | .llseek = no_llseek, | |
494 | }; | |
495 | ||
496 | static struct video_device cadet_radio= | |
497 | { | |
498 | .owner = THIS_MODULE, | |
499 | .name = "Cadet radio", | |
500 | .type = VID_TYPE_TUNER, | |
501 | .hardware = VID_HARDWARE_CADET, | |
502 | .fops = &cadet_fops, | |
503 | }; | |
504 | ||
505 | static struct pnp_device_id cadet_pnp_devices[] = { | |
506 | /* ADS Cadet AM/FM Radio Card */ | |
507 | {.id = "MSM0c24", .driver_data = 0}, | |
508 | {.id = ""} | |
509 | }; | |
510 | ||
511 | MODULE_DEVICE_TABLE(pnp, cadet_pnp_devices); | |
512 | ||
513 | static int cadet_pnp_probe(struct pnp_dev * dev, const struct pnp_device_id *dev_id) | |
514 | { | |
515 | if (!dev) | |
516 | return -ENODEV; | |
517 | /* only support one device */ | |
518 | if (io > 0) | |
519 | return -EBUSY; | |
520 | ||
521 | if (!pnp_port_valid(dev, 0)) { | |
522 | return -ENODEV; | |
523 | } | |
524 | ||
525 | io = pnp_port_start(dev, 0); | |
526 | ||
527 | printk ("radio-cadet: PnP reports device at %#x\n", io); | |
528 | ||
529 | return io; | |
530 | } | |
531 | ||
532 | static struct pnp_driver cadet_pnp_driver = { | |
533 | .name = "radio-cadet", | |
534 | .id_table = cadet_pnp_devices, | |
535 | .probe = cadet_pnp_probe, | |
536 | .remove = NULL, | |
537 | }; | |
538 | ||
539 | static int cadet_probe(void) | |
540 | { | |
541 | static int iovals[8]={0x330,0x332,0x334,0x336,0x338,0x33a,0x33c,0x33e}; | |
542 | int i; | |
543 | ||
544 | for(i=0;i<8;i++) { | |
545 | io=iovals[i]; | |
f1ac046d | 546 | if (request_region(io, 2, "cadet-probe")) { |
1da177e4 LT |
547 | cadet_setfreq(1410); |
548 | if(cadet_getfreq()==1410) { | |
549 | release_region(io, 2); | |
550 | return io; | |
551 | } | |
552 | release_region(io, 2); | |
553 | } | |
554 | } | |
555 | return -1; | |
556 | } | |
557 | ||
558 | /* | |
559 | * io should only be set if the user has used something like | |
560 | * isapnp (the userspace program) to initialize this card for us | |
561 | */ | |
562 | ||
563 | static int __init cadet_init(void) | |
564 | { | |
565 | spin_lock_init(&cadet_io_lock); | |
566 | ||
567 | /* | |
568 | * If a probe was requested then probe ISAPnP first (safest) | |
569 | */ | |
570 | if (io < 0) | |
571 | pnp_register_driver(&cadet_pnp_driver); | |
572 | /* | |
573 | * If that fails then probe unsafely if probe is requested | |
574 | */ | |
575 | if(io < 0) | |
576 | io = cadet_probe (); | |
577 | ||
578 | /* | |
579 | * Else we bail out | |
580 | */ | |
581 | ||
582 | if(io < 0) { | |
583 | #ifdef MODULE | |
584 | printk(KERN_ERR "You must set an I/O address with io=0x???\n"); | |
585 | #endif | |
586 | goto fail; | |
587 | } | |
588 | if (!request_region(io,2,"cadet")) | |
589 | goto fail; | |
590 | if(video_register_device(&cadet_radio,VFL_TYPE_RADIO,radio_nr)==-1) { | |
591 | release_region(io,2); | |
592 | goto fail; | |
593 | } | |
594 | printk(KERN_INFO "ADS Cadet Radio Card at 0x%x\n",io); | |
595 | return 0; | |
596 | fail: | |
597 | pnp_unregister_driver(&cadet_pnp_driver); | |
598 | return -1; | |
599 | } | |
600 | ||
601 | ||
602 | ||
603 | MODULE_AUTHOR("Fred Gleason, Russell Kroll, Quay Lu, Donald Song, Jason Lewis, Scott McGrath, William McGrath"); | |
604 | MODULE_DESCRIPTION("A driver for the ADS Cadet AM/FM/RDS radio card."); | |
605 | MODULE_LICENSE("GPL"); | |
606 | ||
607 | module_param(io, int, 0); | |
608 | MODULE_PARM_DESC(io, "I/O address of Cadet card (0x330,0x332,0x334,0x336,0x338,0x33a,0x33c,0x33e)"); | |
609 | module_param(radio_nr, int, 0); | |
610 | ||
611 | static void __exit cadet_cleanup_module(void) | |
612 | { | |
613 | video_unregister_device(&cadet_radio); | |
614 | release_region(io,2); | |
615 | pnp_unregister_driver(&cadet_pnp_driver); | |
616 | } | |
617 | ||
618 | module_init(cadet_init); | |
619 | module_exit(cadet_cleanup_module); | |
620 |