ftp://ftp.kernel.org/pub/linux/kernel/v2.6/linux-2.6.6.tar.bz2
[linux-2.6.git] / drivers / media / radio / radio-maxiradio.c
1 /* 
2  * Guillemot Maxi Radio FM 2000 PCI radio card driver for Linux 
3  * (C) 2001 Dimitromanolakis Apostolos <apdim@grecian.net>
4  *
5  * Based in the radio Maestro PCI driver. Actually it uses the same chip
6  * for radio but different pci controller.
7  *
8  * I didn't have any specs I reversed engineered the protocol from
9  * the windows driver (radio.dll). 
10  *
11  * The card uses the TEA5757 chip that includes a search function but it
12  * is useless as I haven't found any way to read back the frequency. If 
13  * anybody does please mail me.
14  *
15  * For the pdf file see:
16  * http://www.semiconductors.philips.com/pip/TEA5757H/V1
17  *
18  *
19  * CHANGES:
20  *   0.75b
21  *     - better pci interface thanks to Francois Romieu <romieu@cogenit.fr>
22  *
23  *   0.75
24  *     - tiding up
25  *     - removed support for multiple devices as it didn't work anyway
26  *
27  * BUGS: 
28  *   - card unmutes if you change frequency
29  *
30  */
31
32
33 #include <linux/module.h>
34 #include <linux/init.h>
35 #include <linux/ioport.h>
36 #include <linux/delay.h>
37 #include <linux/sched.h>
38 #include <asm/io.h>
39 #include <asm/uaccess.h>
40 #include <asm/semaphore.h>
41 #include <linux/pci.h>
42 #include <linux/videodev.h>
43
44 /* version 0.75      Sun Feb  4 22:51:27 EET 2001 */
45 #define DRIVER_VERSION  "0.75"
46
47 #ifndef PCI_VENDOR_ID_GUILLEMOT
48 #define PCI_VENDOR_ID_GUILLEMOT 0x5046
49 #endif
50
51 #ifndef PCI_DEVICE_ID_GUILLEMOT
52 #define PCI_DEVICE_ID_GUILLEMOT_MAXIRADIO 0x1001
53 #endif
54
55
56 /* TEA5757 pin mappings */
57 static const int clk = 1, data = 2, wren = 4, mo_st = 8, power = 16 ;
58
59 static int radio_nr = -1;
60 MODULE_PARM(radio_nr, "i");
61
62
63 #define FREQ_LO          50*16000
64 #define FREQ_HI         150*16000
65
66 #define FREQ_IF         171200 /* 10.7*16000   */
67 #define FREQ_STEP       200    /* 12.5*16      */
68
69 #define FREQ2BITS(x)    ((( (unsigned int)(x)+FREQ_IF+(FREQ_STEP<<1))\
70                         /(FREQ_STEP<<2))<<2) /* (x==fmhz*16*1000) -> bits */
71
72 #define BITS2FREQ(x)    ((x) * FREQ_STEP - FREQ_IF)
73
74
75 static int radio_ioctl(struct inode *inode, struct file *file,
76                        unsigned int cmd, unsigned long arg);
77
78 static struct file_operations maxiradio_fops = {
79         .owner          = THIS_MODULE,
80         .open           = video_exclusive_open,
81         .release        = video_exclusive_release,
82         .ioctl          = radio_ioctl,
83         .llseek         = no_llseek,
84 };
85 static struct video_device maxiradio_radio =
86 {
87         .owner          = THIS_MODULE,
88         .name           = "Maxi Radio FM2000 radio",
89         .type           = VID_TYPE_TUNER,
90         .hardware       = VID_HARDWARE_SF16MI,
91         .fops           = &maxiradio_fops,
92 };
93
94 static struct radio_device
95 {
96         __u16   io,     /* base of radio io */
97                 muted,  /* VIDEO_AUDIO_MUTE */
98                 stereo, /* VIDEO_TUNER_STEREO_ON */     
99                 tuned;  /* signal strength (0 or 0xffff) */
100                 
101         unsigned long freq;
102         
103         struct  semaphore lock;
104 } radio_unit = {0, 0, 0, 0, };
105
106
107 static void sleep_125ms(void)
108 {
109         current->state = TASK_INTERRUPTIBLE;
110         schedule_timeout(HZ >> 3);
111 }
112
113
114 static void outbit(unsigned long bit, __u16 io)
115 {
116         if(bit != 0)
117                 {
118                         outb(  power|wren|data     ,io); udelay(4);
119                         outb(  power|wren|data|clk ,io); udelay(4);
120                         outb(  power|wren|data     ,io); udelay(4);
121                 }
122         else    
123                 {
124                         outb(  power|wren          ,io); udelay(4);
125                         outb(  power|wren|clk      ,io); udelay(4);
126                         outb(  power|wren          ,io); udelay(4);
127                 }
128 }
129
130 static void turn_power(__u16 io, int p)
131 {
132         if(p != 0) outb(power, io); else outb(0,io);
133 }
134
135
136 static void set_freq(__u16 io, __u32 data)
137 {
138         unsigned long int si;
139         int bl;
140         
141         /* TEA5757 shift register bits (see pdf) */
142
143         outbit(0,io); // 24  search 
144         outbit(1,io); // 23  search up/down
145         
146         outbit(0,io); // 22  stereo/mono
147
148         outbit(0,io); // 21  band
149         outbit(0,io); // 20  band (only 00=FM works I think)
150
151         outbit(0,io); // 19  port ?
152         outbit(0,io); // 18  port ?
153         
154         outbit(0,io); // 17  search level
155         outbit(0,io); // 16  search level
156  
157         si = 0x8000;
158         for(bl = 1; bl <= 16 ; bl++) { outbit(data & si,io); si >>=1; }
159         
160         outb(power,io);
161 }
162
163 static int get_stereo(__u16 io)
164 {       
165         outb(power,io); udelay(4);
166         return !(inb(io) & mo_st);
167 }
168
169 static int get_tune(__u16 io)
170 {       
171         outb(power+clk,io); udelay(4);
172         return !(inb(io) & mo_st);
173 }
174
175
176 inline static int radio_function(struct inode *inode, struct file *file,
177                                  unsigned int cmd, void *arg)
178 {
179         struct video_device *dev = video_devdata(file);
180         struct radio_device *card=dev->priv;
181
182         switch(cmd) {
183                 case VIDIOCGCAP: {
184                         struct video_capability *v = arg;
185                         
186                         memset(v,0,sizeof(*v));
187                         strcpy(v->name, "Maxi Radio FM2000 radio");
188                         v->type=VID_TYPE_TUNER;
189                         v->channels=v->audios=1;
190                         return 0;
191                 }
192                 case VIDIOCGTUNER: {
193                         struct video_tuner *v = arg;
194                         
195                         if(v->tuner)
196                                 return -EINVAL;
197                                 
198                         card->stereo = 0xffff * get_stereo(card->io);
199                         card->tuned = 0xffff * get_tune(card->io);
200                         
201                         v->flags = VIDEO_TUNER_LOW | card->stereo;
202                         v->signal = card->tuned;
203                         
204                         strcpy(v->name, "FM");
205                         
206                         v->rangelow = FREQ_LO;
207                         v->rangehigh = FREQ_HI;
208                         v->mode = VIDEO_MODE_AUTO;
209                         
210                         return 0;
211                 }
212                 case VIDIOCSTUNER: {
213                         struct video_tuner *v = arg;
214                         if(v->tuner!=0)
215                                 return -EINVAL;
216                         return 0;
217                 }
218                 case VIDIOCGFREQ: {
219                         unsigned long *freq = arg;
220                         
221                         *freq = card->freq;
222                         return 0;
223                 }
224                 case VIDIOCSFREQ: {
225                         unsigned long *freq = arg;
226                         
227                         if (*freq < FREQ_LO || *freq > FREQ_HI)
228                                 return -EINVAL;
229                         card->freq = *freq;
230                         set_freq(card->io, FREQ2BITS(card->freq));
231                         sleep_125ms();
232                         return 0;
233                 }
234                 case VIDIOCGAUDIO: {    
235                         struct video_audio *v = arg;
236                         memset(v,0,sizeof(*v));
237                         strcpy(v->name, "Radio");
238                         v->flags=VIDEO_AUDIO_MUTABLE | card->muted;
239                         v->mode=VIDEO_SOUND_STEREO;
240                         return 0;               
241                 }
242                 
243                 case VIDIOCSAUDIO: {
244                         struct video_audio *v = arg;
245                         
246                         if(v->audio)
247                                 return -EINVAL;
248                         card->muted = v->flags & VIDEO_AUDIO_MUTE;
249                         if(card->muted)
250                                 turn_power(card->io, 0);
251                         else
252                                 set_freq(card->io, FREQ2BITS(card->freq));
253                         return 0;
254                 }
255                 case VIDIOCGUNIT: {
256                         struct video_unit *v = arg;
257                         
258                         v->video=VIDEO_NO_UNIT;
259                         v->vbi=VIDEO_NO_UNIT;
260                         v->radio=dev->minor;
261                         v->audio=0;
262                         v->teletext=VIDEO_NO_UNIT;
263                         return 0;               
264                 }
265                 default: return -ENOIOCTLCMD;
266         }
267 }
268
269 static int radio_ioctl(struct inode *inode, struct file *file,
270                        unsigned int cmd, unsigned long arg)
271 {
272         struct video_device *dev = video_devdata(file);
273         struct radio_device *card=dev->priv;
274         int ret;
275         
276         down(&card->lock);
277         ret = video_usercopy(inode, file, cmd, arg, radio_function);
278         up(&card->lock);
279         return ret;
280 }
281
282 MODULE_AUTHOR("Dimitromanolakis Apostolos, apdim@grecian.net");
283 MODULE_DESCRIPTION("Radio driver for the Guillemot Maxi Radio FM2000 radio.");
284 MODULE_LICENSE("GPL");
285
286
287 static int __devinit maxiradio_init_one(struct pci_dev *pdev, const struct pci_device_id *ent)
288 {
289         if(!request_region(pci_resource_start(pdev, 0),
290                            pci_resource_len(pdev, 0), "Maxi Radio FM 2000")) {
291                 printk(KERN_ERR "radio-maxiradio: can't reserve I/O ports\n");
292                 goto err_out;
293         }
294
295         if (pci_enable_device(pdev))
296                 goto err_out_free_region;
297
298         radio_unit.io = pci_resource_start(pdev, 0);
299         init_MUTEX(&radio_unit.lock);
300         maxiradio_radio.priv = &radio_unit;
301
302         if(video_register_device(&maxiradio_radio, VFL_TYPE_RADIO, radio_nr)==-1) {
303                 printk("radio-maxiradio: can't register device!");
304                 goto err_out_free_region;
305         }
306
307         printk(KERN_INFO "radio-maxiradio: version "
308                DRIVER_VERSION
309                " time "
310                __TIME__ "  "
311                __DATE__
312                "\n");
313
314         printk(KERN_INFO "radio-maxiradio: found Guillemot MAXI Radio device (io = 0x%x)\n",
315                radio_unit.io);
316         return 0;
317
318 err_out_free_region:
319         release_region(pci_resource_start(pdev, 0), pci_resource_len(pdev, 0));
320 err_out:
321         return -ENODEV;
322 }
323
324 static void __devexit maxiradio_remove_one(struct pci_dev *pdev)
325 {
326         video_unregister_device(&maxiradio_radio);
327         release_region(pci_resource_start(pdev, 0), pci_resource_len(pdev, 0));
328 }
329
330 static struct pci_device_id maxiradio_pci_tbl[] = {
331         { PCI_VENDOR_ID_GUILLEMOT, PCI_DEVICE_ID_GUILLEMOT_MAXIRADIO,
332                 PCI_ANY_ID, PCI_ANY_ID, },
333         { 0,}
334 };
335
336 MODULE_DEVICE_TABLE(pci, maxiradio_pci_tbl);
337
338 static struct pci_driver maxiradio_driver = {
339         .name           = "radio-maxiradio",
340         .id_table       = maxiradio_pci_tbl,
341         .probe          = maxiradio_init_one,
342         .remove         = __devexit_p(maxiradio_remove_one),
343 };
344
345 int __init maxiradio_radio_init(void)
346 {
347         return pci_module_init(&maxiradio_driver);
348 }
349
350 void __exit maxiradio_radio_exit(void)
351 {
352         pci_unregister_driver(&maxiradio_driver);
353 }
354
355 module_init(maxiradio_radio_init);
356 module_exit(maxiradio_radio_exit);