git.oblomov.eu Git - linux-2.6/blob - drivers/media/dvb/firewire/firedtv-avc.c

   1 /*
   2  * FireDTV driver (formerly known as FireSAT)
   3  *
   4  * Copyright (C) 2004 Andreas Monitzer <andy@monitzer.com>
   5  * Copyright (C) 2008 Ben Backx <ben@bbackx.com>
   6  * Copyright (C) 2008 Henrik Kurelid <henrik@kurelid.se>
   7  *
   8  *      This program is free software; you can redistribute it and/or
   9  *      modify it under the terms of the GNU General Public License as
  10  *      published by the Free Software Foundation; either version 2 of
  11  *      the License, or (at your option) any later version.
  12  */
  13
  14 #include <linux/bug.h>
  15 #include <linux/crc32.h>
  16 #include <linux/delay.h>
  17 #include <linux/device.h>
  18 #include <linux/jiffies.h>
  19 #include <linux/kernel.h>
  20 #include <linux/moduleparam.h>
  21 #include <linux/mutex.h>
  22 #include <linux/string.h>
  23 #include <linux/stringify.h>
  24 #include <linux/wait.h>
  25 #include <linux/workqueue.h>
  26
  27 #include "firedtv.h"
  28
  29 #define FCP_COMMAND_REGISTER            0xfffff0000b00ULL
  30
  31 #define AVC_CTYPE_CONTROL               0x0
  32 #define AVC_CTYPE_STATUS                0x1
  33 #define AVC_CTYPE_NOTIFY                0x3
  34
  35 #define AVC_RESPONSE_ACCEPTED           0x9
  36 #define AVC_RESPONSE_STABLE             0xc
  37 #define AVC_RESPONSE_CHANGED            0xd
  38 #define AVC_RESPONSE_INTERIM            0xf
  39
  40 #define AVC_SUBUNIT_TYPE_TUNER          (0x05 << 3)
  41 #define AVC_SUBUNIT_TYPE_UNIT           (0x1f << 3)
  42
  43 #define AVC_OPCODE_VENDOR               0x00
  44 #define AVC_OPCODE_READ_DESCRIPTOR      0x09
  45 #define AVC_OPCODE_DSIT                 0xc8
  46 #define AVC_OPCODE_DSD                  0xcb
  47
  48 #define DESCRIPTOR_TUNER_STATUS         0x80
  49 #define DESCRIPTOR_SUBUNIT_IDENTIFIER   0x00
  50
  51 #define SFE_VENDOR_DE_COMPANYID_0       0x00 /* OUI of Digital Everywhere */
  52 #define SFE_VENDOR_DE_COMPANYID_1       0x12
  53 #define SFE_VENDOR_DE_COMPANYID_2       0x87
  54
  55 #define SFE_VENDOR_OPCODE_REGISTER_REMOTE_CONTROL 0x0a
  56 #define SFE_VENDOR_OPCODE_LNB_CONTROL           0x52
  57 #define SFE_VENDOR_OPCODE_TUNE_QPSK             0x58 /* for DVB-S */
  58
  59 #define SFE_VENDOR_OPCODE_GET_FIRMWARE_VERSION  0x00
  60 #define SFE_VENDOR_OPCODE_HOST2CA               0x56
  61 #define SFE_VENDOR_OPCODE_CA2HOST               0x57
  62 #define SFE_VENDOR_OPCODE_CISTATUS              0x59
  63 #define SFE_VENDOR_OPCODE_TUNE_QPSK2            0x60 /* for DVB-S2 */
  64
  65 #define SFE_VENDOR_TAG_CA_RESET                 0x00
  66 #define SFE_VENDOR_TAG_CA_APPLICATION_INFO      0x01
  67 #define SFE_VENDOR_TAG_CA_PMT                   0x02
  68 #define SFE_VENDOR_TAG_CA_DATE_TIME             0x04
  69 #define SFE_VENDOR_TAG_CA_MMI                   0x05
  70 #define SFE_VENDOR_TAG_CA_ENTER_MENU            0x07
  71
  72 #define EN50221_LIST_MANAGEMENT_ONLY    0x03
  73 #define EN50221_TAG_APP_INFO            0x9f8021
  74 #define EN50221_TAG_CA_INFO             0x9f8031
  75
  76 struct avc_command_frame {
  77         int length;
  78         u8 ctype;
  79         u8 subunit;
  80         u8 opcode;
  81         u8 operand[509];
  82 };
  83
  84 struct avc_response_frame {
  85         int length;
  86         u8 response;
  87         u8 subunit;
  88         u8 opcode;
  89         u8 operand[509];
  90 };
  91
  92 #define AVC_DEBUG_FCP_SUBACTIONS        1
  93 #define AVC_DEBUG_FCP_PAYLOADS          2
  94
  95 static int avc_debug;
  96 module_param_named(debug, avc_debug, int, 0644);
  97 MODULE_PARM_DESC(debug, "Verbose logging (default = 0"
  98         ", FCP subactions = "   __stringify(AVC_DEBUG_FCP_SUBACTIONS)
  99         ", FCP payloads = "     __stringify(AVC_DEBUG_FCP_PAYLOADS)
 100         ", or all = -1)");
 101
 102 static const char *debug_fcp_ctype(unsigned int ctype)
 103 {
 104         static const char *ctypes[] = {
 105                 [0x0] = "CONTROL",              [0x1] = "STATUS",
 106                 [0x2] = "SPECIFIC INQUIRY",     [0x3] = "NOTIFY",
 107                 [0x4] = "GENERAL INQUIRY",      [0x8] = "NOT IMPLEMENTED",
 108                 [0x9] = "ACCEPTED",             [0xa] = "REJECTED",
 109                 [0xb] = "IN TRANSITION",        [0xc] = "IMPLEMENTED/STABLE",
 110                 [0xd] = "CHANGED",              [0xf] = "INTERIM",
 111         };
 112         const char *ret = ctype < ARRAY_SIZE(ctypes) ? ctypes[ctype] : NULL;
 113
 114         return ret ? ret : "?";
 115 }
 116
 117 static const char *debug_fcp_opcode(unsigned int opcode,
 118                                     const u8 *data, size_t length)
 119 {
 120         switch (opcode) {
 121         case AVC_OPCODE_VENDOR:                 break;
 122         case AVC_OPCODE_READ_DESCRIPTOR:        return "ReadDescriptor";
 123         case AVC_OPCODE_DSIT:                   return "DirectSelectInfo.Type";
 124         case AVC_OPCODE_DSD:                    return "DirectSelectData";
 125         default:                                return "?";
 126         }
 127
 128         if (length < 7 ||
 129             data[3] != SFE_VENDOR_DE_COMPANYID_0 ||
 130             data[4] != SFE_VENDOR_DE_COMPANYID_1 ||
 131             data[5] != SFE_VENDOR_DE_COMPANYID_2)
 132                 return "Vendor";
 133
 134         switch (data[6]) {
 135         case SFE_VENDOR_OPCODE_REGISTER_REMOTE_CONTROL: return "RegisterRC";
 136         case SFE_VENDOR_OPCODE_LNB_CONTROL:             return "LNBControl";
 137         case SFE_VENDOR_OPCODE_TUNE_QPSK:               return "TuneQPSK";
 138         case SFE_VENDOR_OPCODE_HOST2CA:                 return "Host2CA";
 139         case SFE_VENDOR_OPCODE_CA2HOST:                 return "CA2Host";
 140         }
 141         return "Vendor";
 142 }
 143
 144 static void debug_fcp(const u8 *data, size_t length)
 145 {
 146         unsigned int subunit_type, subunit_id, op;
 147         const char *prefix = data[0] > 7 ? "FCP <- " : "FCP -> ";
 148
 149         if (avc_debug & AVC_DEBUG_FCP_SUBACTIONS) {
 150                 subunit_type = data[1] >> 3;
 151                 subunit_id = data[1] & 7;
 152                 op = subunit_type == 0x1e || subunit_id == 5 ? ~0 : data[2];
 153                 printk(KERN_INFO "%ssu=%x.%x l=%d: %-8s - %s\n",
 154                        prefix, subunit_type, subunit_id, length,
 155                        debug_fcp_ctype(data[0]),
 156                        debug_fcp_opcode(op, data, length));
 157         }
 158
 159         if (avc_debug & AVC_DEBUG_FCP_PAYLOADS)
 160                 print_hex_dump(KERN_INFO, prefix, DUMP_PREFIX_NONE, 16, 1,
 161                                data, length, false);
 162 }
 163
 164 static int __avc_write(struct firedtv *fdtv,
 165                 const struct avc_command_frame *c, struct avc_response_frame *r)
 166 {
 167         int err, retry;
 168
 169         if (r)
 170                 fdtv->avc_reply_received = false;
 171
 172         for (retry = 0; retry < 6; retry++) {
 173                 if (unlikely(avc_debug))
 174                         debug_fcp(&c->ctype, c->length);
 175
 176                 err = fdtv->backend->write(fdtv, FCP_COMMAND_REGISTER,
 177                                            (void *)&c->ctype, c->length);
 178                 if (err) {
 179                         fdtv->avc_reply_received = true;
 180                         dev_err(fdtv->device, "FCP command write failed\n");
 181                         return err;
 182                 }
 183
 184                 if (!r)
 185                         return 0;
 186
 187                 /*
 188                  * AV/C specs say that answers should be sent within 150 ms.
 189                  * Time out after 200 ms.
 190                  */
 191                 if (wait_event_timeout(fdtv->avc_wait,
 192                                        fdtv->avc_reply_received,
 193                                        msecs_to_jiffies(200)) != 0) {
 194                         r->length = fdtv->response_length;
 195                         memcpy(&r->response, fdtv->response, r->length);
 196
 197                         return 0;
 198                 }
 199         }
 200         dev_err(fdtv->device, "FCP response timed out\n");
 201         return -ETIMEDOUT;
 202 }
 203
 204 static int avc_write(struct firedtv *fdtv,
 205                 const struct avc_command_frame *c, struct avc_response_frame *r)
 206 {
 207         int ret;
 208
 209         if (mutex_lock_interruptible(&fdtv->avc_mutex))
 210                 return -EINTR;
 211
 212         ret = __avc_write(fdtv, c, r);
 213
 214         mutex_unlock(&fdtv->avc_mutex);
 215         return ret;
 216 }
 217
 218 int avc_recv(struct firedtv *fdtv, void *data, size_t length)
 219 {
 220         struct avc_response_frame *r =
 221                         data - offsetof(struct avc_response_frame, response);
 222
 223         if (unlikely(avc_debug))
 224                 debug_fcp(data, length);
 225
 226         if (length >= 8 &&
 227             r->operand[0] == SFE_VENDOR_DE_COMPANYID_0 &&
 228             r->operand[1] == SFE_VENDOR_DE_COMPANYID_1 &&
 229             r->operand[2] == SFE_VENDOR_DE_COMPANYID_2 &&
 230             r->operand[3] == SFE_VENDOR_OPCODE_REGISTER_REMOTE_CONTROL) {
 231                 if (r->response == AVC_RESPONSE_CHANGED) {
 232                         fdtv_handle_rc(fdtv,
 233                             r->operand[4] << 8 | r->operand[5]);
 234                         schedule_work(&fdtv->remote_ctrl_work);
 235                 } else if (r->response != AVC_RESPONSE_INTERIM) {
 236                         dev_info(fdtv->device,
 237                                  "remote control result = %d\n", r->response);
 238                 }
 239                 return 0;
 240         }
 241
 242         if (fdtv->avc_reply_received) {
 243                 dev_err(fdtv->device, "out-of-order AVC response, ignored\n");
 244                 return -EIO;
 245         }
 246
 247         memcpy(fdtv->response, data, length);
 248         fdtv->response_length = length;
 249
 250         fdtv->avc_reply_received = true;
 251         wake_up(&fdtv->avc_wait);
 252
 253         return 0;
 254 }
 255
 256 /*
 257  * tuning command for setting the relative LNB frequency
 258  * (not supported by the AVC standard)
 259  */
 260 static void avc_tuner_tuneqpsk(struct firedtv *fdtv,
 261                                struct dvb_frontend_parameters *params,
 262                                struct avc_command_frame *c)
 263 {
 264         c->opcode = AVC_OPCODE_VENDOR;
 265
 266         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
 267         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
 268         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
 269         c->operand[3] = SFE_VENDOR_OPCODE_TUNE_QPSK;
 270
 271         c->operand[4] = (params->frequency >> 24) & 0xff;
 272         c->operand[5] = (params->frequency >> 16) & 0xff;
 273         c->operand[6] = (params->frequency >> 8) & 0xff;
 274         c->operand[7] = params->frequency & 0xff;
 275
 276         c->operand[8] = ((params->u.qpsk.symbol_rate / 1000) >> 8) & 0xff;
 277         c->operand[9] = (params->u.qpsk.symbol_rate / 1000) & 0xff;
 278
 279         switch (params->u.qpsk.fec_inner) {
 280         case FEC_1_2:   c->operand[10] = 0x1; break;
 281         case FEC_2_3:   c->operand[10] = 0x2; break;
 282         case FEC_3_4:   c->operand[10] = 0x3; break;
 283         case FEC_5_6:   c->operand[10] = 0x4; break;
 284         case FEC_7_8:   c->operand[10] = 0x5; break;
 285         case FEC_4_5:
 286         case FEC_8_9:
 287         case FEC_AUTO:
 288         default:        c->operand[10] = 0x0;
 289         }
 290
 291         if (fdtv->voltage == 0xff)
 292                 c->operand[11] = 0xff;
 293         else if (fdtv->voltage == SEC_VOLTAGE_18) /* polarisation */
 294                 c->operand[11] = 0;
 295         else
 296                 c->operand[11] = 1;
 297
 298         if (fdtv->tone == 0xff)
 299                 c->operand[12] = 0xff;
 300         else if (fdtv->tone == SEC_TONE_ON) /* band */
 301                 c->operand[12] = 1;
 302         else
 303                 c->operand[12] = 0;
 304
 305         if (fdtv->type == FIREDTV_DVB_S2) {
 306                 c->operand[13] = 0x1;
 307                 c->operand[14] = 0xff;
 308                 c->operand[15] = 0xff;
 309                 c->length = 20;
 310         } else {
 311                 c->length = 16;
 312         }
 313 }
 314
 315 static void avc_tuner_dsd_dvb_c(struct dvb_frontend_parameters *params,
 316                                 struct avc_command_frame *c)
 317 {
 318         c->opcode = AVC_OPCODE_DSD;
 319
 320         c->operand[0] = 0;    /* source plug */
 321         c->operand[1] = 0xd2; /* subfunction replace */
 322         c->operand[2] = 0x20; /* system id = DVB */
 323         c->operand[3] = 0x00; /* antenna number */
 324         c->operand[4] = 0x11; /* system_specific_multiplex selection_length */
 325
 326         /* multiplex_valid_flags, high byte */
 327         c->operand[5] =   0 << 7 /* reserved */
 328                         | 0 << 6 /* Polarisation */
 329                         | 0 << 5 /* Orbital_Pos */
 330                         | 1 << 4 /* Frequency */
 331                         | 1 << 3 /* Symbol_Rate */
 332                         | 0 << 2 /* FEC_outer */
 333                         | (params->u.qam.fec_inner  != FEC_AUTO ? 1 << 1 : 0)
 334                         | (params->u.qam.modulation != QAM_AUTO ? 1 << 0 : 0);
 335
 336         /* multiplex_valid_flags, low byte */
 337         c->operand[6] =   0 << 7 /* NetworkID */
 338                         | 0 << 0 /* reserved */ ;
 339
 340         c->operand[7]  = 0x00;
 341         c->operand[8]  = 0x00;
 342         c->operand[9]  = 0x00;
 343         c->operand[10] = 0x00;
 344
 345         c->operand[11] = (((params->frequency / 4000) >> 16) & 0xff) | (2 << 6);
 346         c->operand[12] = ((params->frequency / 4000) >> 8) & 0xff;
 347         c->operand[13] = (params->frequency / 4000) & 0xff;
 348         c->operand[14] = ((params->u.qpsk.symbol_rate / 1000) >> 12) & 0xff;
 349         c->operand[15] = ((params->u.qpsk.symbol_rate / 1000) >> 4) & 0xff;
 350         c->operand[16] = ((params->u.qpsk.symbol_rate / 1000) << 4) & 0xf0;
 351         c->operand[17] = 0x00;
 352
 353         switch (params->u.qpsk.fec_inner) {
 354         case FEC_1_2:   c->operand[18] = 0x1; break;
 355         case FEC_2_3:   c->operand[18] = 0x2; break;
 356         case FEC_3_4:   c->operand[18] = 0x3; break;
 357         case FEC_5_6:   c->operand[18] = 0x4; break;
 358         case FEC_7_8:   c->operand[18] = 0x5; break;
 359         case FEC_8_9:   c->operand[18] = 0x6; break;
 360         case FEC_4_5:   c->operand[18] = 0x8; break;
 361         case FEC_AUTO:
 362         default:        c->operand[18] = 0x0;
 363         }
 364
 365         switch (params->u.qam.modulation) {
 366         case QAM_16:    c->operand[19] = 0x08; break;
 367         case QAM_32:    c->operand[19] = 0x10; break;
 368         case QAM_64:    c->operand[19] = 0x18; break;
 369         case QAM_128:   c->operand[19] = 0x20; break;
 370         case QAM_256:   c->operand[19] = 0x28; break;
 371         case QAM_AUTO:
 372         default:        c->operand[19] = 0x00;
 373         }
 374
 375         c->operand[20] = 0x00;
 376         c->operand[21] = 0x00;
 377         /* Nr_of_dsd_sel_specs = 0 -> no PIDs are transmitted */
 378         c->operand[22] = 0x00;
 379
 380         c->length = 28;
 381 }
 382
 383 static void avc_tuner_dsd_dvb_t(struct dvb_frontend_parameters *params,
 384                                 struct avc_command_frame *c)
 385 {
 386         struct dvb_ofdm_parameters *ofdm = &params->u.ofdm;
 387
 388         c->opcode = AVC_OPCODE_DSD;
 389
 390         c->operand[0] = 0;    /* source plug */
 391         c->operand[1] = 0xd2; /* subfunction replace */
 392         c->operand[2] = 0x20; /* system id = DVB */
 393         c->operand[3] = 0x00; /* antenna number */
 394         c->operand[4] = 0x0c; /* system_specific_multiplex selection_length */
 395
 396         /* multiplex_valid_flags, high byte */
 397         c->operand[5] =
 398               0 << 7 /* reserved */
 399             | 1 << 6 /* CenterFrequency */
 400             | (ofdm->bandwidth      != BANDWIDTH_AUTO        ? 1 << 5 : 0)
 401             | (ofdm->constellation  != QAM_AUTO              ? 1 << 4 : 0)
 402             | (ofdm->hierarchy_information != HIERARCHY_AUTO ? 1 << 3 : 0)
 403             | (ofdm->code_rate_HP   != FEC_AUTO              ? 1 << 2 : 0)
 404             | (ofdm->code_rate_LP   != FEC_AUTO              ? 1 << 1 : 0)
 405             | (ofdm->guard_interval != GUARD_INTERVAL_AUTO   ? 1 << 0 : 0);
 406
 407         /* multiplex_valid_flags, low byte */
 408         c->operand[6] =
 409               0 << 7 /* NetworkID */
 410             | (ofdm->transmission_mode != TRANSMISSION_MODE_AUTO ? 1 << 6 : 0)
 411             | 0 << 5 /* OtherFrequencyFlag */
 412             | 0 << 0 /* reserved */ ;
 413
 414         c->operand[7]  = 0x0;
 415         c->operand[8]  = (params->frequency / 10) >> 24;
 416         c->operand[9]  = ((params->frequency / 10) >> 16) & 0xff;
 417         c->operand[10] = ((params->frequency / 10) >>  8) & 0xff;
 418         c->operand[11] = (params->frequency / 10) & 0xff;
 419
 420         switch (ofdm->bandwidth) {
 421         case BANDWIDTH_7_MHZ:   c->operand[12] = 0x20; break;
 422         case BANDWIDTH_8_MHZ:
 423         case BANDWIDTH_6_MHZ:   /* not defined by AVC spec */
 424         case BANDWIDTH_AUTO:
 425         default:                c->operand[12] = 0x00;
 426         }
 427
 428         switch (ofdm->constellation) {
 429         case QAM_16:    c->operand[13] = 1 << 6; break;
 430         case QAM_64:    c->operand[13] = 2 << 6; break;
 431         case QPSK:
 432         default:        c->operand[13] = 0x00;
 433         }
 434
 435         switch (ofdm->hierarchy_information) {
 436         case HIERARCHY_1:       c->operand[13] |= 1 << 3; break;
 437         case HIERARCHY_2:       c->operand[13] |= 2 << 3; break;
 438         case HIERARCHY_4:       c->operand[13] |= 3 << 3; break;
 439         case HIERARCHY_AUTO:
 440         case HIERARCHY_NONE:
 441         default:                break;
 442         }
 443
 444         switch (ofdm->code_rate_HP) {
 445         case FEC_2_3:   c->operand[13] |= 1; break;
 446         case FEC_3_4:   c->operand[13] |= 2; break;
 447         case FEC_5_6:   c->operand[13] |= 3; break;
 448         case FEC_7_8:   c->operand[13] |= 4; break;
 449         case FEC_1_2:
 450         default:        break;
 451         }
 452
 453         switch (ofdm->code_rate_LP) {
 454         case FEC_2_3:   c->operand[14] = 1 << 5; break;
 455         case FEC_3_4:   c->operand[14] = 2 << 5; break;
 456         case FEC_5_6:   c->operand[14] = 3 << 5; break;
 457         case FEC_7_8:   c->operand[14] = 4 << 5; break;
 458         case FEC_1_2:
 459         default:        c->operand[14] = 0x00; break;
 460         }
 461
 462         switch (ofdm->guard_interval) {
 463         case GUARD_INTERVAL_1_16:       c->operand[14] |= 1 << 3; break;
 464         case GUARD_INTERVAL_1_8:        c->operand[14] |= 2 << 3; break;
 465         case GUARD_INTERVAL_1_4:        c->operand[14] |= 3 << 3; break;
 466         case GUARD_INTERVAL_1_32:
 467         case GUARD_INTERVAL_AUTO:
 468         default:                        break;
 469         }
 470
 471         switch (ofdm->transmission_mode) {
 472         case TRANSMISSION_MODE_8K:      c->operand[14] |= 1 << 1; break;
 473         case TRANSMISSION_MODE_2K:
 474         case TRANSMISSION_MODE_AUTO:
 475         default:                        break;
 476         }
 477
 478         c->operand[15] = 0x00; /* network_ID[0] */
 479         c->operand[16] = 0x00; /* network_ID[1] */
 480         /* Nr_of_dsd_sel_specs = 0 -> no PIDs are transmitted */
 481         c->operand[17] = 0x00;
 482
 483         c->length = 24;
 484 }
 485
 486 int avc_tuner_dsd(struct firedtv *fdtv,
 487                   struct dvb_frontend_parameters *params)
 488 {
 489         char buffer[sizeof(struct avc_command_frame)];
 490         struct avc_command_frame *c = (void *)buffer;
 491         struct avc_response_frame *r = (void *)buffer; /* FIXME: unused */
 492
 493         memset(c, 0, sizeof(*c));
 494
 495         c->ctype   = AVC_CTYPE_CONTROL;
 496         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 497
 498         switch (fdtv->type) {
 499         case FIREDTV_DVB_S:
 500         case FIREDTV_DVB_S2: avc_tuner_tuneqpsk(fdtv, params, c); break;
 501         case FIREDTV_DVB_C: avc_tuner_dsd_dvb_c(params, c); break;
 502         case FIREDTV_DVB_T: avc_tuner_dsd_dvb_t(params, c); break;
 503         default:
 504                 BUG();
 505         }
 506
 507         if (avc_write(fdtv, c, r) < 0)
 508                 return -EIO;
 509
 510         msleep(500);
 511 #if 0
 512         /* FIXME: */
 513         /* u8 *status was an out-parameter of avc_tuner_dsd, unused by caller */
 514         if (status)
 515                 *status = r->operand[2];
 516 #endif
 517         return 0;
 518 }
 519
 520 int avc_tuner_set_pids(struct firedtv *fdtv, unsigned char pidc, u16 pid[])
 521 {
 522         char buffer[sizeof(struct avc_command_frame)];
 523         struct avc_command_frame *c = (void *)buffer;
 524         struct avc_response_frame *r = (void *)buffer; /* FIXME: unused */
 525         int pos, k;
 526
 527         if (pidc > 16 && pidc != 0xff)
 528                 return -EINVAL;
 529
 530         memset(c, 0, sizeof(*c));
 531
 532         c->ctype   = AVC_CTYPE_CONTROL;
 533         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 534         c->opcode  = AVC_OPCODE_DSD;
 535
 536         c->operand[0] = 0;      /* source plug */
 537         c->operand[1] = 0xd2;   /* subfunction replace */
 538         c->operand[2] = 0x20;   /* system id = DVB */
 539         c->operand[3] = 0x00;   /* antenna number */
 540         c->operand[4] = 0x00;   /* system_specific_multiplex selection_length */
 541         c->operand[5] = pidc;   /* Nr_of_dsd_sel_specs */
 542
 543         pos = 6;
 544         if (pidc != 0xff)
 545                 for (k = 0; k < pidc; k++) {
 546                         c->operand[pos++] = 0x13; /* flowfunction relay */
 547                         c->operand[pos++] = 0x80; /* dsd_sel_spec_valid_flags -> PID */
 548                         c->operand[pos++] = (pid[k] >> 8) & 0x1f;
 549                         c->operand[pos++] = pid[k] & 0xff;
 550                         c->operand[pos++] = 0x00; /* tableID */
 551                         c->operand[pos++] = 0x00; /* filter_length */
 552                 }
 553
 554         c->length = ALIGN(3 + pos, 4);
 555
 556         if (avc_write(fdtv, c, r) < 0)
 557                 return -EIO;
 558
 559         msleep(50);
 560         return 0;
 561 }
 562
 563 int avc_tuner_get_ts(struct firedtv *fdtv)
 564 {
 565         char buffer[sizeof(struct avc_command_frame)];
 566         struct avc_command_frame *c = (void *)buffer;
 567         struct avc_response_frame *r = (void *)buffer; /* FIXME: unused */
 568         int sl;
 569
 570         memset(c, 0, sizeof(*c));
 571
 572         c->ctype   = AVC_CTYPE_CONTROL;
 573         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 574         c->opcode  = AVC_OPCODE_DSIT;
 575
 576         sl = fdtv->type == FIREDTV_DVB_T ? 0x0c : 0x11;
 577
 578         c->operand[0] = 0;      /* source plug */
 579         c->operand[1] = 0xd2;   /* subfunction replace */
 580         c->operand[2] = 0xff;   /* status */
 581         c->operand[3] = 0x20;   /* system id = DVB */
 582         c->operand[4] = 0x00;   /* antenna number */
 583         c->operand[5] = 0x0;    /* system_specific_search_flags */
 584         c->operand[6] = sl;     /* system_specific_multiplex selection_length */
 585         c->operand[7] = 0x00;   /* valid_flags [0] */
 586         c->operand[8] = 0x00;   /* valid_flags [1] */
 587         c->operand[7 + sl] = 0x00; /* nr_of_dsit_sel_specs (always 0) */
 588
 589         c->length = fdtv->type == FIREDTV_DVB_T ? 24 : 28;
 590
 591         if (avc_write(fdtv, c, r) < 0)
 592                 return -EIO;
 593
 594         msleep(250);
 595         return 0;
 596 }
 597
 598 int avc_identify_subunit(struct firedtv *fdtv)
 599 {
 600         char buffer[sizeof(struct avc_command_frame)];
 601         struct avc_command_frame *c = (void *)buffer;
 602         struct avc_response_frame *r = (void *)buffer;
 603
 604         memset(c, 0, sizeof(*c));
 605
 606         c->ctype   = AVC_CTYPE_CONTROL;
 607         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 608         c->opcode  = AVC_OPCODE_READ_DESCRIPTOR;
 609
 610         c->operand[0] = DESCRIPTOR_SUBUNIT_IDENTIFIER;
 611         c->operand[1] = 0xff;
 612         c->operand[2] = 0x00;
 613         c->operand[3] = 0x00; /* length highbyte */
 614         c->operand[4] = 0x08; /* length lowbyte  */
 615         c->operand[5] = 0x00; /* offset highbyte */
 616         c->operand[6] = 0x0d; /* offset lowbyte  */
 617
 618         c->length = 12;
 619
 620         if (avc_write(fdtv, c, r) < 0)
 621                 return -EIO;
 622
 623         if ((r->response != AVC_RESPONSE_STABLE &&
 624              r->response != AVC_RESPONSE_ACCEPTED) ||
 625             (r->operand[3] << 8) + r->operand[4] != 8) {
 626                 dev_err(fdtv->device, "cannot read subunit identifier\n");
 627                 return -EINVAL;
 628         }
 629         return 0;
 630 }
 631
 632 #define SIZEOF_ANTENNA_INPUT_INFO 22
 633
 634 int avc_tuner_status(struct firedtv *fdtv, struct firedtv_tuner_status *stat)
 635 {
 636         char buffer[sizeof(struct avc_command_frame)];
 637         struct avc_command_frame *c = (void *)buffer;
 638         struct avc_response_frame *r = (void *)buffer;
 639         int length;
 640
 641         memset(c, 0, sizeof(*c));
 642
 643         c->ctype   = AVC_CTYPE_CONTROL;
 644         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 645         c->opcode  = AVC_OPCODE_READ_DESCRIPTOR;
 646
 647         c->operand[0] = DESCRIPTOR_TUNER_STATUS;
 648         c->operand[1] = 0xff;   /* read_result_status */
 649         c->operand[2] = 0x00;   /* reserved */
 650         c->operand[3] = 0;      /* SIZEOF_ANTENNA_INPUT_INFO >> 8; */
 651         c->operand[4] = 0;      /* SIZEOF_ANTENNA_INPUT_INFO & 0xff; */
 652         c->operand[5] = 0x00;
 653         c->operand[6] = 0x00;
 654
 655         c->length = 12;
 656
 657         if (avc_write(fdtv, c, r) < 0)
 658                 return -EIO;
 659
 660         if (r->response != AVC_RESPONSE_STABLE &&
 661             r->response != AVC_RESPONSE_ACCEPTED) {
 662                 dev_err(fdtv->device, "cannot read tuner status\n");
 663                 return -EINVAL;
 664         }
 665
 666         length = r->operand[9];
 667         if (r->operand[1] != 0x10 || length != SIZEOF_ANTENNA_INPUT_INFO) {
 668                 dev_err(fdtv->device, "got invalid tuner status\n");
 669                 return -EINVAL;
 670         }
 671
 672         stat->active_system             = r->operand[10];
 673         stat->searching                 = r->operand[11] >> 7 & 1;
 674         stat->moving                    = r->operand[11] >> 6 & 1;
 675         stat->no_rf                     = r->operand[11] >> 5 & 1;
 676         stat->input                     = r->operand[12] >> 7 & 1;
 677         stat->selected_antenna          = r->operand[12] & 0x7f;
 678         stat->ber                       = r->operand[13] << 24 |
 679                                           r->operand[14] << 16 |
 680                                           r->operand[15] << 8 |
 681                                           r->operand[16];
 682         stat->signal_strength           = r->operand[17];
 683         stat->raster_frequency          = r->operand[18] >> 6 & 2;
 684         stat->rf_frequency              = (r->operand[18] & 0x3f) << 16 |
 685                                           r->operand[19] << 8 |
 686                                           r->operand[20];
 687         stat->man_dep_info_length       = r->operand[21];
 688         stat->front_end_error           = r->operand[22] >> 4 & 1;
 689         stat->antenna_error             = r->operand[22] >> 3 & 1;
 690         stat->front_end_power_status    = r->operand[22] >> 1 & 1;
 691         stat->power_supply              = r->operand[22] & 1;
 692         stat->carrier_noise_ratio       = r->operand[23] << 8 |
 693                                           r->operand[24];
 694         stat->power_supply_voltage      = r->operand[27];
 695         stat->antenna_voltage           = r->operand[28];
 696         stat->firewire_bus_voltage      = r->operand[29];
 697         stat->ca_mmi                    = r->operand[30] & 1;
 698         stat->ca_pmt_reply              = r->operand[31] >> 7 & 1;
 699         stat->ca_date_time_request      = r->operand[31] >> 6 & 1;
 700         stat->ca_application_info       = r->operand[31] >> 5 & 1;
 701         stat->ca_module_present_status  = r->operand[31] >> 4 & 1;
 702         stat->ca_dvb_flag               = r->operand[31] >> 3 & 1;
 703         stat->ca_error_flag             = r->operand[31] >> 2 & 1;
 704         stat->ca_initialization_status  = r->operand[31] >> 1 & 1;
 705
 706         return 0;
 707 }
 708
 709 int avc_lnb_control(struct firedtv *fdtv, char voltage, char burst,
 710                     char conttone, char nrdiseq,
 711                     struct dvb_diseqc_master_cmd *diseqcmd)
 712 {
 713         char buffer[sizeof(struct avc_command_frame)];
 714         struct avc_command_frame *c = (void *)buffer;
 715         struct avc_response_frame *r = (void *)buffer;
 716         int i, j, k;
 717
 718         memset(c, 0, sizeof(*c));
 719
 720         c->ctype   = AVC_CTYPE_CONTROL;
 721         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 722         c->opcode  = AVC_OPCODE_VENDOR;
 723
 724         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
 725         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
 726         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
 727         c->operand[3] = SFE_VENDOR_OPCODE_LNB_CONTROL;
 728
 729         c->operand[4] = voltage;
 730         c->operand[5] = nrdiseq;
 731
 732         i = 6;
 733
 734         for (j = 0; j < nrdiseq; j++) {
 735                 c->operand[i++] = diseqcmd[j].msg_len;
 736
 737                 for (k = 0; k < diseqcmd[j].msg_len; k++)
 738                         c->operand[i++] = diseqcmd[j].msg[k];
 739         }
 740
 741         c->operand[i++] = burst;
 742         c->operand[i++] = conttone;
 743
 744         c->length = ALIGN(3 + i, 4);
 745
 746         if (avc_write(fdtv, c, r) < 0)
 747                 return -EIO;
 748
 749         if (r->response != AVC_RESPONSE_ACCEPTED) {
 750                 dev_err(fdtv->device, "LNB control failed\n");
 751                 return -EINVAL;
 752         }
 753
 754         return 0;
 755 }
 756
 757 int avc_register_remote_control(struct firedtv *fdtv)
 758 {
 759         char buffer[sizeof(struct avc_command_frame)];
 760         struct avc_command_frame *c = (void *)buffer;
 761
 762         memset(c, 0, sizeof(*c));
 763
 764         c->ctype   = AVC_CTYPE_NOTIFY;
 765         c->subunit = AVC_SUBUNIT_TYPE_UNIT | 7;
 766         c->opcode  = AVC_OPCODE_VENDOR;
 767
 768         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
 769         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
 770         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
 771         c->operand[3] = SFE_VENDOR_OPCODE_REGISTER_REMOTE_CONTROL;
 772
 773         c->length = 8;
 774
 775         return avc_write(fdtv, c, NULL);
 776 }
 777
 778 void avc_remote_ctrl_work(struct work_struct *work)
 779 {
 780         struct firedtv *fdtv =
 781                         container_of(work, struct firedtv, remote_ctrl_work);
 782
 783         /* Should it be rescheduled in failure cases? */
 784         avc_register_remote_control(fdtv);
 785 }
 786
 787 #if 0 /* FIXME: unused */
 788 int avc_tuner_host2ca(struct firedtv *fdtv)
 789 {
 790         char buffer[sizeof(struct avc_command_frame)];
 791         struct avc_command_frame *c = (void *)buffer;
 792         struct avc_response_frame *r = (void *)buffer; /* FIXME: unused */
 793
 794         memset(c, 0, sizeof(*c));
 795
 796         c->ctype   = AVC_CTYPE_CONTROL;
 797         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 798         c->opcode  = AVC_OPCODE_VENDOR;
 799
 800         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
 801         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
 802         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
 803         c->operand[3] = SFE_VENDOR_OPCODE_HOST2CA;
 804         c->operand[4] = 0; /* slot */
 805         c->operand[5] = SFE_VENDOR_TAG_CA_APPLICATION_INFO; /* ca tag */
 806         c->operand[6] = 0; /* more/last */
 807         c->operand[7] = 0; /* length */
 808
 809         c->length = 12;
 810
 811         if (avc_write(fdtv, c, r) < 0)
 812                 return -EIO;
 813
 814         return 0;
 815 }
 816 #endif
 817
 818 static int get_ca_object_pos(struct avc_response_frame *r)
 819 {
 820         int length = 1;
 821
 822         /* Check length of length field */
 823         if (r->operand[7] & 0x80)
 824                 length = (r->operand[7] & 0x7f) + 1;
 825         return length + 7;
 826 }
 827
 828 static int get_ca_object_length(struct avc_response_frame *r)
 829 {
 830 #if 0 /* FIXME: unused */
 831         int size = 0;
 832         int i;
 833
 834         if (r->operand[7] & 0x80)
 835                 for (i = 0; i < (r->operand[7] & 0x7f); i++) {
 836                         size <<= 8;
 837                         size += r->operand[8 + i];
 838                 }
 839 #endif
 840         return r->operand[7];
 841 }
 842
 843 int avc_ca_app_info(struct firedtv *fdtv, char *app_info, unsigned int *len)
 844 {
 845         char buffer[sizeof(struct avc_command_frame)];
 846         struct avc_command_frame *c = (void *)buffer;
 847         struct avc_response_frame *r = (void *)buffer;
 848         int pos;
 849
 850         memset(c, 0, sizeof(*c));
 851
 852         c->ctype   = AVC_CTYPE_STATUS;
 853         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 854         c->opcode  = AVC_OPCODE_VENDOR;
 855
 856         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
 857         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
 858         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
 859         c->operand[3] = SFE_VENDOR_OPCODE_CA2HOST;
 860         c->operand[4] = 0; /* slot */
 861         c->operand[5] = SFE_VENDOR_TAG_CA_APPLICATION_INFO; /* ca tag */
 862
 863         c->length = 12;
 864
 865         if (avc_write(fdtv, c, r) < 0)
 866                 return -EIO;
 867
 868         /* FIXME: check response code and validate response data */
 869
 870         pos = get_ca_object_pos(r);
 871         app_info[0] = (EN50221_TAG_APP_INFO >> 16) & 0xff;
 872         app_info[1] = (EN50221_TAG_APP_INFO >>  8) & 0xff;
 873         app_info[2] = (EN50221_TAG_APP_INFO >>  0) & 0xff;
 874         app_info[3] = 6 + r->operand[pos + 4];
 875         app_info[4] = 0x01;
 876         memcpy(&app_info[5], &r->operand[pos], 5 + r->operand[pos + 4]);
 877         *len = app_info[3] + 4;
 878
 879         return 0;
 880 }
 881
 882 int avc_ca_info(struct firedtv *fdtv, char *app_info, unsigned int *len)
 883 {
 884         char buffer[sizeof(struct avc_command_frame)];
 885         struct avc_command_frame *c = (void *)buffer;
 886         struct avc_response_frame *r = (void *)buffer;
 887         int pos;
 888
 889         memset(c, 0, sizeof(*c));
 890
 891         c->ctype   = AVC_CTYPE_STATUS;
 892         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 893         c->opcode  = AVC_OPCODE_VENDOR;
 894
 895         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
 896         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
 897         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
 898         c->operand[3] = SFE_VENDOR_OPCODE_CA2HOST;
 899         c->operand[4] = 0; /* slot */
 900         c->operand[5] = SFE_VENDOR_TAG_CA_APPLICATION_INFO; /* ca tag */
 901
 902         c->length = 12;
 903
 904         if (avc_write(fdtv, c, r) < 0)
 905                 return -EIO;
 906
 907         pos = get_ca_object_pos(r);
 908         app_info[0] = (EN50221_TAG_CA_INFO >> 16) & 0xff;
 909         app_info[1] = (EN50221_TAG_CA_INFO >>  8) & 0xff;
 910         app_info[2] = (EN50221_TAG_CA_INFO >>  0) & 0xff;
 911         app_info[3] = 2;
 912         app_info[4] = r->operand[pos + 0];
 913         app_info[5] = r->operand[pos + 1];
 914         *len = app_info[3] + 4;
 915
 916         return 0;
 917 }
 918
 919 int avc_ca_reset(struct firedtv *fdtv)
 920 {
 921         char buffer[sizeof(struct avc_command_frame)];
 922         struct avc_command_frame *c = (void *)buffer;
 923         struct avc_response_frame *r = (void *)buffer; /* FIXME: unused */
 924
 925         memset(c, 0, sizeof(*c));
 926
 927         c->ctype   = AVC_CTYPE_CONTROL;
 928         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 929         c->opcode  = AVC_OPCODE_VENDOR;
 930
 931         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
 932         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
 933         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
 934         c->operand[3] = SFE_VENDOR_OPCODE_HOST2CA;
 935         c->operand[4] = 0; /* slot */
 936         c->operand[5] = SFE_VENDOR_TAG_CA_RESET; /* ca tag */
 937         c->operand[6] = 0; /* more/last */
 938         c->operand[7] = 1; /* length */
 939         c->operand[8] = 0; /* force hardware reset */
 940
 941         c->length = 12;
 942
 943         if (avc_write(fdtv, c, r) < 0)
 944                 return -EIO;
 945
 946         return 0;
 947 }
 948
 949 int avc_ca_pmt(struct firedtv *fdtv, char *msg, int length)
 950 {
 951         char buffer[sizeof(struct avc_command_frame)];
 952         struct avc_command_frame *c = (void *)buffer;
 953         struct avc_response_frame *r = (void *)buffer;
 954         int list_management;
 955         int program_info_length;
 956         int pmt_cmd_id;
 957         int read_pos;
 958         int write_pos;
 959         int es_info_length;
 960         int crc32_csum;
 961
 962         memset(c, 0, sizeof(*c));
 963
 964         c->ctype   = AVC_CTYPE_CONTROL;
 965         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
 966         c->opcode  = AVC_OPCODE_VENDOR;
 967
 968         if (msg[0] != EN50221_LIST_MANAGEMENT_ONLY) {
 969                 dev_info(fdtv->device, "forcing list_management to ONLY\n");
 970                 msg[0] = EN50221_LIST_MANAGEMENT_ONLY;
 971         }
 972         /* We take the cmd_id from the programme level only! */
 973         list_management = msg[0];
 974         program_info_length = ((msg[4] & 0x0f) << 8) + msg[5];
 975         if (program_info_length > 0)
 976                 program_info_length--; /* Remove pmt_cmd_id */
 977         pmt_cmd_id = msg[6];
 978
 979         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
 980         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
 981         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
 982         c->operand[3] = SFE_VENDOR_OPCODE_HOST2CA;
 983         c->operand[4] = 0; /* slot */
 984         c->operand[5] = SFE_VENDOR_TAG_CA_PMT; /* ca tag */
 985         c->operand[6] = 0; /* more/last */
 986         /* c->operand[7] = XXXprogram_info_length + 17; */ /* length */
 987         c->operand[8] = list_management;
 988         c->operand[9] = 0x01; /* pmt_cmd=OK_descramble */
 989
 990         /* TS program map table */
 991
 992         c->operand[10] = 0x02; /* Table id=2 */
 993         c->operand[11] = 0x80; /* Section syntax + length */
 994         /* c->operand[12] = XXXprogram_info_length + 12; */
 995         c->operand[13] = msg[1]; /* Program number */
 996         c->operand[14] = msg[2];
 997         c->operand[15] = 0x01; /* Version number=0 + current/next=1 */
 998         c->operand[16] = 0x00; /* Section number=0 */
 999         c->operand[17] = 0x00; /* Last section number=0 */
1000         c->operand[18] = 0x1f; /* PCR_PID=1FFF */
1001         c->operand[19] = 0xff;
1002         c->operand[20] = (program_info_length >> 8); /* Program info length */
1003         c->operand[21] = (program_info_length & 0xff);
1004
1005         /* CA descriptors at programme level */
1006         read_pos = 6;
1007         write_pos = 22;
1008         if (program_info_length > 0) {
1009                 pmt_cmd_id = msg[read_pos++];
1010                 if (pmt_cmd_id != 1 && pmt_cmd_id != 4)
1011                         dev_err(fdtv->device,
1012                                 "invalid pmt_cmd_id %d\n", pmt_cmd_id);
1013
1014                 memcpy(&c->operand[write_pos], &msg[read_pos],
1015                        program_info_length);
1016                 read_pos += program_info_length;
1017                 write_pos += program_info_length;
1018         }
1019         while (read_pos < length) {
1020                 c->operand[write_pos++] = msg[read_pos++];
1021                 c->operand[write_pos++] = msg[read_pos++];
1022                 c->operand[write_pos++] = msg[read_pos++];
1023                 es_info_length =
1024                         ((msg[read_pos] & 0x0f) << 8) + msg[read_pos + 1];
1025                 read_pos += 2;
1026                 if (es_info_length > 0)
1027                         es_info_length--; /* Remove pmt_cmd_id */
1028                 c->operand[write_pos++] = es_info_length >> 8;
1029                 c->operand[write_pos++] = es_info_length & 0xff;
1030                 if (es_info_length > 0) {
1031                         pmt_cmd_id = msg[read_pos++];
1032                         if (pmt_cmd_id != 1 && pmt_cmd_id != 4)
1033                                 dev_err(fdtv->device, "invalid pmt_cmd_id %d "
1034                                         "at stream level\n", pmt_cmd_id);
1035
1036                         memcpy(&c->operand[write_pos], &msg[read_pos],
1037                                es_info_length);
1038                         read_pos += es_info_length;
1039                         write_pos += es_info_length;
1040                 }
1041         }
1042
1043         /* CRC */
1044         c->operand[write_pos++] = 0x00;
1045         c->operand[write_pos++] = 0x00;
1046         c->operand[write_pos++] = 0x00;
1047         c->operand[write_pos++] = 0x00;
1048
1049         c->operand[7] = write_pos - 8;
1050         c->operand[12] = write_pos - 13;
1051
1052         crc32_csum = crc32_be(0, &c->operand[10], c->operand[12] - 1);
1053         c->operand[write_pos - 4] = (crc32_csum >> 24) & 0xff;
1054         c->operand[write_pos - 3] = (crc32_csum >> 16) & 0xff;
1055         c->operand[write_pos - 2] = (crc32_csum >>  8) & 0xff;
1056         c->operand[write_pos - 1] = (crc32_csum >>  0) & 0xff;
1057
1058         c->length = ALIGN(3 + write_pos, 4);
1059
1060         if (avc_write(fdtv, c, r) < 0)
1061                 return -EIO;
1062
1063         if (r->response != AVC_RESPONSE_ACCEPTED) {
1064                 dev_err(fdtv->device,
1065                         "CA PMT failed with response 0x%x\n", r->response);
1066                 return -EFAULT;
1067         }
1068
1069         return 0;
1070 }
1071
1072 int avc_ca_get_time_date(struct firedtv *fdtv, int *interval)
1073 {
1074         char buffer[sizeof(struct avc_command_frame)];
1075         struct avc_command_frame *c = (void *)buffer;
1076         struct avc_response_frame *r = (void *)buffer;
1077
1078         memset(c, 0, sizeof(*c));
1079
1080         c->ctype   = AVC_CTYPE_STATUS;
1081         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
1082         c->opcode  = AVC_OPCODE_VENDOR;
1083
1084         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
1085         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
1086         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
1087         c->operand[3] = SFE_VENDOR_OPCODE_CA2HOST;
1088         c->operand[4] = 0; /* slot */
1089         c->operand[5] = SFE_VENDOR_TAG_CA_DATE_TIME; /* ca tag */
1090         c->operand[6] = 0; /* more/last */
1091         c->operand[7] = 0; /* length */
1092
1093         c->length = 12;
1094
1095         if (avc_write(fdtv, c, r) < 0)
1096                 return -EIO;
1097
1098         /* FIXME: check response code and validate response data */
1099
1100         *interval = r->operand[get_ca_object_pos(r)];
1101
1102         return 0;
1103 }
1104
1105 int avc_ca_enter_menu(struct firedtv *fdtv)
1106 {
1107         char buffer[sizeof(struct avc_command_frame)];
1108         struct avc_command_frame *c = (void *)buffer;
1109         struct avc_response_frame *r = (void *)buffer; /* FIXME: unused */
1110
1111         memset(c, 0, sizeof(*c));
1112
1113         c->ctype   = AVC_CTYPE_STATUS;
1114         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
1115         c->opcode  = AVC_OPCODE_VENDOR;
1116
1117         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
1118         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
1119         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
1120         c->operand[3] = SFE_VENDOR_OPCODE_HOST2CA;
1121         c->operand[4] = 0; /* slot */
1122         c->operand[5] = SFE_VENDOR_TAG_CA_ENTER_MENU;
1123         c->operand[6] = 0; /* more/last */
1124         c->operand[7] = 0; /* length */
1125
1126         c->length = 12;
1127
1128         if (avc_write(fdtv, c, r) < 0)
1129                 return -EIO;
1130
1131         return 0;
1132 }
1133
1134 int avc_ca_get_mmi(struct firedtv *fdtv, char *mmi_object, unsigned int *len)
1135 {
1136         char buffer[sizeof(struct avc_command_frame)];
1137         struct avc_command_frame *c = (void *)buffer;
1138         struct avc_response_frame *r = (void *)buffer;
1139
1140         memset(c, 0, sizeof(*c));
1141
1142         c->ctype   = AVC_CTYPE_STATUS;
1143         c->subunit = AVC_SUBUNIT_TYPE_TUNER | fdtv->subunit;
1144         c->opcode  = AVC_OPCODE_VENDOR;
1145
1146         c->operand[0] = SFE_VENDOR_DE_COMPANYID_0;
1147         c->operand[1] = SFE_VENDOR_DE_COMPANYID_1;
1148         c->operand[2] = SFE_VENDOR_DE_COMPANYID_2;
1149         c->operand[3] = SFE_VENDOR_OPCODE_CA2HOST;
1150         c->operand[4] = 0; /* slot */
1151         c->operand[5] = SFE_VENDOR_TAG_CA_MMI;
1152         c->operand[6] = 0; /* more/last */
1153         c->operand[7] = 0; /* length */
1154
1155         c->length = 12;
1156
1157         if (avc_write(fdtv, c, r) < 0)
1158                 return -EIO;
1159
1160         /* FIXME: check response code and validate response data */
1161
1162         *len = get_ca_object_length(r);
1163         memcpy(mmi_object, &r->operand[get_ca_object_pos(r)], *len);
1164
1165         return 0;
1166 }
1167
1168 #define CMP_OUTPUT_PLUG_CONTROL_REG_0   0xfffff0000904ULL
1169
1170 static int cmp_read(struct firedtv *fdtv, void *buf, u64 addr, size_t len)
1171 {
1172         int ret;
1173
1174         if (mutex_lock_interruptible(&fdtv->avc_mutex))
1175                 return -EINTR;
1176
1177         ret = fdtv->backend->read(fdtv, addr, buf, len);
1178         if (ret < 0)
1179                 dev_err(fdtv->device, "CMP: read I/O error\n");
1180
1181         mutex_unlock(&fdtv->avc_mutex);
1182         return ret;
1183 }
1184
1185 static int cmp_lock(struct firedtv *fdtv, void *data, u64 addr, __be32 arg)
1186 {
1187         int ret;
1188
1189         if (mutex_lock_interruptible(&fdtv->avc_mutex))
1190                 return -EINTR;
1191
1192         ret = fdtv->backend->lock(fdtv, addr, data, arg);
1193         if (ret < 0)
1194                 dev_err(fdtv->device, "CMP: lock I/O error\n");
1195
1196         mutex_unlock(&fdtv->avc_mutex);
1197         return ret;
1198 }
1199
1200 static inline u32 get_opcr(__be32 opcr, u32 mask, u32 shift)
1201 {
1202         return (be32_to_cpu(opcr) >> shift) & mask;
1203 }
1204
1205 static inline void set_opcr(__be32 *opcr, u32 value, u32 mask, u32 shift)
1206 {
1207         *opcr &= ~cpu_to_be32(mask << shift);
1208         *opcr |= cpu_to_be32((value & mask) << shift);
1209 }
1210
1211 #define get_opcr_online(v)              get_opcr((v), 0x1, 31)
1212 #define get_opcr_p2p_connections(v)     get_opcr((v), 0x3f, 24)
1213 #define get_opcr_channel(v)             get_opcr((v), 0x3f, 16)
1214
1215 #define set_opcr_p2p_connections(p, v)  set_opcr((p), (v), 0x3f, 24)
1216 #define set_opcr_channel(p, v)          set_opcr((p), (v), 0x3f, 16)
1217 #define set_opcr_data_rate(p, v)        set_opcr((p), (v), 0x3, 14)
1218 #define set_opcr_overhead_id(p, v)      set_opcr((p), (v), 0xf, 10)
1219
1220 int cmp_establish_pp_connection(struct firedtv *fdtv, int plug, int channel)
1221 {
1222         __be32 old_opcr, opcr;
1223         u64 opcr_address = CMP_OUTPUT_PLUG_CONTROL_REG_0 + (plug << 2);
1224         int attempts = 0;
1225         int ret;
1226
1227         ret = cmp_read(fdtv, &opcr, opcr_address, 4);
1228         if (ret < 0)
1229                 return ret;
1230
1231 repeat:
1232         if (!get_opcr_online(opcr)) {
1233                 dev_err(fdtv->device, "CMP: output offline\n");
1234                 return -EBUSY;
1235         }
1236
1237         old_opcr = opcr;
1238
1239         if (get_opcr_p2p_connections(opcr)) {
1240                 if (get_opcr_channel(opcr) != channel) {
1241                         dev_err(fdtv->device, "CMP: cannot change channel\n");
1242                         return -EBUSY;
1243                 }
1244                 dev_info(fdtv->device, "CMP: overlaying connection\n");
1245
1246                 /* We don't allocate isochronous resources. */
1247         } else {
1248                 set_opcr_channel(&opcr, channel);
1249                 set_opcr_data_rate(&opcr, 2); /* S400 */
1250
1251                 /* FIXME: this is for the worst case - optimize */
1252                 set_opcr_overhead_id(&opcr, 0);
1253
1254                 /*
1255                  * FIXME: allocate isochronous channel and bandwidth at IRM
1256                  * fdtv->backend->alloc_resources(fdtv, channels_mask, bw);
1257                  */
1258         }
1259
1260         set_opcr_p2p_connections(&opcr, get_opcr_p2p_connections(opcr) + 1);
1261
1262         ret = cmp_lock(fdtv, &opcr, opcr_address, old_opcr);
1263         if (ret < 0)
1264                 return ret;
1265
1266         if (old_opcr != opcr) {
1267                 /*
1268                  * FIXME: if old_opcr.P2P_Connections > 0,
1269                  * deallocate isochronous channel and bandwidth at IRM
1270                  * if (...)
1271                  *      fdtv->backend->dealloc_resources(fdtv, channel, bw);
1272                  */
1273
1274                 if (++attempts < 6) /* arbitrary limit */
1275                         goto repeat;
1276                 return -EBUSY;
1277         }
1278
1279         return 0;
1280 }
1281
1282 void cmp_break_pp_connection(struct firedtv *fdtv, int plug, int channel)
1283 {
1284         __be32 old_opcr, opcr;
1285         u64 opcr_address = CMP_OUTPUT_PLUG_CONTROL_REG_0 + (plug << 2);
1286         int attempts = 0;
1287
1288         if (cmp_read(fdtv, &opcr, opcr_address, 4) < 0)
1289                 return;
1290
1291 repeat:
1292         if (!get_opcr_online(opcr) || !get_opcr_p2p_connections(opcr) ||
1293             get_opcr_channel(opcr) != channel) {
1294                 dev_err(fdtv->device, "CMP: no connection to break\n");
1295                 return;
1296         }
1297
1298         old_opcr = opcr;
1299         set_opcr_p2p_connections(&opcr, get_opcr_p2p_connections(opcr) - 1);
1300
1301         if (cmp_lock(fdtv, &opcr, opcr_address, old_opcr) < 0)
1302                 return;
1303
1304         if (old_opcr != opcr) {
1305                 /*
1306                  * FIXME: if old_opcr.P2P_Connections == 1, i.e. we were last
1307                  * owner, deallocate isochronous channel and bandwidth at IRM
1308                  * if (...)
1309                  *      fdtv->backend->dealloc_resources(fdtv, channel, bw);
1310                  */
1311
1312                 if (++attempts < 6) /* arbitrary limit */
1313                         goto repeat;
1314         }
1315 }