drivers/media/radio/radio-sf16fmi.c

   1 /* SF16FMI radio driver for Linux radio support
   2  * heavily based on rtrack driver...
   3  * (c) 1997 M. Kirkwood
   4  * (c) 1998 Petr Vandrovec, vandrove@vc.cvut.cz
   5  *
   6  * Fitted to new interface by Alan Cox <alan@lxorguk.ukuu.org.uk>
   7  * Made working and cleaned up functions <mikael.hedin@irf.se>
   8  * Support for ISAPnP by Ladislav Michl <ladis@psi.cz>
   9  *
  10  * Notes on the hardware
  11  *
  12  *  Frequency control is done digitally -- ie out(port,encodefreq(95.8));
  13  *  No volume control - only mute/unmute - you have to use line volume
  14  *  control on SB-part of SF16FMI
  15  *
  16  * Converted to V4L2 API by Mauro Carvalho Chehab <mchehab@infradead.org>
  17  */
  18
  19 #include <linux/version.h>
  20 #include <linux/kernel.h>       /* __setup                      */
  21 #include <linux/module.h>       /* Modules                      */
  22 #include <linux/init.h>         /* Initdata                     */
  23 #include <linux/ioport.h>       /* request_region               */
  24 #include <linux/delay.h>        /* udelay                       */
  25 #include <linux/isapnp.h>
  26 #include <linux/mutex.h>
  27 #include <linux/videodev2.h>    /* kernel radio structs         */
  28 #include <linux/io.h>           /* outb, outb_p                 */
  29 #include <media/v4l2-device.h>
  30 #include <media/v4l2-ioctl.h>
  31
  32 MODULE_AUTHOR("Petr Vandrovec, vandrove@vc.cvut.cz and M. Kirkwood");
  33 MODULE_DESCRIPTION("A driver for the SF16MI radio.");
  34 MODULE_LICENSE("GPL");
  35
  36 static int io = -1;
  37 static int radio_nr = -1;
  38
  39 module_param(io, int, 0);
  40 MODULE_PARM_DESC(io, "I/O address of the SF16MI card (0x284 or 0x384)");
  41 module_param(radio_nr, int, 0);
  42
  43 #define RADIO_VERSION KERNEL_VERSION(0, 0, 2)
  44
  45 struct fmi
  46 {
  47         struct v4l2_device v4l2_dev;
  48         struct video_device vdev;
  49         int io;
  50         int curvol; /* 1 or 0 */
  51         unsigned long curfreq; /* freq in kHz */
  52         __u32 flags;
  53         struct mutex lock;
  54 };
  55
  56 static struct fmi fmi_card;
  57 static struct pnp_dev *dev;
  58
  59 /* freq is in 1/16 kHz to internal number, hw precision is 50 kHz */
  60 /* It is only useful to give freq in intervall of 800 (=0.05Mhz),
  61  * other bits will be truncated, e.g 92.7400016 -> 92.7, but
  62  * 92.7400017 -> 92.75
  63  */
  64 #define RSF16_ENCODE(x) ((x) / 800 + 214)
  65 #define RSF16_MINFREQ (87 * 16000)
  66 #define RSF16_MAXFREQ (108 * 16000)
  67
  68 static void outbits(int bits, unsigned int data, int io)
  69 {
  70         while (bits--) {
  71                 if (data & 1) {
  72                         outb(5, io);
  73                         udelay(6);
  74                         outb(7, io);
  75                         udelay(6);
  76                 } else {
  77                         outb(1, io);
  78                         udelay(6);
  79                         outb(3, io);
  80                         udelay(6);
  81                 }
  82                 data >>= 1;
  83         }
  84 }
  85
  86 static inline void fmi_mute(struct fmi *fmi)
  87 {
  88         mutex_lock(&fmi->lock);
  89         outb(0x00, fmi->io);
  90         mutex_unlock(&fmi->lock);
  91 }
  92
  93 static inline void fmi_unmute(struct fmi *fmi)
  94 {
  95         mutex_lock(&fmi->lock);
  96         outb(0x08, fmi->io);
  97         mutex_unlock(&fmi->lock);
  98 }
  99
 100 static inline int fmi_setfreq(struct fmi *fmi, unsigned long freq)
 101 {
 102         mutex_lock(&fmi->lock);
 103         fmi->curfreq = freq;
 104
 105         outbits(16, RSF16_ENCODE(freq), fmi->io);
 106         outbits(8, 0xC0, fmi->io);
 107         msleep(143);            /* was schedule_timeout(HZ/7) */
 108         mutex_unlock(&fmi->lock);
 109         if (fmi->curvol)
 110                 fmi_unmute(fmi);
 111         return 0;
 112 }
 113
 114 static inline int fmi_getsigstr(struct fmi *fmi)
 115 {
 116         int val;
 117         int res;
 118
 119         mutex_lock(&fmi->lock);
 120         val = fmi->curvol ? 0x08 : 0x00;        /* unmute/mute */
 121         outb(val, fmi->io);
 122         outb(val | 0x10, fmi->io);
 123         msleep(143);            /* was schedule_timeout(HZ/7) */
 124         res = (int)inb(fmi->io + 1);
 125         outb(val, fmi->io);
 126
 127         mutex_unlock(&fmi->lock);
 128         return (res & 2) ? 0 : 0xFFFF;
 129 }
 130
 131 static int vidioc_querycap(struct file *file, void  *priv,
 132                                         struct v4l2_capability *v)
 133 {
 134         strlcpy(v->driver, "radio-sf16fmi", sizeof(v->driver));
 135         strlcpy(v->card, "SF16-FMx radio", sizeof(v->card));
 136         strlcpy(v->bus_info, "ISA", sizeof(v->bus_info));
 137         v->version = RADIO_VERSION;
 138         v->capabilities = V4L2_CAP_TUNER | V4L2_CAP_RADIO;
 139         return 0;
 140 }
 141
 142 static int vidioc_g_tuner(struct file *file, void *priv,
 143                                         struct v4l2_tuner *v)
 144 {
 145         int mult;
 146         struct fmi *fmi = video_drvdata(file);
 147
 148         if (v->index > 0)
 149                 return -EINVAL;
 150
 151         strlcpy(v->name, "FM", sizeof(v->name));
 152         v->type = V4L2_TUNER_RADIO;
 153         mult = (fmi->flags & V4L2_TUNER_CAP_LOW) ? 1 : 1000;
 154         v->rangelow = RSF16_MINFREQ / mult;
 155         v->rangehigh = RSF16_MAXFREQ / mult;
 156         v->rxsubchans = V4L2_TUNER_SUB_MONO | V4L2_TUNER_MODE_STEREO;
 157         v->capability = fmi->flags & V4L2_TUNER_CAP_LOW;
 158         v->audmode = V4L2_TUNER_MODE_STEREO;
 159         v->signal = fmi_getsigstr(fmi);
 160         return 0;
 161 }
 162
 163 static int vidioc_s_tuner(struct file *file, void *priv,
 164                                         struct v4l2_tuner *v)
 165 {
 166         return v->index ? -EINVAL : 0;
 167 }
 168
 169 static int vidioc_s_frequency(struct file *file, void *priv,
 170                                         struct v4l2_frequency *f)
 171 {
 172         struct fmi *fmi = video_drvdata(file);
 173
 174         if (!(fmi->flags & V4L2_TUNER_CAP_LOW))
 175                 f->frequency *= 1000;
 176         if (f->frequency < RSF16_MINFREQ ||
 177                         f->frequency > RSF16_MAXFREQ)
 178                 return -EINVAL;
 179         /* rounding in steps of 800 to match the freq
 180            that will be used */
 181         fmi_setfreq(fmi, (f->frequency / 800) * 800);
 182         return 0;
 183 }
 184
 185 static int vidioc_g_frequency(struct file *file, void *priv,
 186                                         struct v4l2_frequency *f)
 187 {
 188         struct fmi *fmi = video_drvdata(file);
 189
 190         f->type = V4L2_TUNER_RADIO;
 191         f->frequency = fmi->curfreq;
 192         if (!(fmi->flags & V4L2_TUNER_CAP_LOW))
 193                 f->frequency /= 1000;
 194         return 0;
 195 }
 196
 197 static int vidioc_queryctrl(struct file *file, void *priv,
 198                                         struct v4l2_queryctrl *qc)
 199 {
 200         switch (qc->id) {
 201         case V4L2_CID_AUDIO_MUTE:
 202                 return v4l2_ctrl_query_fill(qc, 0, 1, 1, 1);
 203         }
 204         return -EINVAL;
 205 }
 206
 207 static int vidioc_g_ctrl(struct file *file, void *priv,
 208                                         struct v4l2_control *ctrl)
 209 {
 210         struct fmi *fmi = video_drvdata(file);
 211
 212         switch (ctrl->id) {
 213         case V4L2_CID_AUDIO_MUTE:
 214                 ctrl->value = fmi->curvol;
 215                 return 0;
 216         }
 217         return -EINVAL;
 218 }
 219
 220 static int vidioc_s_ctrl(struct file *file, void *priv,
 221                                         struct v4l2_control *ctrl)
 222 {
 223         struct fmi *fmi = video_drvdata(file);
 224
 225         switch (ctrl->id) {
 226         case V4L2_CID_AUDIO_MUTE:
 227                 if (ctrl->value)
 228                         fmi_mute(fmi);
 229                 else
 230                         fmi_unmute(fmi);
 231                 fmi->curvol = ctrl->value;
 232                 return 0;
 233         }
 234         return -EINVAL;
 235 }
 236
 237 static int vidioc_g_input(struct file *filp, void *priv, unsigned int *i)
 238 {
 239         *i = 0;
 240         return 0;
 241 }
 242
 243 static int vidioc_s_input(struct file *filp, void *priv, unsigned int i)
 244 {
 245         return i ? -EINVAL : 0;
 246 }
 247
 248 static int vidioc_g_audio(struct file *file, void *priv,
 249                                         struct v4l2_audio *a)
 250 {
 251         a->index = 0;
 252         strlcpy(a->name, "Radio", sizeof(a->name));
 253         a->capability = V4L2_AUDCAP_STEREO;
 254         return 0;
 255 }
 256
 257 static int vidioc_s_audio(struct file *file, void *priv,
 258                                         struct v4l2_audio *a)
 259 {
 260         return a->index ? -EINVAL : 0;
 261 }
 262
 263 static int fmi_open(struct file *file)
 264 {
 265         return 0;
 266 }
 267
 268 static int fmi_release(struct file *file)
 269 {
 270         return 0;
 271 }
 272
 273 static const struct v4l2_file_operations fmi_fops = {
 274         .owner          = THIS_MODULE,
 275         .open           = fmi_open,
 276         .release        = fmi_release,
 277         .ioctl          = video_ioctl2,
 278 };
 279
 280 static const struct v4l2_ioctl_ops fmi_ioctl_ops = {
 281         .vidioc_querycap    = vidioc_querycap,
 282         .vidioc_g_tuner     = vidioc_g_tuner,
 283         .vidioc_s_tuner     = vidioc_s_tuner,
 284         .vidioc_g_audio     = vidioc_g_audio,
 285         .vidioc_s_audio     = vidioc_s_audio,
 286         .vidioc_g_input     = vidioc_g_input,
 287         .vidioc_s_input     = vidioc_s_input,
 288         .vidioc_g_frequency = vidioc_g_frequency,
 289         .vidioc_s_frequency = vidioc_s_frequency,
 290         .vidioc_queryctrl   = vidioc_queryctrl,
 291         .vidioc_g_ctrl      = vidioc_g_ctrl,
 292         .vidioc_s_ctrl      = vidioc_s_ctrl,
 293 };
 294
 295 /* ladis: this is my card. does any other types exist? */
 296 static struct isapnp_device_id id_table[] __devinitdata = {
 297         {       ISAPNP_ANY_ID, ISAPNP_ANY_ID,
 298                 ISAPNP_VENDOR('M','F','R'), ISAPNP_FUNCTION(0xad10), 0},
 299         {       ISAPNP_CARD_END, },
 300 };
 301
 302 MODULE_DEVICE_TABLE(isapnp, id_table);
 303
 304 static int __init isapnp_fmi_probe(void)
 305 {
 306         int i = 0;
 307
 308         while (id_table[i].card_vendor != 0 && dev == NULL) {
 309                 dev = pnp_find_dev(NULL, id_table[i].vendor,
 310                                    id_table[i].function, NULL);
 311                 i++;
 312         }
 313
 314         if (!dev)
 315                 return -ENODEV;
 316         if (pnp_device_attach(dev) < 0)
 317                 return -EAGAIN;
 318         if (pnp_activate_dev(dev) < 0) {
 319                 printk(KERN_ERR "radio-sf16fmi: PnP configure failed (out of resources?)\n");
 320                 pnp_device_detach(dev);
 321                 return -ENOMEM;
 322         }
 323         if (!pnp_port_valid(dev, 0)) {
 324                 pnp_device_detach(dev);
 325                 return -ENODEV;
 326         }
 327
 328         i = pnp_port_start(dev, 0);
 329         printk(KERN_INFO "radio-sf16fmi: PnP reports card at %#x\n", i);
 330
 331         return i;
 332 }
 333
 334 static int __init fmi_init(void)
 335 {
 336         struct fmi *fmi = &fmi_card;
 337         struct v4l2_device *v4l2_dev = &fmi->v4l2_dev;
 338         int res;
 339
 340         if (io < 0)
 341                 io = isapnp_fmi_probe();
 342         strlcpy(v4l2_dev->name, "sf16fmi", sizeof(v4l2_dev->name));
 343         fmi->io = io;
 344         if (fmi->io < 0) {
 345                 v4l2_err(v4l2_dev, "No PnP card found.\n");
 346                 return fmi->io;
 347         }
 348         if (!request_region(io, 2, "radio-sf16fmi")) {
 349                 v4l2_err(v4l2_dev, "port 0x%x already in use\n", fmi->io);
 350                 pnp_device_detach(dev);
 351                 return -EBUSY;
 352         }
 353
 354         res = v4l2_device_register(NULL, v4l2_dev);
 355         if (res < 0) {
 356                 release_region(fmi->io, 2);
 357                 pnp_device_detach(dev);
 358                 v4l2_err(v4l2_dev, "Could not register v4l2_device\n");
 359                 return res;
 360         }
 361
 362         fmi->flags = V4L2_TUNER_CAP_LOW;
 363         strlcpy(fmi->vdev.name, v4l2_dev->name, sizeof(fmi->vdev.name));
 364         fmi->vdev.v4l2_dev = v4l2_dev;
 365         fmi->vdev.fops = &fmi_fops;
 366         fmi->vdev.ioctl_ops = &fmi_ioctl_ops;
 367         fmi->vdev.release = video_device_release_empty;
 368         video_set_drvdata(&fmi->vdev, fmi);
 369
 370         mutex_init(&fmi->lock);
 371
 372         if (video_register_device(&fmi->vdev, VFL_TYPE_RADIO, radio_nr) < 0) {
 373                 v4l2_device_unregister(v4l2_dev);
 374                 release_region(fmi->io, 2);
 375                 pnp_device_detach(dev);
 376                 return -EINVAL;
 377         }
 378
 379         v4l2_info(v4l2_dev, "card driver at 0x%x\n", fmi->io);
 380         /* mute card - prevents noisy bootups */
 381         fmi_mute(fmi);
 382         return 0;
 383 }
 384
 385 static void __exit fmi_exit(void)
 386 {
 387         struct fmi *fmi = &fmi_card;
 388
 389         video_unregister_device(&fmi->vdev);
 390         v4l2_device_unregister(&fmi->v4l2_dev);
 391         release_region(fmi->io, 2);
 392         if (dev)
 393                 pnp_device_detach(dev);
 394 }
 395
 396 module_init(fmi_init);
 397 module_exit(fmi_exit);