linux/drivers/media/test-drivers/vivid/vivid-cec.c
<<
>>
Prefs
   1// SPDX-License-Identifier: GPL-2.0-only
   2/*
   3 * vivid-cec.c - A Virtual Video Test Driver, cec emulation
   4 *
   5 * Copyright 2016 Cisco Systems, Inc. and/or its affiliates. All rights reserved.
   6 */
   7
   8#include <media/cec.h>
   9
  10#include "vivid-core.h"
  11#include "vivid-cec.h"
  12
  13#define CEC_TIM_START_BIT_TOTAL         4500
  14#define CEC_TIM_START_BIT_LOW           3700
  15#define CEC_TIM_START_BIT_HIGH          800
  16#define CEC_TIM_DATA_BIT_TOTAL          2400
  17#define CEC_TIM_DATA_BIT_0_LOW          1500
  18#define CEC_TIM_DATA_BIT_0_HIGH         900
  19#define CEC_TIM_DATA_BIT_1_LOW          600
  20#define CEC_TIM_DATA_BIT_1_HIGH         1800
  21
  22void vivid_cec_bus_free_work(struct vivid_dev *dev)
  23{
  24        spin_lock(&dev->cec_slock);
  25        while (!list_empty(&dev->cec_work_list)) {
  26                struct vivid_cec_work *cw =
  27                        list_first_entry(&dev->cec_work_list,
  28                                         struct vivid_cec_work, list);
  29
  30                spin_unlock(&dev->cec_slock);
  31                cancel_delayed_work_sync(&cw->work);
  32                spin_lock(&dev->cec_slock);
  33                list_del(&cw->list);
  34                cec_transmit_attempt_done(cw->adap, CEC_TX_STATUS_LOW_DRIVE);
  35                kfree(cw);
  36        }
  37        spin_unlock(&dev->cec_slock);
  38}
  39
  40static bool vivid_cec_find_dest_adap(struct vivid_dev *dev,
  41                                     struct cec_adapter *adap, u8 dest)
  42{
  43        unsigned int i;
  44
  45        if (dest >= 0xf)
  46                return false;
  47
  48        if (adap != dev->cec_rx_adap && dev->cec_rx_adap &&
  49            dev->cec_rx_adap->is_configured &&
  50            cec_has_log_addr(dev->cec_rx_adap, dest))
  51                return true;
  52
  53        for (i = 0; i < MAX_OUTPUTS && dev->cec_tx_adap[i]; i++) {
  54                if (adap == dev->cec_tx_adap[i])
  55                        continue;
  56                if (!dev->cec_tx_adap[i]->is_configured)
  57                        continue;
  58                if (cec_has_log_addr(dev->cec_tx_adap[i], dest))
  59                        return true;
  60        }
  61        return false;
  62}
  63
  64static void vivid_cec_pin_adap_events(struct cec_adapter *adap, ktime_t ts,
  65                                      const struct cec_msg *msg, bool nacked)
  66{
  67        unsigned int len = nacked ? 1 : msg->len;
  68        unsigned int i;
  69        bool bit;
  70
  71        if (adap == NULL)
  72                return;
  73
  74        /*
  75         * Suffix ULL on constant 10 makes the expression
  76         * CEC_TIM_START_BIT_TOTAL + 10ULL * len * CEC_TIM_DATA_BIT_TOTAL
  77         * to be evaluated using 64-bit unsigned arithmetic (u64), which
  78         * is what ktime_sub_us expects as second argument.
  79         */
  80        ts = ktime_sub_us(ts, CEC_TIM_START_BIT_TOTAL +
  81                               10ULL * len * CEC_TIM_DATA_BIT_TOTAL);
  82        cec_queue_pin_cec_event(adap, false, false, ts);
  83        ts = ktime_add_us(ts, CEC_TIM_START_BIT_LOW);
  84        cec_queue_pin_cec_event(adap, true, false, ts);
  85        ts = ktime_add_us(ts, CEC_TIM_START_BIT_HIGH);
  86
  87        for (i = 0; i < 10 * len; i++) {
  88                switch (i % 10) {
  89                case 0 ... 7:
  90                        bit = msg->msg[i / 10] & (0x80 >> (i % 10));
  91                        break;
  92                case 8: /* EOM */
  93                        bit = i / 10 == msg->len - 1;
  94                        break;
  95                case 9: /* ACK */
  96                        bit = cec_msg_is_broadcast(msg) ^ nacked;
  97                        break;
  98                }
  99                cec_queue_pin_cec_event(adap, false, false, ts);
 100                if (bit)
 101                        ts = ktime_add_us(ts, CEC_TIM_DATA_BIT_1_LOW);
 102                else
 103                        ts = ktime_add_us(ts, CEC_TIM_DATA_BIT_0_LOW);
 104                cec_queue_pin_cec_event(adap, true, false, ts);
 105                if (bit)
 106                        ts = ktime_add_us(ts, CEC_TIM_DATA_BIT_1_HIGH);
 107                else
 108                        ts = ktime_add_us(ts, CEC_TIM_DATA_BIT_0_HIGH);
 109        }
 110}
 111
 112static void vivid_cec_pin_events(struct vivid_dev *dev,
 113                                 const struct cec_msg *msg, bool nacked)
 114{
 115        ktime_t ts = ktime_get();
 116        unsigned int i;
 117
 118        vivid_cec_pin_adap_events(dev->cec_rx_adap, ts, msg, nacked);
 119        for (i = 0; i < MAX_OUTPUTS; i++)
 120                vivid_cec_pin_adap_events(dev->cec_tx_adap[i], ts, msg, nacked);
 121}
 122
 123static void vivid_cec_xfer_done_worker(struct work_struct *work)
 124{
 125        struct vivid_cec_work *cw =
 126                container_of(work, struct vivid_cec_work, work.work);
 127        struct vivid_dev *dev = cw->dev;
 128        struct cec_adapter *adap = cw->adap;
 129        u8 dest = cec_msg_destination(&cw->msg);
 130        bool valid_dest;
 131        unsigned int i;
 132
 133        valid_dest = cec_msg_is_broadcast(&cw->msg);
 134        if (!valid_dest)
 135                valid_dest = vivid_cec_find_dest_adap(dev, adap, dest);
 136
 137        cw->tx_status = valid_dest ? CEC_TX_STATUS_OK : CEC_TX_STATUS_NACK;
 138        spin_lock(&dev->cec_slock);
 139        dev->cec_xfer_time_jiffies = 0;
 140        dev->cec_xfer_start_jiffies = 0;
 141        list_del(&cw->list);
 142        spin_unlock(&dev->cec_slock);
 143        vivid_cec_pin_events(dev, &cw->msg, !valid_dest);
 144        cec_transmit_attempt_done(cw->adap, cw->tx_status);
 145
 146        /* Broadcast message */
 147        if (adap != dev->cec_rx_adap)
 148                cec_received_msg(dev->cec_rx_adap, &cw->msg);
 149        for (i = 0; i < MAX_OUTPUTS && dev->cec_tx_adap[i]; i++)
 150                if (adap != dev->cec_tx_adap[i])
 151                        cec_received_msg(dev->cec_tx_adap[i], &cw->msg);
 152        kfree(cw);
 153}
 154
 155static void vivid_cec_xfer_try_worker(struct work_struct *work)
 156{
 157        struct vivid_cec_work *cw =
 158                container_of(work, struct vivid_cec_work, work.work);
 159        struct vivid_dev *dev = cw->dev;
 160
 161        spin_lock(&dev->cec_slock);
 162        if (dev->cec_xfer_time_jiffies) {
 163                list_del(&cw->list);
 164                spin_unlock(&dev->cec_slock);
 165                cec_transmit_attempt_done(cw->adap, CEC_TX_STATUS_ARB_LOST);
 166                kfree(cw);
 167        } else {
 168                INIT_DELAYED_WORK(&cw->work, vivid_cec_xfer_done_worker);
 169                dev->cec_xfer_start_jiffies = jiffies;
 170                dev->cec_xfer_time_jiffies = usecs_to_jiffies(cw->usecs);
 171                spin_unlock(&dev->cec_slock);
 172                schedule_delayed_work(&cw->work, dev->cec_xfer_time_jiffies);
 173        }
 174}
 175
 176static int vivid_cec_adap_enable(struct cec_adapter *adap, bool enable)
 177{
 178        adap->cec_pin_is_high = true;
 179        return 0;
 180}
 181
 182static int vivid_cec_adap_log_addr(struct cec_adapter *adap, u8 log_addr)
 183{
 184        return 0;
 185}
 186
 187/*
 188 * One data bit takes 2400 us, each byte needs 10 bits so that's 24000 us
 189 * per byte.
 190 */
 191#define USECS_PER_BYTE 24000
 192
 193static int vivid_cec_adap_transmit(struct cec_adapter *adap, u8 attempts,
 194                                   u32 signal_free_time, struct cec_msg *msg)
 195{
 196        struct vivid_dev *dev = cec_get_drvdata(adap);
 197        struct vivid_cec_work *cw = kzalloc(sizeof(*cw), GFP_KERNEL);
 198        long delta_jiffies = 0;
 199
 200        if (cw == NULL)
 201                return -ENOMEM;
 202        cw->dev = dev;
 203        cw->adap = adap;
 204        cw->usecs = CEC_FREE_TIME_TO_USEC(signal_free_time) +
 205                    msg->len * USECS_PER_BYTE;
 206        cw->msg = *msg;
 207
 208        spin_lock(&dev->cec_slock);
 209        list_add(&cw->list, &dev->cec_work_list);
 210        if (dev->cec_xfer_time_jiffies == 0) {
 211                INIT_DELAYED_WORK(&cw->work, vivid_cec_xfer_done_worker);
 212                dev->cec_xfer_start_jiffies = jiffies;
 213                dev->cec_xfer_time_jiffies = usecs_to_jiffies(cw->usecs);
 214                delta_jiffies = dev->cec_xfer_time_jiffies;
 215        } else {
 216                INIT_DELAYED_WORK(&cw->work, vivid_cec_xfer_try_worker);
 217                delta_jiffies = dev->cec_xfer_start_jiffies +
 218                        dev->cec_xfer_time_jiffies - jiffies;
 219        }
 220        spin_unlock(&dev->cec_slock);
 221        schedule_delayed_work(&cw->work, delta_jiffies < 0 ? 0 : delta_jiffies);
 222        return 0;
 223}
 224
 225static int vivid_received(struct cec_adapter *adap, struct cec_msg *msg)
 226{
 227        struct vivid_dev *dev = cec_get_drvdata(adap);
 228        struct cec_msg reply;
 229        u8 dest = cec_msg_destination(msg);
 230        u8 disp_ctl;
 231        char osd[14];
 232
 233        if (cec_msg_is_broadcast(msg))
 234                dest = adap->log_addrs.log_addr[0];
 235        cec_msg_init(&reply, dest, cec_msg_initiator(msg));
 236
 237        switch (cec_msg_opcode(msg)) {
 238        case CEC_MSG_SET_OSD_STRING:
 239                if (!cec_is_sink(adap))
 240                        return -ENOMSG;
 241                cec_ops_set_osd_string(msg, &disp_ctl, osd);
 242                switch (disp_ctl) {
 243                case CEC_OP_DISP_CTL_DEFAULT:
 244                        strscpy(dev->osd, osd, sizeof(dev->osd));
 245                        dev->osd_jiffies = jiffies;
 246                        break;
 247                case CEC_OP_DISP_CTL_UNTIL_CLEARED:
 248                        strscpy(dev->osd, osd, sizeof(dev->osd));
 249                        dev->osd_jiffies = 0;
 250                        break;
 251                case CEC_OP_DISP_CTL_CLEAR:
 252                        dev->osd[0] = 0;
 253                        dev->osd_jiffies = 0;
 254                        break;
 255                default:
 256                        cec_msg_feature_abort(&reply, cec_msg_opcode(msg),
 257                                              CEC_OP_ABORT_INVALID_OP);
 258                        cec_transmit_msg(adap, &reply, false);
 259                        break;
 260                }
 261                break;
 262        default:
 263                return -ENOMSG;
 264        }
 265        return 0;
 266}
 267
 268static const struct cec_adap_ops vivid_cec_adap_ops = {
 269        .adap_enable = vivid_cec_adap_enable,
 270        .adap_log_addr = vivid_cec_adap_log_addr,
 271        .adap_transmit = vivid_cec_adap_transmit,
 272        .received = vivid_received,
 273};
 274
 275struct cec_adapter *vivid_cec_alloc_adap(struct vivid_dev *dev,
 276                                         unsigned int idx,
 277                                         bool is_source)
 278{
 279        u32 caps = CEC_CAP_DEFAULTS | CEC_CAP_MONITOR_ALL | CEC_CAP_MONITOR_PIN;
 280        char name[32];
 281
 282        snprintf(name, sizeof(name), "vivid-%03d-vid-%s%d",
 283                 dev->inst, is_source ? "out" : "cap", idx);
 284        return cec_allocate_adapter(&vivid_cec_adap_ops, dev,
 285                                    name, caps, CEC_MAX_LOG_ADDRS);
 286}
 287