drivers/media/rc/lirc_dev.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  * LIRC base driver
   4  *
   5  * by Artur Lipowski <alipowski@interia.pl>
   6  */
   7
   8 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
   9
  10 #include <linux/module.h>
  11 #include <linux/mutex.h>
  12 #include <linux/device.h>
  13 #include <linux/file.h>
  14 #include <linux/idr.h>
  15 #include <linux/poll.h>
  16 #include <linux/sched.h>
  17 #include <linux/wait.h>
  18
  19 #include "rc-core-priv.h"
  20 #include <uapi/linux/lirc.h>
  21
  22 #define LIRCBUF_SIZE    1024
  23
  24 static dev_t lirc_base_dev;
  25
  26 /* Used to keep track of allocated lirc devices */
  27 static DEFINE_IDA(lirc_ida);
  28
  29 /* Only used for sysfs but defined to void otherwise */
  30 static struct class *lirc_class;
  31
  32 /**
  33  * ir_lirc_raw_event() - Send raw IR data to lirc to be relayed to userspace
  34  *
  35  * @dev:        the struct rc_dev descriptor of the device
  36  * @ev:         the struct ir_raw_event descriptor of the pulse/space
  37  */
  38 void ir_lirc_raw_event(struct rc_dev *dev, struct ir_raw_event ev)
  39 {
  40         unsigned long flags;
  41         struct lirc_fh *fh;
  42         int sample;
  43
  44         /* Packet start */
  45         if (ev.reset) {
  46                 /*
  47                  * Userspace expects a long space event before the start of
  48                  * the signal to use as a sync.  This may be done with repeat
  49                  * packets and normal samples.  But if a reset has been sent
  50                  * then we assume that a long time has passed, so we send a
  51                  * space with the maximum time value.
  52                  */
  53                 sample = LIRC_SPACE(LIRC_VALUE_MASK);
  54                 dev_dbg(&dev->dev, "delivering reset sync space to lirc_dev\n");
  55
  56         /* Carrier reports */
  57         } else if (ev.carrier_report) {
  58                 sample = LIRC_FREQUENCY(ev.carrier);
  59                 dev_dbg(&dev->dev, "carrier report (freq: %d)\n", sample);
  60
  61         /* Packet end */
  62         } else if (ev.timeout) {
  63                 if (dev->gap)
  64                         return;
  65
  66                 dev->gap_start = ktime_get();
  67                 dev->gap = true;
  68                 dev->gap_duration = ev.duration;
  69
  70                 sample = LIRC_TIMEOUT(ev.duration / 1000);
  71                 dev_dbg(&dev->dev, "timeout report (duration: %d)\n", sample);
  72
  73         /* Normal sample */
  74         } else {
  75                 if (dev->gap) {
  76                         dev->gap_duration += ktime_to_ns(ktime_sub(ktime_get(),
  77                                                          dev->gap_start));
  78
  79                         /* Convert to ms and cap by LIRC_VALUE_MASK */
  80                         do_div(dev->gap_duration, 1000);
  81                         dev->gap_duration = min_t(u64, dev->gap_duration,
  82                                                   LIRC_VALUE_MASK);
  83
  84                         spin_lock_irqsave(&dev->lirc_fh_lock, flags);
  85                         list_for_each_entry(fh, &dev->lirc_fh, list)
  86                                 kfifo_put(&fh->rawir,
  87                                           LIRC_SPACE(dev->gap_duration));
  88                         spin_unlock_irqrestore(&dev->lirc_fh_lock, flags);
  89                         dev->gap = false;
  90                 }
  91
  92                 sample = ev.pulse ? LIRC_PULSE(ev.duration / 1000) :
  93                                         LIRC_SPACE(ev.duration / 1000);
  94                 dev_dbg(&dev->dev, "delivering %uus %s to lirc_dev\n",
  95                         TO_US(ev.duration), TO_STR(ev.pulse));
  96         }
  97
  98         /*
  99          * bpf does not care about the gap generated above; that exists
 100          * for backwards compatibility
 101          */
 102         lirc_bpf_run(dev, sample);
 103
 104         spin_lock_irqsave(&dev->lirc_fh_lock, flags);
 105         list_for_each_entry(fh, &dev->lirc_fh, list) {
 106                 if (LIRC_IS_TIMEOUT(sample) && !fh->send_timeout_reports)
 107                         continue;
 108                 if (kfifo_put(&fh->rawir, sample))
 109                         wake_up_poll(&fh->wait_poll, EPOLLIN | EPOLLRDNORM);
 110         }
 111         spin_unlock_irqrestore(&dev->lirc_fh_lock, flags);
 112 }
 113
 114 /**
 115  * ir_lirc_scancode_event() - Send scancode data to lirc to be relayed to
 116  *              userspace. This can be called in atomic context.
 117  * @dev:        the struct rc_dev descriptor of the device
 118  * @lsc:        the struct lirc_scancode describing the decoded scancode
 119  */
 120 void ir_lirc_scancode_event(struct rc_dev *dev, struct lirc_scancode *lsc)
 121 {
 122         unsigned long flags;
 123         struct lirc_fh *fh;
 124
 125         lsc->timestamp = ktime_get_ns();
 126
 127         spin_lock_irqsave(&dev->lirc_fh_lock, flags);
 128         list_for_each_entry(fh, &dev->lirc_fh, list) {
 129                 if (kfifo_put(&fh->scancodes, *lsc))
 130                         wake_up_poll(&fh->wait_poll, EPOLLIN | EPOLLRDNORM);
 131         }
 132         spin_unlock_irqrestore(&dev->lirc_fh_lock, flags);
 133 }
 134 EXPORT_SYMBOL_GPL(ir_lirc_scancode_event);
 135
 136 static int ir_lirc_open(struct inode *inode, struct file *file)
 137 {
 138         struct rc_dev *dev = container_of(inode->i_cdev, struct rc_dev,
 139                                           lirc_cdev);
 140         struct lirc_fh *fh = kzalloc(sizeof(*fh), GFP_KERNEL);
 141         unsigned long flags;
 142         int retval;
 143
 144         if (!fh)
 145                 return -ENOMEM;
 146
 147         get_device(&dev->dev);
 148
 149         if (!dev->registered) {
 150                 retval = -ENODEV;
 151                 goto out_fh;
 152         }
 153
 154         if (dev->driver_type == RC_DRIVER_IR_RAW) {
 155                 if (kfifo_alloc(&fh->rawir, MAX_IR_EVENT_SIZE, GFP_KERNEL)) {
 156                         retval = -ENOMEM;
 157                         goto out_fh;
 158                 }
 159         }
 160
 161         if (dev->driver_type != RC_DRIVER_IR_RAW_TX) {
 162                 if (kfifo_alloc(&fh->scancodes, 32, GFP_KERNEL)) {
 163                         retval = -ENOMEM;
 164                         goto out_rawir;
 165                 }
 166         }
 167
 168         fh->send_mode = LIRC_MODE_PULSE;
 169         fh->rc = dev;
 170         fh->send_timeout_reports = true;
 171
 172         if (dev->driver_type == RC_DRIVER_SCANCODE)
 173                 fh->rec_mode = LIRC_MODE_SCANCODE;
 174         else
 175                 fh->rec_mode = LIRC_MODE_MODE2;
 176
 177         retval = rc_open(dev);
 178         if (retval)
 179                 goto out_kfifo;
 180
 181         init_waitqueue_head(&fh->wait_poll);
 182
 183         file->private_data = fh;
 184         spin_lock_irqsave(&dev->lirc_fh_lock, flags);
 185         list_add(&fh->list, &dev->lirc_fh);
 186         spin_unlock_irqrestore(&dev->lirc_fh_lock, flags);
 187
 188         stream_open(inode, file);
 189
 190         return 0;
 191 out_kfifo:
 192         if (dev->driver_type != RC_DRIVER_IR_RAW_TX)
 193                 kfifo_free(&fh->scancodes);
 194 out_rawir:
 195         if (dev->driver_type == RC_DRIVER_IR_RAW)
 196                 kfifo_free(&fh->rawir);
 197 out_fh:
 198         kfree(fh);
 199         put_device(&dev->dev);
 200
 201         return retval;
 202 }
 203
 204 static int ir_lirc_close(struct inode *inode, struct file *file)
 205 {
 206         struct lirc_fh *fh = file->private_data;
 207         struct rc_dev *dev = fh->rc;
 208         unsigned long flags;
 209
 210         spin_lock_irqsave(&dev->lirc_fh_lock, flags);
 211         list_del(&fh->list);
 212         spin_unlock_irqrestore(&dev->lirc_fh_lock, flags);
 213
 214         if (dev->driver_type == RC_DRIVER_IR_RAW)
 215                 kfifo_free(&fh->rawir);
 216         if (dev->driver_type != RC_DRIVER_IR_RAW_TX)
 217                 kfifo_free(&fh->scancodes);
 218         kfree(fh);
 219
 220         rc_close(dev);
 221         put_device(&dev->dev);
 222
 223         return 0;
 224 }
 225
 226 static ssize_t ir_lirc_transmit_ir(struct file *file, const char __user *buf,
 227                                    size_t n, loff_t *ppos)
 228 {
 229         struct lirc_fh *fh = file->private_data;
 230         struct rc_dev *dev = fh->rc;
 231         unsigned int *txbuf;
 232         struct ir_raw_event *raw = NULL;
 233         ssize_t ret;
 234         size_t count;
 235         ktime_t start;
 236         s64 towait;
 237         unsigned int duration = 0; /* signal duration in us */
 238         int i;
 239
 240         ret = mutex_lock_interruptible(&dev->lock);
 241         if (ret)
 242                 return ret;
 243
 244         if (!dev->registered) {
 245                 ret = -ENODEV;
 246                 goto out_unlock;
 247         }
 248
 249         if (!dev->tx_ir) {
 250                 ret = -EINVAL;
 251                 goto out_unlock;
 252         }
 253
 254         if (fh->send_mode == LIRC_MODE_SCANCODE) {
 255                 struct lirc_scancode scan;
 256
 257                 if (n != sizeof(scan)) {
 258                         ret = -EINVAL;
 259                         goto out_unlock;
 260                 }
 261
 262                 if (copy_from_user(&scan, buf, sizeof(scan))) {
 263                         ret = -EFAULT;
 264                         goto out_unlock;
 265                 }
 266
 267                 if (scan.flags || scan.keycode || scan.timestamp) {
 268                         ret = -EINVAL;
 269                         goto out_unlock;
 270                 }
 271
 272                 /*
 273                  * The scancode field in lirc_scancode is 64-bit simply
 274                  * to future-proof it, since there are IR protocols encode
 275                  * use more than 32 bits. For now only 32-bit protocols
 276                  * are supported.
 277                  */
 278                 if (scan.scancode > U32_MAX ||
 279                     !rc_validate_scancode(scan.rc_proto, scan.scancode)) {
 280                         ret = -EINVAL;
 281                         goto out_unlock;
 282                 }
 283
 284                 raw = kmalloc_array(LIRCBUF_SIZE, sizeof(*raw), GFP_KERNEL);
 285                 if (!raw) {
 286                         ret = -ENOMEM;
 287                         goto out_unlock;
 288                 }
 289
 290                 ret = ir_raw_encode_scancode(scan.rc_proto, scan.scancode,
 291                                              raw, LIRCBUF_SIZE);
 292                 if (ret < 0)
 293                         goto out_kfree_raw;
 294
 295                 count = ret;
 296
 297                 txbuf = kmalloc_array(count, sizeof(unsigned int), GFP_KERNEL);
 298                 if (!txbuf) {
 299                         ret = -ENOMEM;
 300                         goto out_kfree_raw;
 301                 }
 302
 303                 for (i = 0; i < count; i++)
 304                         /* Convert from NS to US */
 305                         txbuf[i] = DIV_ROUND_UP(raw[i].duration, 1000);
 306
 307                 if (dev->s_tx_carrier) {
 308                         int carrier = ir_raw_encode_carrier(scan.rc_proto);
 309
 310                         if (carrier > 0)
 311                                 dev->s_tx_carrier(dev, carrier);
 312                 }
 313         } else {
 314                 if (n < sizeof(unsigned int) || n % sizeof(unsigned int)) {
 315                         ret = -EINVAL;
 316                         goto out_unlock;
 317                 }
 318
 319                 count = n / sizeof(unsigned int);
 320                 if (count > LIRCBUF_SIZE || count % 2 == 0) {
 321                         ret = -EINVAL;
 322                         goto out_unlock;
 323                 }
 324
 325                 txbuf = memdup_user(buf, n);
 326                 if (IS_ERR(txbuf)) {
 327                         ret = PTR_ERR(txbuf);
 328                         goto out_unlock;
 329                 }
 330         }
 331
 332         for (i = 0; i < count; i++) {
 333                 if (txbuf[i] > IR_MAX_DURATION / 1000 - duration || !txbuf[i]) {
 334                         ret = -EINVAL;
 335                         goto out_kfree;
 336                 }
 337
 338                 duration += txbuf[i];
 339         }
 340
 341         start = ktime_get();
 342
 343         ret = dev->tx_ir(dev, txbuf, count);
 344         if (ret < 0)
 345                 goto out_kfree;
 346
 347         kfree(txbuf);
 348         kfree(raw);
 349         mutex_unlock(&dev->lock);
 350
 351         /*
 352          * The lircd gap calculation expects the write function to
 353          * wait for the actual IR signal to be transmitted before
 354          * returning.
 355          */
 356         towait = ktime_us_delta(ktime_add_us(start, duration),
 357                                 ktime_get());
 358         if (towait > 0) {
 359                 set_current_state(TASK_INTERRUPTIBLE);
 360                 schedule_timeout(usecs_to_jiffies(towait));
 361         }
 362
 363         return n;
 364 out_kfree:
 365         kfree(txbuf);
 366 out_kfree_raw:
 367         kfree(raw);
 368 out_unlock:
 369         mutex_unlock(&dev->lock);
 370         return ret;
 371 }
 372
 373 static long ir_lirc_ioctl(struct file *file, unsigned int cmd,
 374                           unsigned long arg)
 375 {
 376         struct lirc_fh *fh = file->private_data;
 377         struct rc_dev *dev = fh->rc;
 378         u32 __user *argp = (u32 __user *)(arg);
 379         u32 val = 0;
 380         int ret;
 381
 382         if (_IOC_DIR(cmd) & _IOC_WRITE) {
 383                 ret = get_user(val, argp);
 384                 if (ret)
 385                         return ret;
 386         }
 387
 388         ret = mutex_lock_interruptible(&dev->lock);
 389         if (ret)
 390                 return ret;
 391
 392         if (!dev->registered) {
 393                 ret = -ENODEV;
 394                 goto out;
 395         }
 396
 397         switch (cmd) {
 398         case LIRC_GET_FEATURES:
 399                 if (dev->driver_type == RC_DRIVER_SCANCODE)
 400                         val |= LIRC_CAN_REC_SCANCODE;
 401
 402                 if (dev->driver_type == RC_DRIVER_IR_RAW) {
 403                         val |= LIRC_CAN_REC_MODE2;
 404                         if (dev->rx_resolution)
 405                                 val |= LIRC_CAN_GET_REC_RESOLUTION;
 406                 }
 407
 408                 if (dev->tx_ir) {
 409                         val |= LIRC_CAN_SEND_PULSE;
 410                         if (dev->s_tx_mask)
 411                                 val |= LIRC_CAN_SET_TRANSMITTER_MASK;
 412                         if (dev->s_tx_carrier)
 413                                 val |= LIRC_CAN_SET_SEND_CARRIER;
 414                         if (dev->s_tx_duty_cycle)
 415                                 val |= LIRC_CAN_SET_SEND_DUTY_CYCLE;
 416                 }
 417
 418                 if (dev->s_rx_carrier_range)
 419                         val |= LIRC_CAN_SET_REC_CARRIER |
 420                                 LIRC_CAN_SET_REC_CARRIER_RANGE;
 421
 422                 if (dev->s_learning_mode)
 423                         val |= LIRC_CAN_USE_WIDEBAND_RECEIVER;
 424
 425                 if (dev->s_carrier_report)
 426                         val |= LIRC_CAN_MEASURE_CARRIER;
 427
 428                 if (dev->max_timeout)
 429                         val |= LIRC_CAN_SET_REC_TIMEOUT;
 430
 431                 break;
 432
 433         /* mode support */
 434         case LIRC_GET_REC_MODE:
 435                 if (dev->driver_type == RC_DRIVER_IR_RAW_TX)
 436                         ret = -ENOTTY;
 437                 else
 438                         val = fh->rec_mode;
 439                 break;
 440
 441         case LIRC_SET_REC_MODE:
 442                 switch (dev->driver_type) {
 443                 case RC_DRIVER_IR_RAW_TX:
 444                         ret = -ENOTTY;
 445                         break;
 446                 case RC_DRIVER_SCANCODE:
 447                         if (val != LIRC_MODE_SCANCODE)
 448                                 ret = -EINVAL;
 449                         break;
 450                 case RC_DRIVER_IR_RAW:
 451                         if (!(val == LIRC_MODE_MODE2 ||
 452                               val == LIRC_MODE_SCANCODE))
 453                                 ret = -EINVAL;
 454                         break;
 455                 }
 456
 457                 if (!ret)
 458                         fh->rec_mode = val;
 459                 break;
 460
 461         case LIRC_GET_SEND_MODE:
 462                 if (!dev->tx_ir)
 463                         ret = -ENOTTY;
 464                 else
 465                         val = fh->send_mode;
 466                 break;
 467
 468         case LIRC_SET_SEND_MODE:
 469                 if (!dev->tx_ir)
 470                         ret = -ENOTTY;
 471                 else if (!(val == LIRC_MODE_PULSE || val == LIRC_MODE_SCANCODE))
 472                         ret = -EINVAL;
 473                 else
 474                         fh->send_mode = val;
 475                 break;
 476
 477         /* TX settings */
 478         case LIRC_SET_TRANSMITTER_MASK:
 479                 if (!dev->s_tx_mask)
 480                         ret = -ENOTTY;
 481                 else
 482                         ret = dev->s_tx_mask(dev, val);
 483                 break;
 484
 485         case LIRC_SET_SEND_CARRIER:
 486                 if (!dev->s_tx_carrier)
 487                         ret = -ENOTTY;
 488                 else
 489                         ret = dev->s_tx_carrier(dev, val);
 490                 break;
 491
 492         case LIRC_SET_SEND_DUTY_CYCLE:
 493                 if (!dev->s_tx_duty_cycle)
 494                         ret = -ENOTTY;
 495                 else if (val <= 0 || val >= 100)
 496                         ret = -EINVAL;
 497                 else
 498                         ret = dev->s_tx_duty_cycle(dev, val);
 499                 break;
 500
 501         /* RX settings */
 502         case LIRC_SET_REC_CARRIER:
 503                 if (!dev->s_rx_carrier_range)
 504                         ret = -ENOTTY;
 505                 else if (val <= 0)
 506                         ret = -EINVAL;
 507                 else
 508                         ret = dev->s_rx_carrier_range(dev, fh->carrier_low,
 509                                                       val);
 510                 break;
 511
 512         case LIRC_SET_REC_CARRIER_RANGE:
 513                 if (!dev->s_rx_carrier_range)
 514                         ret = -ENOTTY;
 515                 else if (val <= 0)
 516                         ret = -EINVAL;
 517                 else
 518                         fh->carrier_low = val;
 519                 break;
 520
 521         case LIRC_GET_REC_RESOLUTION:
 522                 if (!dev->rx_resolution)
 523                         ret = -ENOTTY;
 524                 else
 525                         val = dev->rx_resolution / 1000;
 526                 break;
 527
 528         case LIRC_SET_WIDEBAND_RECEIVER:
 529                 if (!dev->s_learning_mode)
 530                         ret = -ENOTTY;
 531                 else
 532                         ret = dev->s_learning_mode(dev, !!val);
 533                 break;
 534
 535         case LIRC_SET_MEASURE_CARRIER_MODE:
 536                 if (!dev->s_carrier_report)
 537                         ret = -ENOTTY;
 538                 else
 539                         ret = dev->s_carrier_report(dev, !!val);
 540                 break;
 541
 542         /* Generic timeout support */
 543         case LIRC_GET_MIN_TIMEOUT:
 544                 if (!dev->max_timeout)
 545                         ret = -ENOTTY;
 546                 else
 547                         val = DIV_ROUND_UP(dev->min_timeout, 1000);
 548                 break;
 549
 550         case LIRC_GET_MAX_TIMEOUT:
 551                 if (!dev->max_timeout)
 552                         ret = -ENOTTY;
 553                 else
 554                         val = dev->max_timeout / 1000;
 555                 break;
 556
 557         case LIRC_SET_REC_TIMEOUT:
 558                 if (!dev->max_timeout) {
 559                         ret = -ENOTTY;
 560                 } else if (val > U32_MAX / 1000) {
 561                         /* Check for multiply overflow */
 562                         ret = -EINVAL;
 563                 } else {
 564                         u32 tmp = val * 1000;
 565
 566                         if (tmp < dev->min_timeout || tmp > dev->max_timeout)
 567                                 ret = -EINVAL;
 568                         else if (dev->s_timeout)
 569                                 ret = dev->s_timeout(dev, tmp);
 570                         else
 571                                 dev->timeout = tmp;
 572                 }
 573                 break;
 574
 575         case LIRC_GET_REC_TIMEOUT:
 576                 if (!dev->timeout)
 577                         ret = -ENOTTY;
 578                 else
 579                         val = DIV_ROUND_UP(dev->timeout, 1000);
 580                 break;
 581
 582         case LIRC_SET_REC_TIMEOUT_REPORTS:
 583                 if (dev->driver_type != RC_DRIVER_IR_RAW)
 584                         ret = -ENOTTY;
 585                 else
 586                         fh->send_timeout_reports = !!val;
 587                 break;
 588
 589         default:
 590                 ret = -ENOTTY;
 591         }
 592
 593         if (!ret && _IOC_DIR(cmd) & _IOC_READ)
 594                 ret = put_user(val, argp);
 595
 596 out:
 597         mutex_unlock(&dev->lock);
 598         return ret;
 599 }
 600
 601 static __poll_t ir_lirc_poll(struct file *file, struct poll_table_struct *wait)
 602 {
 603         struct lirc_fh *fh = file->private_data;
 604         struct rc_dev *rcdev = fh->rc;
 605         __poll_t events = 0;
 606
 607         poll_wait(file, &fh->wait_poll, wait);
 608
 609         if (!rcdev->registered) {
 610                 events = EPOLLHUP | EPOLLERR;
 611         } else if (rcdev->driver_type != RC_DRIVER_IR_RAW_TX) {
 612                 if (fh->rec_mode == LIRC_MODE_SCANCODE &&
 613                     !kfifo_is_empty(&fh->scancodes))
 614                         events = EPOLLIN | EPOLLRDNORM;
 615
 616                 if (fh->rec_mode == LIRC_MODE_MODE2 &&
 617                     !kfifo_is_empty(&fh->rawir))
 618                         events = EPOLLIN | EPOLLRDNORM;
 619         }
 620
 621         return events;
 622 }
 623
 624 static ssize_t ir_lirc_read_mode2(struct file *file, char __user *buffer,
 625                                   size_t length)
 626 {
 627         struct lirc_fh *fh = file->private_data;
 628         struct rc_dev *rcdev = fh->rc;
 629         unsigned int copied;
 630         int ret;
 631
 632         if (length < sizeof(unsigned int) || length % sizeof(unsigned int))
 633                 return -EINVAL;
 634
 635         do {
 636                 if (kfifo_is_empty(&fh->rawir)) {
 637                         if (file->f_flags & O_NONBLOCK)
 638                                 return -EAGAIN;
 639
 640                         ret = wait_event_interruptible(fh->wait_poll,
 641                                         !kfifo_is_empty(&fh->rawir) ||
 642                                         !rcdev->registered);
 643                         if (ret)
 644                                 return ret;
 645                 }
 646
 647                 if (!rcdev->registered)
 648                         return -ENODEV;
 649
 650                 ret = mutex_lock_interruptible(&rcdev->lock);
 651                 if (ret)
 652                         return ret;
 653                 ret = kfifo_to_user(&fh->rawir, buffer, length, &copied);
 654                 mutex_unlock(&rcdev->lock);
 655                 if (ret)
 656                         return ret;
 657         } while (copied == 0);
 658
 659         return copied;
 660 }
 661
 662 static ssize_t ir_lirc_read_scancode(struct file *file, char __user *buffer,
 663                                      size_t length)
 664 {
 665         struct lirc_fh *fh = file->private_data;
 666         struct rc_dev *rcdev = fh->rc;
 667         unsigned int copied;
 668         int ret;
 669
 670         if (length < sizeof(struct lirc_scancode) ||
 671             length % sizeof(struct lirc_scancode))
 672                 return -EINVAL;
 673
 674         do {
 675                 if (kfifo_is_empty(&fh->scancodes)) {
 676                         if (file->f_flags & O_NONBLOCK)
 677                                 return -EAGAIN;
 678
 679                         ret = wait_event_interruptible(fh->wait_poll,
 680                                         !kfifo_is_empty(&fh->scancodes) ||
 681                                         !rcdev->registered);
 682                         if (ret)
 683                                 return ret;
 684                 }
 685
 686                 if (!rcdev->registered)
 687                         return -ENODEV;
 688
 689                 ret = mutex_lock_interruptible(&rcdev->lock);
 690                 if (ret)
 691                         return ret;
 692                 ret = kfifo_to_user(&fh->scancodes, buffer, length, &copied);
 693                 mutex_unlock(&rcdev->lock);
 694                 if (ret)
 695                         return ret;
 696         } while (copied == 0);
 697
 698         return copied;
 699 }
 700
 701 static ssize_t ir_lirc_read(struct file *file, char __user *buffer,
 702                             size_t length, loff_t *ppos)
 703 {
 704         struct lirc_fh *fh = file->private_data;
 705         struct rc_dev *rcdev = fh->rc;
 706
 707         if (rcdev->driver_type == RC_DRIVER_IR_RAW_TX)
 708                 return -EINVAL;
 709
 710         if (!rcdev->registered)
 711                 return -ENODEV;
 712
 713         if (fh->rec_mode == LIRC_MODE_MODE2)
 714                 return ir_lirc_read_mode2(file, buffer, length);
 715         else /* LIRC_MODE_SCANCODE */
 716                 return ir_lirc_read_scancode(file, buffer, length);
 717 }
 718
 719 static const struct file_operations lirc_fops = {
 720         .owner          = THIS_MODULE,
 721         .write          = ir_lirc_transmit_ir,
 722         .unlocked_ioctl = ir_lirc_ioctl,
 723         .compat_ioctl   = compat_ptr_ioctl,
 724         .read           = ir_lirc_read,
 725         .poll           = ir_lirc_poll,
 726         .open           = ir_lirc_open,
 727         .release        = ir_lirc_close,
 728         .llseek         = no_llseek,
 729 };
 730
 731 static void lirc_release_device(struct device *ld)
 732 {
 733         struct rc_dev *rcdev = container_of(ld, struct rc_dev, lirc_dev);
 734
 735         put_device(&rcdev->dev);
 736 }
 737
 738 int ir_lirc_register(struct rc_dev *dev)
 739 {
 740         const char *rx_type, *tx_type;
 741         int err, minor;
 742
 743         minor = ida_simple_get(&lirc_ida, 0, RC_DEV_MAX, GFP_KERNEL);
 744         if (minor < 0)
 745                 return minor;
 746
 747         device_initialize(&dev->lirc_dev);
 748         dev->lirc_dev.class = lirc_class;
 749         dev->lirc_dev.parent = &dev->dev;
 750         dev->lirc_dev.release = lirc_release_device;
 751         dev->lirc_dev.devt = MKDEV(MAJOR(lirc_base_dev), minor);
 752         dev_set_name(&dev->lirc_dev, "lirc%d", minor);
 753
 754         INIT_LIST_HEAD(&dev->lirc_fh);
 755         spin_lock_init(&dev->lirc_fh_lock);
 756
 757         cdev_init(&dev->lirc_cdev, &lirc_fops);
 758
 759         err = cdev_device_add(&dev->lirc_cdev, &dev->lirc_dev);
 760         if (err)
 761                 goto out_ida;
 762
 763         get_device(&dev->dev);
 764
 765         switch (dev->driver_type) {
 766         case RC_DRIVER_SCANCODE:
 767                 rx_type = "scancode";
 768                 break;
 769         case RC_DRIVER_IR_RAW:
 770                 rx_type = "raw IR";
 771                 break;
 772         default:
 773                 rx_type = "no";
 774                 break;
 775         }
 776
 777         if (dev->tx_ir)
 778                 tx_type = "raw IR";
 779         else
 780                 tx_type = "no";
 781
 782         dev_info(&dev->dev, "lirc_dev: driver %s registered at minor = %d, %s receiver, %s transmitter",
 783                  dev->driver_name, minor, rx_type, tx_type);
 784
 785         return 0;
 786
 787 out_ida:
 788         ida_simple_remove(&lirc_ida, minor);
 789         return err;
 790 }
 791
 792 void ir_lirc_unregister(struct rc_dev *dev)
 793 {
 794         unsigned long flags;
 795         struct lirc_fh *fh;
 796
 797         dev_dbg(&dev->dev, "lirc_dev: driver %s unregistered from minor = %d\n",
 798                 dev->driver_name, MINOR(dev->lirc_dev.devt));
 799
 800         spin_lock_irqsave(&dev->lirc_fh_lock, flags);
 801         list_for_each_entry(fh, &dev->lirc_fh, list)
 802                 wake_up_poll(&fh->wait_poll, EPOLLHUP | EPOLLERR);
 803         spin_unlock_irqrestore(&dev->lirc_fh_lock, flags);
 804
 805         cdev_device_del(&dev->lirc_cdev, &dev->lirc_dev);
 806         ida_simple_remove(&lirc_ida, MINOR(dev->lirc_dev.devt));
 807 }
 808
 809 int __init lirc_dev_init(void)
 810 {
 811         int retval;
 812
 813         lirc_class = class_create(THIS_MODULE, "lirc");
 814         if (IS_ERR(lirc_class)) {
 815                 pr_err("class_create failed\n");
 816                 return PTR_ERR(lirc_class);
 817         }
 818
 819         retval = alloc_chrdev_region(&lirc_base_dev, 0, RC_DEV_MAX,
 820                                      "BaseRemoteCtl");
 821         if (retval) {
 822                 class_destroy(lirc_class);
 823                 pr_err("alloc_chrdev_region failed\n");
 824                 return retval;
 825         }
 826
 827         pr_debug("IR Remote Control driver registered, major %d\n",
 828                  MAJOR(lirc_base_dev));
 829
 830         return 0;
 831 }
 832
 833 void __exit lirc_dev_exit(void)
 834 {
 835         class_destroy(lirc_class);
 836         unregister_chrdev_region(lirc_base_dev, RC_DEV_MAX);
 837 }
 838
 839 struct rc_dev *rc_dev_get_from_fd(int fd)
 840 {
 841         struct fd f = fdget(fd);
 842         struct lirc_fh *fh;
 843         struct rc_dev *dev;
 844
 845         if (!f.file)
 846                 return ERR_PTR(-EBADF);
 847
 848         if (f.file->f_op != &lirc_fops) {
 849                 fdput(f);
 850                 return ERR_PTR(-EINVAL);
 851         }
 852
 853         fh = f.file->private_data;
 854         dev = fh->rc;
 855
 856         get_device(&dev->dev);
 857         fdput(f);
 858
 859         return dev;
 860 }
 861
 862 MODULE_ALIAS("lirc_dev");