drivers/media/rc/iguanair.c

   1 /*
   2  * IguanaWorks USB IR Transceiver support
   3  *
   4  * Copyright (C) 2012 Sean Young <sean@mess.org>
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  */
  16
  17 #include <linux/device.h>
  18 #include <linux/kernel.h>
  19 #include <linux/module.h>
  20 #include <linux/usb.h>
  21 #include <linux/usb/input.h>
  22 #include <linux/slab.h>
  23 #include <linux/completion.h>
  24 #include <media/rc-core.h>
  25
  26 #define DRIVER_NAME "iguanair"
  27 #define BUF_SIZE 152
  28
  29 struct iguanair {
  30         struct rc_dev *rc;
  31
  32         struct device *dev;
  33         struct usb_device *udev;
  34
  35         uint16_t version;
  36         uint8_t bufsize;
  37         uint8_t cycle_overhead;
  38
  39         struct mutex lock;
  40
  41         /* receiver support */
  42         bool receiver_on;
  43         dma_addr_t dma_in, dma_out;
  44         uint8_t *buf_in;
  45         struct urb *urb_in, *urb_out;
  46         struct completion completion;
  47
  48         /* transmit support */
  49         bool tx_overflow;
  50         uint32_t carrier;
  51         struct send_packet *packet;
  52
  53         char name[64];
  54         char phys[64];
  55 };
  56
  57 #define CMD_NOP                 0x00
  58 #define CMD_GET_VERSION         0x01
  59 #define CMD_GET_BUFSIZE         0x11
  60 #define CMD_GET_FEATURES        0x10
  61 #define CMD_SEND                0x15
  62 #define CMD_EXECUTE             0x1f
  63 #define CMD_RX_OVERFLOW         0x31
  64 #define CMD_TX_OVERFLOW         0x32
  65 #define CMD_RECEIVER_ON         0x12
  66 #define CMD_RECEIVER_OFF        0x14
  67
  68 #define DIR_IN                  0xdc
  69 #define DIR_OUT                 0xcd
  70
  71 #define MAX_IN_PACKET           8u
  72 #define MAX_OUT_PACKET          (sizeof(struct send_packet) + BUF_SIZE)
  73 #define TIMEOUT                 1000
  74 #define RX_RESOLUTION           21333
  75
  76 struct packet {
  77         uint16_t start;
  78         uint8_t direction;
  79         uint8_t cmd;
  80 };
  81
  82 struct send_packet {
  83         struct packet header;
  84         uint8_t length;
  85         uint8_t channels;
  86         uint8_t busy7;
  87         uint8_t busy4;
  88         uint8_t payload[0];
  89 };
  90
  91 static void process_ir_data(struct iguanair *ir, unsigned len)
  92 {
  93         if (len >= 4 && ir->buf_in[0] == 0 && ir->buf_in[1] == 0) {
  94                 switch (ir->buf_in[3]) {
  95                 case CMD_GET_VERSION:
  96                         if (len == 6) {
  97                                 ir->version = (ir->buf_in[5] << 8) |
  98                                                         ir->buf_in[4];
  99                                 complete(&ir->completion);
 100                         }
 101                         break;
 102                 case CMD_GET_BUFSIZE:
 103                         if (len >= 5) {
 104                                 ir->bufsize = ir->buf_in[4];
 105                                 complete(&ir->completion);
 106                         }
 107                         break;
 108                 case CMD_GET_FEATURES:
 109                         if (len > 5) {
 110                                 ir->cycle_overhead = ir->buf_in[5];
 111                                 complete(&ir->completion);
 112                         }
 113                         break;
 114                 case CMD_TX_OVERFLOW:
 115                         ir->tx_overflow = true;
 116                         /* fall through */
 117                 case CMD_RECEIVER_OFF:
 118                 case CMD_RECEIVER_ON:
 119                 case CMD_SEND:
 120                         complete(&ir->completion);
 121                         break;
 122                 case CMD_RX_OVERFLOW:
 123                         dev_warn(ir->dev, "receive overflow\n");
 124                         ir_raw_event_reset(ir->rc);
 125                         break;
 126                 default:
 127                         dev_warn(ir->dev, "control code %02x received\n",
 128                                                         ir->buf_in[3]);
 129                         break;
 130                 }
 131         } else if (len >= 7) {
 132                 DEFINE_IR_RAW_EVENT(rawir);
 133                 unsigned i;
 134                 bool event = false;
 135
 136                 init_ir_raw_event(&rawir);
 137
 138                 for (i = 0; i < 7; i++) {
 139                         if (ir->buf_in[i] == 0x80) {
 140                                 rawir.pulse = false;
 141                                 rawir.duration = US_TO_NS(21845);
 142                         } else {
 143                                 rawir.pulse = (ir->buf_in[i] & 0x80) == 0;
 144                                 rawir.duration = ((ir->buf_in[i] & 0x7f) + 1) *
 145                                                                  RX_RESOLUTION;
 146                         }
 147
 148                         if (ir_raw_event_store_with_filter(ir->rc, &rawir))
 149                                 event = true;
 150                 }
 151
 152                 if (event)
 153                         ir_raw_event_handle(ir->rc);
 154         }
 155 }
 156
 157 static void iguanair_rx(struct urb *urb)
 158 {
 159         struct iguanair *ir;
 160         int rc;
 161
 162         if (!urb)
 163                 return;
 164
 165         ir = urb->context;
 166         if (!ir) {
 167                 usb_unlink_urb(urb);
 168                 return;
 169         }
 170
 171         switch (urb->status) {
 172         case 0:
 173                 process_ir_data(ir, urb->actual_length);
 174                 break;
 175         case -ECONNRESET:
 176         case -ENOENT:
 177         case -ESHUTDOWN:
 178                 usb_unlink_urb(urb);
 179                 return;
 180         case -EPIPE:
 181         default:
 182                 dev_dbg(ir->dev, "Error: urb status = %d\n", urb->status);
 183                 break;
 184         }
 185
 186         rc = usb_submit_urb(urb, GFP_ATOMIC);
 187         if (rc && rc != -ENODEV)
 188                 dev_warn(ir->dev, "failed to resubmit urb: %d\n", rc);
 189 }
 190
 191 static void iguanair_irq_out(struct urb *urb)
 192 {
 193         struct iguanair *ir = urb->context;
 194
 195         if (urb->status)
 196                 dev_dbg(ir->dev, "Error: out urb status = %d\n", urb->status);
 197
 198         /* if we sent an nop packet, do not expect a response */
 199         if (urb->status == 0 && ir->packet->header.cmd == CMD_NOP)
 200                 complete(&ir->completion);
 201 }
 202
 203 static int iguanair_send(struct iguanair *ir, unsigned size)
 204 {
 205         int rc;
 206
 207         reinit_completion(&ir->completion);
 208
 209         ir->urb_out->transfer_buffer_length = size;
 210         rc = usb_submit_urb(ir->urb_out, GFP_KERNEL);
 211         if (rc)
 212                 return rc;
 213
 214         if (wait_for_completion_timeout(&ir->completion, TIMEOUT) == 0)
 215                 return -ETIMEDOUT;
 216
 217         return rc;
 218 }
 219
 220 static int iguanair_get_features(struct iguanair *ir)
 221 {
 222         int rc;
 223
 224         /*
 225          * On cold boot, the iguanair initializes on the first packet
 226          * received but does not process that packet. Send an empty
 227          * packet.
 228          */
 229         ir->packet->header.start = 0;
 230         ir->packet->header.direction = DIR_OUT;
 231         ir->packet->header.cmd = CMD_NOP;
 232         iguanair_send(ir, sizeof(ir->packet->header));
 233
 234         ir->packet->header.cmd = CMD_GET_VERSION;
 235         rc = iguanair_send(ir, sizeof(ir->packet->header));
 236         if (rc) {
 237                 dev_info(ir->dev, "failed to get version\n");
 238                 goto out;
 239         }
 240
 241         if (ir->version < 0x205) {
 242                 dev_err(ir->dev, "firmware 0x%04x is too old\n", ir->version);
 243                 rc = -ENODEV;
 244                 goto out;
 245         }
 246
 247         ir->bufsize = 150;
 248         ir->cycle_overhead = 65;
 249
 250         ir->packet->header.cmd = CMD_GET_BUFSIZE;
 251
 252         rc = iguanair_send(ir, sizeof(ir->packet->header));
 253         if (rc) {
 254                 dev_info(ir->dev, "failed to get buffer size\n");
 255                 goto out;
 256         }
 257
 258         if (ir->bufsize > BUF_SIZE) {
 259                 dev_info(ir->dev, "buffer size %u larger than expected\n",
 260                                                                 ir->bufsize);
 261                 ir->bufsize = BUF_SIZE;
 262         }
 263
 264         ir->packet->header.cmd = CMD_GET_FEATURES;
 265
 266         rc = iguanair_send(ir, sizeof(ir->packet->header));
 267         if (rc)
 268                 dev_info(ir->dev, "failed to get features\n");
 269 out:
 270         return rc;
 271 }
 272
 273 static int iguanair_receiver(struct iguanair *ir, bool enable)
 274 {
 275         ir->packet->header.start = 0;
 276         ir->packet->header.direction = DIR_OUT;
 277         ir->packet->header.cmd = enable ? CMD_RECEIVER_ON : CMD_RECEIVER_OFF;
 278
 279         if (enable)
 280                 ir_raw_event_reset(ir->rc);
 281
 282         return iguanair_send(ir, sizeof(ir->packet->header));
 283 }
 284
 285 /*
 286  * The iguanair creates the carrier by busy spinning after each half period.
 287  * This is counted in CPU cycles, with the CPU running at 24MHz. It is
 288  * broken down into 7-cycles and 4-cyles delays, with a preference for
 289  * 4-cycle delays, minus the overhead of the loop itself (cycle_overhead).
 290  */
 291 static int iguanair_set_tx_carrier(struct rc_dev *dev, uint32_t carrier)
 292 {
 293         struct iguanair *ir = dev->priv;
 294
 295         if (carrier < 25000 || carrier > 150000)
 296                 return -EINVAL;
 297
 298         mutex_lock(&ir->lock);
 299
 300         if (carrier != ir->carrier) {
 301                 uint32_t cycles, fours, sevens;
 302
 303                 ir->carrier = carrier;
 304
 305                 cycles = DIV_ROUND_CLOSEST(24000000, carrier * 2) -
 306                                                         ir->cycle_overhead;
 307
 308                 /*
 309                  * Calculate minimum number of 7 cycles needed so
 310                  * we are left with a multiple of 4; so we want to have
 311                  * (sevens * 7) & 3 == cycles & 3
 312                  */
 313                 sevens = (4 - cycles) & 3;
 314                 fours = (cycles - sevens * 7) / 4;
 315
 316                 /*
 317                  * The firmware interprets these values as a relative offset
 318                  * for a branch. Immediately following the branches, there
 319                  * 4 instructions of 7 cycles (2 bytes each) and 110
 320                  * instructions of 4 cycles (1 byte each). A relative branch
 321                  * of 0 will execute all of them, branch further for less
 322                  * cycle burning.
 323                  */
 324                 ir->packet->busy7 = (4 - sevens) * 2;
 325                 ir->packet->busy4 = 110 - fours;
 326         }
 327
 328         mutex_unlock(&ir->lock);
 329
 330         return 0;
 331 }
 332
 333 static int iguanair_set_tx_mask(struct rc_dev *dev, uint32_t mask)
 334 {
 335         struct iguanair *ir = dev->priv;
 336
 337         if (mask > 15)
 338                 return 4;
 339
 340         mutex_lock(&ir->lock);
 341         ir->packet->channels = mask << 4;
 342         mutex_unlock(&ir->lock);
 343
 344         return 0;
 345 }
 346
 347 static int iguanair_tx(struct rc_dev *dev, unsigned *txbuf, unsigned count)
 348 {
 349         struct iguanair *ir = dev->priv;
 350         uint8_t space;
 351         unsigned i, size, periods, bytes;
 352         int rc;
 353
 354         mutex_lock(&ir->lock);
 355
 356         /* convert from us to carrier periods */
 357         for (i = space = size = 0; i < count; i++) {
 358                 periods = DIV_ROUND_CLOSEST(txbuf[i] * ir->carrier, 1000000);
 359                 bytes = DIV_ROUND_UP(periods, 127);
 360                 if (size + bytes > ir->bufsize) {
 361                         rc = -EINVAL;
 362                         goto out;
 363                 }
 364                 while (periods) {
 365                         unsigned p = min(periods, 127u);
 366                         ir->packet->payload[size++] = p | space;
 367                         periods -= p;
 368                 }
 369                 space ^= 0x80;
 370         }
 371
 372         ir->packet->header.start = 0;
 373         ir->packet->header.direction = DIR_OUT;
 374         ir->packet->header.cmd = CMD_SEND;
 375         ir->packet->length = size;
 376
 377         ir->tx_overflow = false;
 378
 379         rc = iguanair_send(ir, sizeof(*ir->packet) + size);
 380
 381         if (rc == 0 && ir->tx_overflow)
 382                 rc = -EOVERFLOW;
 383
 384 out:
 385         mutex_unlock(&ir->lock);
 386
 387         return rc ? rc : count;
 388 }
 389
 390 static int iguanair_open(struct rc_dev *rdev)
 391 {
 392         struct iguanair *ir = rdev->priv;
 393         int rc;
 394
 395         mutex_lock(&ir->lock);
 396
 397         rc = iguanair_receiver(ir, true);
 398         if (rc == 0)
 399                 ir->receiver_on = true;
 400
 401         mutex_unlock(&ir->lock);
 402
 403         return rc;
 404 }
 405
 406 static void iguanair_close(struct rc_dev *rdev)
 407 {
 408         struct iguanair *ir = rdev->priv;
 409         int rc;
 410
 411         mutex_lock(&ir->lock);
 412
 413         rc = iguanair_receiver(ir, false);
 414         ir->receiver_on = false;
 415         if (rc && rc != -ENODEV)
 416                 dev_warn(ir->dev, "failed to disable receiver: %d\n", rc);
 417
 418         mutex_unlock(&ir->lock);
 419 }
 420
 421 static int iguanair_probe(struct usb_interface *intf,
 422                           const struct usb_device_id *id)
 423 {
 424         struct usb_device *udev = interface_to_usbdev(intf);
 425         struct iguanair *ir;
 426         struct rc_dev *rc;
 427         int ret, pipein, pipeout;
 428         struct usb_host_interface *idesc;
 429
 430         ir = kzalloc(sizeof(*ir), GFP_KERNEL);
 431         rc = rc_allocate_device(RC_DRIVER_IR_RAW);
 432         if (!ir || !rc) {
 433                 ret = -ENOMEM;
 434                 goto out;
 435         }
 436
 437         ir->buf_in = usb_alloc_coherent(udev, MAX_IN_PACKET, GFP_KERNEL,
 438                                                                 &ir->dma_in);
 439         ir->packet = usb_alloc_coherent(udev, MAX_OUT_PACKET, GFP_KERNEL,
 440                                                                 &ir->dma_out);
 441         ir->urb_in = usb_alloc_urb(0, GFP_KERNEL);
 442         ir->urb_out = usb_alloc_urb(0, GFP_KERNEL);
 443
 444         if (!ir->buf_in || !ir->packet || !ir->urb_in || !ir->urb_out) {
 445                 ret = -ENOMEM;
 446                 goto out;
 447         }
 448
 449         idesc = intf->altsetting;
 450
 451         if (idesc->desc.bNumEndpoints < 2) {
 452                 ret = -ENODEV;
 453                 goto out;
 454         }
 455
 456         ir->rc = rc;
 457         ir->dev = &intf->dev;
 458         ir->udev = udev;
 459         mutex_init(&ir->lock);
 460
 461         init_completion(&ir->completion);
 462         pipeout = usb_sndintpipe(udev,
 463                                 idesc->endpoint[1].desc.bEndpointAddress);
 464         usb_fill_int_urb(ir->urb_out, udev, pipeout, ir->packet, MAX_OUT_PACKET,
 465                                                 iguanair_irq_out, ir, 1);
 466         ir->urb_out->transfer_dma = ir->dma_out;
 467         ir->urb_out->transfer_flags |= URB_NO_TRANSFER_DMA_MAP;
 468
 469         pipein = usb_rcvintpipe(udev, idesc->endpoint[0].desc.bEndpointAddress);
 470         usb_fill_int_urb(ir->urb_in, udev, pipein, ir->buf_in, MAX_IN_PACKET,
 471                                                          iguanair_rx, ir, 1);
 472         ir->urb_in->transfer_dma = ir->dma_in;
 473         ir->urb_in->transfer_flags |= URB_NO_TRANSFER_DMA_MAP;
 474
 475         ret = usb_submit_urb(ir->urb_in, GFP_KERNEL);
 476         if (ret) {
 477                 dev_warn(&intf->dev, "failed to submit urb: %d\n", ret);
 478                 goto out;
 479         }
 480
 481         ret = iguanair_get_features(ir);
 482         if (ret)
 483                 goto out2;
 484
 485         snprintf(ir->name, sizeof(ir->name),
 486                 "IguanaWorks USB IR Transceiver version 0x%04x", ir->version);
 487
 488         usb_make_path(ir->udev, ir->phys, sizeof(ir->phys));
 489
 490         rc->input_name = ir->name;
 491         rc->input_phys = ir->phys;
 492         usb_to_input_id(ir->udev, &rc->input_id);
 493         rc->dev.parent = &intf->dev;
 494         rc->allowed_protocols = RC_BIT_ALL_IR_DECODER;
 495         rc->priv = ir;
 496         rc->open = iguanair_open;
 497         rc->close = iguanair_close;
 498         rc->s_tx_mask = iguanair_set_tx_mask;
 499         rc->s_tx_carrier = iguanair_set_tx_carrier;
 500         rc->tx_ir = iguanair_tx;
 501         rc->driver_name = DRIVER_NAME;
 502         rc->map_name = RC_MAP_RC6_MCE;
 503         rc->min_timeout = 1;
 504         rc->timeout = IR_DEFAULT_TIMEOUT;
 505         rc->max_timeout = 10 * IR_DEFAULT_TIMEOUT;
 506         rc->rx_resolution = RX_RESOLUTION;
 507
 508         iguanair_set_tx_carrier(rc, 38000);
 509         iguanair_set_tx_mask(rc, 0);
 510
 511         ret = rc_register_device(rc);
 512         if (ret < 0) {
 513                 dev_err(&intf->dev, "failed to register rc device %d", ret);
 514                 goto out2;
 515         }
 516
 517         usb_set_intfdata(intf, ir);
 518
 519         return 0;
 520 out2:
 521         usb_kill_urb(ir->urb_in);
 522         usb_kill_urb(ir->urb_out);
 523 out:
 524         if (ir) {
 525                 usb_free_urb(ir->urb_in);
 526                 usb_free_urb(ir->urb_out);
 527                 usb_free_coherent(udev, MAX_IN_PACKET, ir->buf_in, ir->dma_in);
 528                 usb_free_coherent(udev, MAX_OUT_PACKET, ir->packet,
 529                                                                 ir->dma_out);
 530         }
 531         rc_free_device(rc);
 532         kfree(ir);
 533         return ret;
 534 }
 535
 536 static void iguanair_disconnect(struct usb_interface *intf)
 537 {
 538         struct iguanair *ir = usb_get_intfdata(intf);
 539
 540         rc_unregister_device(ir->rc);
 541         usb_set_intfdata(intf, NULL);
 542         usb_kill_urb(ir->urb_in);
 543         usb_kill_urb(ir->urb_out);
 544         usb_free_urb(ir->urb_in);
 545         usb_free_urb(ir->urb_out);
 546         usb_free_coherent(ir->udev, MAX_IN_PACKET, ir->buf_in, ir->dma_in);
 547         usb_free_coherent(ir->udev, MAX_OUT_PACKET, ir->packet, ir->dma_out);
 548         kfree(ir);
 549 }
 550
 551 static int iguanair_suspend(struct usb_interface *intf, pm_message_t message)
 552 {
 553         struct iguanair *ir = usb_get_intfdata(intf);
 554         int rc = 0;
 555
 556         mutex_lock(&ir->lock);
 557
 558         if (ir->receiver_on) {
 559                 rc = iguanair_receiver(ir, false);
 560                 if (rc)
 561                         dev_warn(ir->dev, "failed to disable receiver for suspend\n");
 562         }
 563
 564         usb_kill_urb(ir->urb_in);
 565         usb_kill_urb(ir->urb_out);
 566
 567         mutex_unlock(&ir->lock);
 568
 569         return rc;
 570 }
 571
 572 static int iguanair_resume(struct usb_interface *intf)
 573 {
 574         struct iguanair *ir = usb_get_intfdata(intf);
 575         int rc = 0;
 576
 577         mutex_lock(&ir->lock);
 578
 579         rc = usb_submit_urb(ir->urb_in, GFP_KERNEL);
 580         if (rc)
 581                 dev_warn(&intf->dev, "failed to submit urb: %d\n", rc);
 582
 583         if (ir->receiver_on) {
 584                 rc = iguanair_receiver(ir, true);
 585                 if (rc)
 586                         dev_warn(ir->dev, "failed to enable receiver after resume\n");
 587         }
 588
 589         mutex_unlock(&ir->lock);
 590
 591         return rc;
 592 }
 593
 594 static const struct usb_device_id iguanair_table[] = {
 595         { USB_DEVICE(0x1781, 0x0938) },
 596         { }
 597 };
 598
 599 static struct usb_driver iguanair_driver = {
 600         .name = DRIVER_NAME,
 601         .probe = iguanair_probe,
 602         .disconnect = iguanair_disconnect,
 603         .suspend = iguanair_suspend,
 604         .resume = iguanair_resume,
 605         .reset_resume = iguanair_resume,
 606         .id_table = iguanair_table,
 607         .soft_unbind = 1        /* we want to disable receiver on unbind */
 608 };
 609
 610 module_usb_driver(iguanair_driver);
 611
 612 MODULE_DESCRIPTION("IguanaWorks USB IR Transceiver");
 613 MODULE_AUTHOR("Sean Young <sean@mess.org>");
 614 MODULE_LICENSE("GPL");
 615 MODULE_DEVICE_TABLE(usb, iguanair_table);
 616