module-dvbapi-azbox.c

   1 #define MODULE_LOG_PREFIX "dvbazbox"
   2
   3 #include "globals.h"
   4
   5 #if defined(HAVE_DVBAPI) && defined(WITH_AZBOX)
   6
   7 #include "extapi/openxcas/openxcas_api.h"
   8 #include "extapi/openxcas/openxcas_message.h"
   9
  10 #include "module-dvbapi.h"
  11 #include "module-dvbapi-azbox.h"
  12 #include "oscam-client.h"
  13 #include "oscam-ecm.h"
  14 #include "oscam-reader.h"
  15 #include "oscam-string.h"
  16 #include "oscam-time.h"
  17
  18 // These variables are declared in module-dvbapi.c
  19 extern void *dvbapi_client;
  20 extern DEMUXTYPE demux[MAX_DEMUX];
  21
  22 // These are used in module-dvbapi.c
  23 int32_t openxcas_provid;
  24 uint16_t openxcas_sid, openxcas_caid, openxcas_ecm_pid;
  25
  26 static uint8_t openxcas_cw[16];
  27 static int32_t openxcas_seq, openxcas_filter_idx, openxcas_stream_id, openxcas_cipher_idx, openxcas_busy = 0;
  28 static uint16_t openxcas_video_pid, openxcas_audio_pid, openxcas_data_pid;
  29
  30 static void azbox_openxcas_ecm_callback(int32_t stream_id, uint32_t UNUSED(seq), int32_t cipher_index, uint32_t UNUSED(caid), uint8_t *ecm_data, int32_t l, uint16_t pid)
  31 {
  32         cs_log_dbg(D_DVBAPI, "ecm callback received");
  33
  34         openxcas_stream_id = stream_id;
  35         //openxcas_seq = seq;
  36         //openxcas_caid = caid;
  37         openxcas_ecm_pid = pid;
  38         openxcas_busy = 1;
  39
  40         if(l < 0 || l > MAX_ECM_SIZE)
  41                 { return; }
  42
  43         ECM_REQUEST *er;
  44         if(!(er = get_ecmtask()))
  45                 { return; }
  46
  47         er->srvid = openxcas_sid;
  48         er->caid  = openxcas_caid;
  49         er->pid   = openxcas_ecm_pid;
  50         er->prid  = openxcas_provid;
  51
  52         er->ecmlen = l;
  53         memcpy(er->ecm, ecm_data, er->ecmlen);
  54
  55         request_cw(dvbapi_client, er, 0, 0);
  56
  57         //openxcas_stop_filter(openxcas_stream_id, OPENXCAS_FILTER_ECM);
  58         //openxcas_remove_filter(openxcas_stream_id, OPENXCAS_FILTER_ECM);
  59
  60         openxcas_cipher_idx = cipher_index;
  61
  62         struct timeb tp;
  63         cs_ftime(&tp);
  64         tp.time += 500;
  65 }
  66
  67
  68 static void azbox_openxcas_ex_callback(int32_t stream_id, uint32_t seq, int32_t idx, uint32_t pid, uint8_t *ecm_data, int32_t l)
  69 {
  70         cs_log_dbg(D_DVBAPI, "ex callback received");
  71
  72         openxcas_stream_id = stream_id;
  73         openxcas_ecm_pid = pid;
  74         openxcas_cipher_idx = idx; // is this really cipher_idx?
  75
  76         if(l < 0 || l > MAX_ECM_SIZE)
  77                 { return; }
  78
  79         ECM_REQUEST *er;
  80         if(!(er = get_ecmtask()))
  81                 { return; }
  82
  83         er->srvid = openxcas_sid;
  84         er->caid  = openxcas_caid;
  85         er->pid   = openxcas_ecm_pid;
  86         er->prid  = openxcas_provid;
  87
  88         er->ecmlen = l;
  89         memcpy(er->ecm, ecm_data, er->ecmlen);
  90
  91         request_cw(dvbapi_client, er, 0, 0);
  92
  93         if(openxcas_stop_filter_ex(stream_id, seq, openxcas_filter_idx) < 0)
  94                 { cs_log("unable to stop ex filter"); }
  95         else
  96                 { cs_log_dbg(D_DVBAPI, "ex filter stopped"); }
  97
  98
  99
 100         uint8_t mask[12];
 101         uint8_t comp[12];
 102         memset(&mask, 0x00, sizeof(mask));
 103         memset(&comp, 0x00, sizeof(comp));
 104
 105         mask[0] = 0xff;
 106         comp[0] = ecm_data[0] ^ 1;
 107
 108         if((openxcas_filter_idx = openxcas_start_filter_ex(stream_id, seq, openxcas_ecm_pid, mask, comp, (void *)azbox_openxcas_ex_callback)) < 0)
 109                 { cs_log("unable to start ex filter"); }
 110         else
 111                 { cs_log_dbg(D_DVBAPI, "ex filter started, pid = %x", openxcas_ecm_pid); }
 112 }
 113
 114 static void *azbox_main_thread(void *cli)
 115 {
 116         struct s_client *client = (struct s_client *) cli;
 117         client->thread = pthread_self();
 118         SAFE_SETSPECIFIC(getclient, cli);
 119         dvbapi_client = cli;
 120
 121         struct s_auth *account;
 122         int32_t ok = 0;
 123         for(account = cfg.account; account; account = account->next)
 124         {
 125                 if((ok = is_dvbapi_usr(account->usr)))
 126                         { break; }
 127         }
 128         cs_auth_client(client, ok ? account : (struct s_auth *)(-1), "dvbapi");
 129
 130         dvbapi_read_priority();
 131
 132         openxcas_msg_t msg;
 133         int32_t ret;
 134         while((ret = openxcas_get_message(&msg, 0)) >= 0)
 135         {
 136                 cs_sleepms(10);
 137
 138                 if(ret)
 139                 {
 140                         openxcas_stream_id = msg.stream_id;
 141                         openxcas_seq = msg.sequence;
 142                         struct stOpenXCAS_Data data;
 143
 144                         switch(msg.cmd)
 145                         {
 146                         case OPENXCAS_SELECT_CHANNEL:
 147                                 cs_log_dbg(D_DVBAPI, "OPENXCAS_SELECT_CHANNEL");
 148
 149                                 // parse channel info
 150                                 struct stOpenXCASChannel chan;
 151                                 memcpy(&chan, msg.buf, msg.buf_len);
 152
 153                                 cs_log("channel change: sid = %x, vpid = %x. apid = %x", chan.service_id, chan.v_pid, chan.a_pid);
 154
 155                                 openxcas_video_pid = chan.v_pid;
 156                                 openxcas_audio_pid = chan.a_pid;
 157                                 openxcas_data_pid = chan.d_pid;
 158                                 break;
 159                         case OPENXCAS_START_PMT_ECM:
 160                                 cs_log_dbg(D_DVBAPI, "OPENXCAS_START_PMT_ECM");
 161
 162                                 // parse pmt
 163                                 uint8_t *dest;
 164                                 if(!cs_malloc(&dest, msg.buf_len + 7 - 12 - 4))
 165                                         { break; }
 166
 167                                 memcpy(dest, "\x03\xFF\xFF\x00\x00\x13\x00", 7);
 168
 169                                 dest[1] = msg.buf[3];
 170                                 dest[2] = msg.buf[4];
 171                                 dest[5] = msg.buf[11] + 1;
 172
 173                                 memcpy(dest + 7, msg.buf + 12, msg.buf_len - 12 - 4);
 174
 175                                 dvbapi_parse_capmt(dest, 7 + msg.buf_len - 12 - 4, -1, NULL, 0, 0);
 176                                 NULLFREE(dest);
 177
 178                                 uint8_t mask[12];
 179                                 uint8_t comp[12];
 180                                 memset(&mask, 0x00, sizeof(mask));
 181                                 memset(&comp, 0x00, sizeof(comp));
 182
 183                                 mask[0] = 0xfe;
 184                                 comp[0] = 0x80;
 185
 186                                 if((ret = openxcas_add_filter(msg.stream_id, OPENXCAS_FILTER_ECM, 0, 0xffff, openxcas_ecm_pid, mask, comp, (void *)azbox_openxcas_ecm_callback)) < 0)
 187                                         { cs_log("unable to add ecm filter"); }
 188                                 else
 189                                         { cs_log_dbg(D_DVBAPI, "ecm filter added, pid = %x, caid = %x", openxcas_ecm_pid, 0); }
 190
 191                                 if(openxcas_start_filter(msg.stream_id, msg.sequence, OPENXCAS_FILTER_ECM) < 0)
 192                                         { cs_log("unable to start ecm filter"); }
 193                                 else
 194                                         { cs_log_dbg(D_DVBAPI, "ecm filter started"); }
 195
 196                                 if(!openxcas_create_cipher_ex(msg.stream_id, openxcas_seq, 0, openxcas_ecm_pid, openxcas_video_pid, 0xffff, openxcas_audio_pid, 0xffff, 0xffff, 0xffff))
 197                                         { cs_log("failed to create cipher ex"); }
 198                                 else
 199                                         { cs_log_dbg(D_DVBAPI, "cipher created"); }
 200                                 break;
 201                         case OPENXCAS_STOP_PMT_ECM:
 202                                 cs_log_dbg(D_DVBAPI, "OPENXCAS_STOP_PMT_ECM");
 203                                 openxcas_stop_filter(msg.stream_id, OPENXCAS_FILTER_ECM);
 204                                 openxcas_remove_filter(msg.stream_id, OPENXCAS_FILTER_ECM);
 205                                 openxcas_stop_filter_ex(msg.stream_id, msg.sequence, openxcas_filter_idx);
 206                                 openxcas_destory_cipher_ex(msg.stream_id, msg.sequence);
 207                                 memset(&demux, 0, sizeof(demux));
 208                                 break;
 209                         case OPENXCAS_ECM_CALLBACK:
 210                                 cs_log_dbg(D_DVBAPI, "OPENXCAS_ECM_CALLBACK");
 211                                 memcpy(&data, msg.buf, msg.buf_len);
 212                                 if(!openxcas_busy)
 213                                         { openxcas_filter_callback(msg.stream_id, msg.sequence, OPENXCAS_FILTER_ECM, &data); }
 214                                 break;
 215                         case OPENXCAS_PID_FILTER_CALLBACK:
 216                                 cs_log_dbg(D_DVBAPI, "OPENXCAS_PID_FILTER_CALLBACK");
 217                                 memcpy(&data, msg.buf, msg.buf_len);
 218                                 openxcas_filter_callback_ex(msg.stream_id, msg.sequence, &data);
 219                                 break;
 220                         case OPENXCAS_QUIT:
 221                                 cs_log_dbg(D_DVBAPI, "OPENXCAS_QUIT");
 222                                 openxcas_close();
 223                                 cs_log("exited");
 224                                 return NULL;
 225                                 break;
 226                         case OPENXCAS_UKNOWN_MSG:
 227                         default:
 228                                 cs_log_dbg(D_DVBAPI, "OPENXCAS_UKNOWN_MSG (%d)", msg.cmd);
 229                                 //cs_log_dump_dbg(D_DVBAPI, &msg, sizeof(msg), "msg dump:");
 230                                 break;
 231                         }
 232                 }
 233         }
 234         cs_log("invalid message");
 235         return NULL;
 236 }
 237
 238 void azbox_send_dcw(struct s_client *client, ECM_REQUEST *er)
 239 {
 240         struct s_dvbapi_priority *delayentry = dvbapi_check_prio_match(0, demux[0].pidindex, 'd');
 241         uint32_t delay = 0;
 242
 243         cs_log_dbg(D_DVBAPI, "send_dcw");
 244
 245         if(delayentry)
 246         {
 247                 if(delayentry->delay < 1000)
 248                 {
 249                         delay = delayentry->delay;
 250                         cs_log_dbg(D_DVBAPI, "specific delay: write cw %d ms after ecmrequest", delay);
 251                 }
 252         }
 253         else if (cfg.dvbapi_delayer > 0)
 254         {
 255                 delay = cfg.dvbapi_delayer;
 256                 cs_log_dbg(D_DVBAPI, "generic delay: write cw %d ms after ecmrequest", delay);
 257         }
 258
 259         delayer(er, delay);
 260
 261         if(cfg.dvbapi_ecminfo_file != 0)
 262         {
 263                 dvbapi_write_ecminfo_file(client, er, demux[0].last_cw[0][0], demux[0].last_cw[0][1], 8);
 264         }
 265
 266         openxcas_busy = 0;
 267
 268         int32_t i;
 269         for(i = 0; i < MAX_DEMUX; i++)
 270         {
 271                 if(er->rc >= E_NOTFOUND)
 272                 {
 273                         cs_log_dbg(D_DVBAPI, "cw not found");
 274
 275                         if(demux[i].pidindex == -1)
 276                                 { dvbapi_try_next_caid(i, 0, 0); }
 277
 278                         openxcas_stop_filter(openxcas_stream_id, OPENXCAS_FILTER_ECM);
 279                         openxcas_remove_filter(openxcas_stream_id, OPENXCAS_FILTER_ECM);
 280
 281                         uint8_t mask[12];
 282                         uint8_t comp[12];
 283                         memset(&mask, 0x00, sizeof(mask));
 284                         memset(&comp, 0x00, sizeof(comp));
 285
 286                         mask[0] = 0xfe;
 287                         comp[0] = 0x80;
 288
 289                         if(openxcas_add_filter(openxcas_stream_id, OPENXCAS_FILTER_ECM, 0, 0xffff, openxcas_ecm_pid, mask, comp, (void *)azbox_openxcas_ecm_callback) < 0)
 290                         {
 291                                 cs_log("unable to add ecm filter (0)");
 292                                 if(openxcas_add_filter(openxcas_stream_id, OPENXCAS_FILTER_ECM, openxcas_caid, 0xffff, openxcas_ecm_pid, mask, comp, (void *)azbox_openxcas_ecm_callback) < 0)
 293                                         { cs_log("unable to add ecm filter (%04x)", openxcas_caid); }
 294                                 else
 295                                         { cs_log_dbg(D_DVBAPI, "ecm filter added, pid = %x, caid = %x", openxcas_ecm_pid, openxcas_caid); }
 296                         }
 297                         else
 298                                 { cs_log_dbg(D_DVBAPI, "ecm filter added, pid = %x, caid = %x", openxcas_ecm_pid, 0); }
 299
 300                         if(openxcas_start_filter(openxcas_stream_id, openxcas_seq, OPENXCAS_FILTER_ECM) < 0)
 301                                 { cs_log("unable to start ecm filter"); }
 302                         else
 303                                 { cs_log_dbg(D_DVBAPI, "ecm filter started"); }
 304
 305                         return;
 306                 }
 307         }
 308
 309         uint8_t nullcw[8];
 310         memset(nullcw, 0, 8);
 311
 312         int32_t n;
 313         for(n = 0; n < 2; n++)
 314         {
 315                 // Skip check for BISS1 - cw could be indeed zero
 316                 // Skip check for BISS2 - we use the extended cw, so the "simple" cw is always zero
 317                 if(memcmp(er->cw + (n * 8), demux[0].last_cw[0][n], 8) && (memcmp(er->cw + (n * 8), nullcw, 8) != 0 || caid_is_biss(er->caid)))
 318                 {
 319                         memcpy(demux[0].last_cw[0][n], er->cw + (n * 8), 8);
 320                         memcpy(openxcas_cw + (n * 8), er->cw + (n * 8), 8);
 321                 }
 322         }
 323
 324         if(openxcas_set_key(openxcas_stream_id, openxcas_seq, 0, openxcas_cipher_idx, openxcas_cw, openxcas_cw + 8) != 1)
 325                 { cs_log("set cw failed"); }
 326         else
 327                 { cs_log_dump_dbg(D_DVBAPI, openxcas_cw, 16, "write cws to descrambler"); }
 328 }
 329
 330 #ifdef WITH_CARDREADER
 331 #define __openxcas_open openxcas_open_with_smartcard
 332 #else
 333 #define __openxcas_open openxcas_open
 334 #endif
 335
 336 void azbox_init(void)
 337 {
 338         openxcas_debug_message_onoff(1);  // debug
 339         if(__openxcas_open("oscamCAS") < 0)
 340                 { cs_log("could not init"); }
 341 }
 342
 343 void azbox_close(void)
 344 {
 345         if(openxcas_close() < 0)
 346                 { cs_log("could not close"); }
 347 }
 348
 349 void *azbox_handler(struct s_client *cl, uint8_t *mbuf, int32_t module_idx)
 350 {
 351         return dvbapi_start_handler(cl, mbuf, module_idx, azbox_main_thread);
 352 }
 353
 354 #endif