add ability to selecte the audio channel (mono left, stereo, mono right) from python
[vuplus_dvbapp] / lib / dvb / pmt.cpp
1 #include <lib/base/eerror.h>
2 #include <lib/dvb/pmt.h>
3 #include <lib/dvb/specs.h>
4 #include <lib/dvb/dvb.h>
5 #include <lib/dvb/metaparser.h>
6 #include <lib/dvb_ci/dvbci.h>
7 #include <lib/dvb/epgcache.h>
8 #include <lib/dvb/scan.h>
9 #include <dvbsi++/ca_descriptor.h>
10 #include <dvbsi++/ca_program_map_section.h>
11 #include <dvbsi++/teletext_descriptor.h>
12 #include <dvbsi++/descriptor_tag.h>
13 #include <dvbsi++/iso639_language_descriptor.h>
14 #include <dvbsi++/stream_identifier_descriptor.h>
15
16 eDVBServicePMTHandler::eDVBServicePMTHandler()
17         :m_ca_servicePtr(0), m_dvb_scan(0), m_decode_demux_num(0xFF)
18 {
19         m_use_decode_demux = 0;
20         m_pmt_pid = -1;
21         eDVBResourceManager::getInstance(m_resourceManager);
22         CONNECT(m_PMT.tableReady, eDVBServicePMTHandler::PMTready);
23         CONNECT(m_PAT.tableReady, eDVBServicePMTHandler::PATready);
24 }
25
26 eDVBServicePMTHandler::~eDVBServicePMTHandler()
27 {
28         free();
29 }
30
31 void eDVBServicePMTHandler::channelStateChanged(iDVBChannel *channel)
32 {
33         int state;
34         channel->getState(state);
35         
36         if ((m_last_channel_state != iDVBChannel::state_ok)
37                 && (state == iDVBChannel::state_ok) && (!m_demux))
38         {
39                 if (m_channel)
40                         if (m_channel->getDemux(m_demux, (!m_use_decode_demux) ? 0 : iDVBChannel::capDecode))
41                                 eDebug("Allocating %s-decoding a demux for now tuned-in channel failed.", m_use_decode_demux ? "" : "non-");
42                 
43                 serviceEvent(eventTuned);
44                 
45                 if (m_demux)
46                 {
47                         eDebug("ok ... now we start!!");
48
49                         if (m_pmt_pid == -1)
50                                 m_PAT.begin(eApp, eDVBPATSpec(), m_demux);
51                         else
52                                 m_PMT.begin(eApp, eDVBPMTSpec(m_pmt_pid, m_reference.getServiceID().get()), m_demux);
53
54                         if ( m_service && !m_service->cacheEmpty() )
55                                 serviceEvent(eventNewProgramInfo);
56                 }
57         } else if ((m_last_channel_state != iDVBChannel::state_failed) && 
58                         (state == iDVBChannel::state_failed))
59         {
60                 eDebug("tune failed.");
61                 serviceEvent(eventTuneFailed);
62         }
63 }
64
65 void eDVBServicePMTHandler::channelEvent(iDVBChannel *channel, int event)
66 {
67         switch (event)
68         {
69         case iDVBChannel::evtEOF:
70                 serviceEvent(eventEOF);
71                 break;
72         case iDVBChannel::evtSOF:
73                 serviceEvent(eventSOF);
74                 break;
75         default:
76                 break;
77         }
78 }
79
80 void eDVBServicePMTHandler::PMTready(int error)
81 {
82         if (error)
83                 serviceEvent(eventNoPMT);
84         else
85         {
86                 serviceEvent(eventNewProgramInfo);
87                 eEPGCache::getInstance()->PMTready(this);
88                 if (!m_pvr_channel)
89                 {
90                         if(!m_ca_servicePtr)   // don't send campmt to camd.socket for playbacked services
91                         {
92                                 int demuxes[2] = {0,0};
93                                 uint8_t tmp;
94                                 m_demux->getCADemuxID(tmp);
95                                 demuxes[0]=tmp;
96                                 if (m_decode_demux_num != 0xFF)
97                                         demuxes[1]=m_decode_demux_num;
98                                 else
99                                         demuxes[1]=demuxes[0];
100                                 eDVBCAService::register_service(m_reference, demuxes, m_ca_servicePtr);
101                                 eDVBCIInterfaces::getInstance()->addPMTHandler(this);
102                         }
103                         eDVBCIInterfaces::getInstance()->gotPMT(this);
104                 }
105                 if (m_ca_servicePtr)
106                 {
107                         ePtr<eTable<ProgramMapSection> > ptr;
108                         if (!m_PMT.getCurrent(ptr))
109                                 m_ca_servicePtr->buildCAPMT(ptr);
110                         else
111                                 eDebug("eDVBServicePMTHandler cannot call buildCAPMT");
112                 }
113         }
114 }
115
116 void eDVBServicePMTHandler::PATready(int)
117 {
118         ePtr<eTable<ProgramAssociationSection> > ptr;
119         if (!m_PAT.getCurrent(ptr))
120         {
121                 int pmtpid = -1;
122                 std::vector<ProgramAssociationSection*>::const_iterator i;
123                 for (i = ptr->getSections().begin(); i != ptr->getSections().end(); ++i)
124                 {
125                         const ProgramAssociationSection &pat = **i;
126                         ProgramAssociationConstIterator program;
127                         for (program = pat.getPrograms()->begin(); program != pat.getPrograms()->end(); ++program)
128                                 if (eServiceID((*program)->getProgramNumber()) == m_reference.getServiceID())
129                                         pmtpid = (*program)->getProgramMapPid();
130                 }
131                 if (pmtpid == -1)
132                         serviceEvent(eventNoPATEntry);
133                 else
134                         m_PMT.begin(eApp, eDVBPMTSpec(pmtpid, m_reference.getServiceID().get()), m_demux);
135         } else
136                 serviceEvent(eventNoPAT);
137 }
138
139 PyObject *eDVBServicePMTHandler::getCaIds()
140 {
141         PyObject *ret=0;
142
143         ePtr<eTable<ProgramMapSection> > ptr;
144
145         if ( ((m_service && m_service->usePMT()) || !m_service) && !m_PMT.getCurrent(ptr))
146         {
147                 uint16_t caids[255];
148                 memset(caids, 0, sizeof(caids));
149                 std::vector<ProgramMapSection*>::const_iterator i = ptr->getSections().begin();
150                 for (; i != ptr->getSections().end(); ++i)
151                 {
152                         const ProgramMapSection &pmt = **i;
153                         ElementaryStreamInfoConstIterator es = pmt.getEsInfo()->begin();
154                         for (; es != pmt.getEsInfo()->end(); ++es)
155                         {
156                                 for (DescriptorConstIterator desc = (*es)->getDescriptors()->begin();
157                                                 desc != (*es)->getDescriptors()->end(); ++desc)
158                                 {
159                                         switch ((*desc)->getTag())
160                                         {
161                                                 case CA_DESCRIPTOR:
162                                                 {
163                                                         const CaDescriptor *cadescr = (const CaDescriptor*)*desc;
164                                                         uint16_t caid = cadescr->getCaSystemId();
165                                                         int idx=0;
166                                                         while (caids[idx] && caids[idx] != caid)
167                                                                 ++idx;
168                                                         caids[idx]=caid;
169                                                         break;
170                                                 }
171                                         }
172                                 }
173                         }
174                         for (DescriptorConstIterator desc = pmt.getDescriptors()->begin();
175                                 desc != pmt.getDescriptors()->end(); ++desc)
176                         {
177                                 switch ((*desc)->getTag())
178                                 {
179                                         case CA_DESCRIPTOR:
180                                         {
181                                                 const CaDescriptor *cadescr = (const CaDescriptor*)*desc;
182                                                 uint16_t caid = cadescr->getCaSystemId();
183                                                 int idx=0;
184                                                 while (caids[idx] && caids[idx] != caid)
185                                                         ++idx;
186                                                 caids[idx]=caid;
187                                                 break;
188                                         }
189                                 }
190                         }
191                 }
192                 int cnt=0;
193                 while (caids[cnt])
194                         ++cnt;
195                 if (cnt)
196                 {
197                         ret=PyList_New(cnt);
198                         while(cnt--)
199                                 PyList_SET_ITEM(ret, cnt, PyInt_FromLong(caids[cnt]));
200                 }
201         }
202
203         if (!ret)
204                 ret=PyList_New(0);
205
206         return ret;
207 }
208
209 int eDVBServicePMTHandler::getProgramInfo(struct program &program)
210 {
211         ePtr<eTable<ProgramMapSection> > ptr;
212
213         program.videoStreams.clear();
214         program.audioStreams.clear();
215         program.pcrPid = -1;
216         program.isCrypted = false;
217         program.pmtPid = -1;
218         program.textPid = -1;
219         program.audioChannel = m_service ? m_service->getCacheEntry(eDVBService::cACHANNEL) : -1;
220
221         if ( ((m_service && m_service->usePMT()) || !m_service) && !m_PMT.getCurrent(ptr))
222         {
223                 int cached_apid_ac3 = -1;
224                 int cached_apid_mpeg = -1;
225                 int cached_vpid = -1;
226                 int cached_tpid = -1;
227                 if ( m_service && !m_service->cacheEmpty() )
228                 {
229                         cached_vpid = m_service->getCacheEntry(eDVBService::cVPID);
230                         cached_apid_mpeg = m_service->getCacheEntry(eDVBService::cAC3PID);
231                         cached_apid_ac3 = m_service->getCacheEntry(eDVBService::cAPID);
232                         cached_tpid = m_service->getCacheEntry(eDVBService::cTPID);
233                 }
234                 eDVBTableSpec table_spec;
235                 ptr->getSpec(table_spec);
236                 program.pmtPid = table_spec.pid < 0x1fff ? table_spec.pid : -1;
237                 std::vector<ProgramMapSection*>::const_iterator i;
238                 for (i = ptr->getSections().begin(); i != ptr->getSections().end(); ++i)
239                 {
240                         const ProgramMapSection &pmt = **i;
241                         program.pcrPid = pmt.getPcrPid();
242                         
243                         ElementaryStreamInfoConstIterator es;
244                         for (es = pmt.getEsInfo()->begin(); es != pmt.getEsInfo()->end(); ++es)
245                         {
246                                 int isaudio = 0, isvideo = 0, cadescriptors = 0;
247                                 videoStream video;
248                                 audioStream audio;
249                                 audio.component_tag=-1;
250                                 video.component_tag=-1;
251
252                                 video.pid = (*es)->getPid();
253                                 audio.pid = (*es)->getPid();
254                                 video.type = videoStream::vtMPEG2;
255
256                                 switch ((*es)->getType())
257                                 {
258                                 case 0x1b: // AVC Video Stream (MPEG4 H264)
259                                         video.type = videoStream::vtMPEG4_H264;
260                                 case 0x01: // MPEG 1 video
261                                 case 0x02: // MPEG 2 video
262                                         isvideo = 1;
263                                         //break; fall through !!!
264                                 case 0x03: // MPEG 1 audio
265                                 case 0x04: // MPEG 2 audio:
266                                         if (!isvideo)
267                                         {
268                                                 isaudio = 1;
269                                                 audio.type = audioStream::atMPEG;
270                                         }
271                                         //break; fall through !!!
272                                 case 0x06: // PES Private
273                                                 /* PES private can contain AC-3, DTS or lots of other stuff.
274                                                    check descriptors to get the exact type. */
275                                         for (DescriptorConstIterator desc = (*es)->getDescriptors()->begin();
276                                                         desc != (*es)->getDescriptors()->end(); ++desc)
277                                         {
278                                                 switch ((*desc)->getTag())
279                                                 {
280                                                 case TELETEXT_DESCRIPTOR:
281                                                         if ( program.textPid == -1 || (*es)->getPid() == cached_tpid )
282                                                                 program.textPid = (*es)->getPid();
283                                                         break;
284                                                 case DTS_DESCRIPTOR:
285                                                         if (!isvideo)
286                                                         {
287                                                                 isaudio = 1;
288                                                                 audio.type = audioStream::atDTS;
289                                                         }
290                                                         break;
291                                                 case AC3_DESCRIPTOR:
292                                                         if (!isvideo)
293                                                         {
294                                                                 isaudio = 1;
295                                                                 audio.type = audioStream::atAC3;
296                                                         }
297                                                         break;
298                                                 case ISO_639_LANGUAGE_DESCRIPTOR:
299                                                         if (!isvideo)
300                                                         {
301                                                                 const Iso639LanguageList *languages = ((Iso639LanguageDescriptor*)*desc)->getIso639Languages();
302                                                                         /* use last language code */
303                                                                 for (Iso639LanguageConstIterator i(languages->begin()); i != languages->end(); ++i)
304                                                                         audio.language_code = (*i)->getIso639LanguageCode();
305                                                         }
306                                                         break;
307                                                 case STREAM_IDENTIFIER_DESCRIPTOR:
308                                                         audio.component_tag =
309                                                                 video.component_tag =
310                                                                         ((StreamIdentifierDescriptor*)*desc)->getComponentTag();
311                                                         break;
312                                                 case CA_DESCRIPTOR:
313                                                         ++cadescriptors;
314                                                         break;
315                                                 }
316                                         }
317                                         break;
318                                 }
319                                 if (isaudio)
320                                 {
321                                         if ( !program.audioStreams.empty() &&
322                                                 ( audio.pid == cached_apid_ac3 || audio.pid == cached_apid_mpeg) )
323                                         {
324                                                 program.audioStreams.push_back(program.audioStreams[0]);
325                                                 program.audioStreams[0] = audio;
326                                         }
327                                         else
328                                                 program.audioStreams.push_back(audio);
329                                 }
330                                 else if (isvideo)
331                                 {
332                                         if ( !program.videoStreams.empty() && video.pid == cached_vpid )
333                                         {
334                                                 program.videoStreams.push_back(program.videoStreams[0]);
335                                                 program.videoStreams[0] = video;
336                                         }
337                                         else
338                                                 program.videoStreams.push_back(video);
339                                 }
340                                 else
341                                         continue;
342                                 if ( cadescriptors > 0 )
343                                         program.isCrypted=true;
344                         }
345                         if ( !program.isCrypted )
346                         {
347                                 for (DescriptorConstIterator desc = pmt.getDescriptors()->begin();
348                                         desc != pmt.getDescriptors()->end(); ++desc)
349                                 {
350                                         switch ((*desc)->getTag())
351                                         {
352                                         case CA_DESCRIPTOR:
353                                                 program.isCrypted=true;
354                                                 break;
355                                         }
356                                 }
357                                 break;
358                         }
359                 }
360                 return 0;
361         } else if ( m_service && !m_service->cacheEmpty() )
362         {
363                 int vpid = m_service->getCacheEntry(eDVBService::cVPID),
364                         apid_ac3 = m_service->getCacheEntry(eDVBService::cAC3PID),
365                         apid_mpeg = m_service->getCacheEntry(eDVBService::cAPID),
366                         pcrpid = m_service->getCacheEntry(eDVBService::cPCRPID),
367                         tpid = m_service->getCacheEntry(eDVBService::cTPID),
368                         vpidtype = m_service->getCacheEntry(eDVBService::cVTYPE),
369                         cnt=0;
370                 if ( vpidtype == -1 )
371                         vpidtype = videoStream::vtMPEG2;
372                 if ( vpid != -1 )
373                 {
374                         videoStream s;
375                         s.pid = vpid;
376                         s.type = vpidtype;
377                         program.videoStreams.push_back(s);
378                         ++cnt;
379                 }
380                 if ( apid_ac3 != -1 )
381                 {
382                         audioStream s;
383                         s.type = audioStream::atAC3;
384                         s.pid = apid_ac3;
385                         program.audioStreams.push_back(s);
386                         ++cnt;
387                 }
388                 if ( apid_mpeg != -1 )
389                 {
390                         audioStream s;
391                         s.type = audioStream::atMPEG;
392                         s.pid = apid_mpeg;
393                         program.audioStreams.push_back(s);
394                         ++cnt;
395                 }
396                 if ( pcrpid != -1 )
397                 {
398                         ++cnt;
399                         program.pcrPid = pcrpid;
400                 }
401                 if ( tpid != -1 )
402                 {
403                         ++cnt;
404                         program.textPid = tpid;
405                 }
406                 if ( cnt )
407                         return 0;
408         }
409         return -1;
410 }
411
412 int eDVBServicePMTHandler::getChannel(eUsePtr<iDVBChannel> &channel)
413 {
414         channel = m_channel;
415         if (channel)
416                 return 0;
417         else
418                 return -1;
419 }
420
421 int eDVBServicePMTHandler::getDataDemux(ePtr<iDVBDemux> &demux)
422 {
423         demux = m_demux;
424         if (demux)
425                 return 0;
426         else
427                 return -1;
428 }
429
430 int eDVBServicePMTHandler::getDecodeDemux(ePtr<iDVBDemux> &demux)
431 {
432         int ret=0;
433                 /* if we're using the decoding demux as data source
434                    (for example in pvr playbacks), return that one. */
435         if (m_use_decode_demux)
436         {
437                 demux = m_demux;
438                 return ret;
439         }
440         
441         ASSERT(m_channel); /* calling without a previous ::tune is certainly bad. */
442
443         ret = m_channel->getDemux(demux, iDVBChannel::capDecode);
444         if (!ret)
445                 demux->getCADemuxID(m_decode_demux_num);
446
447         return ret;
448 }
449
450 int eDVBServicePMTHandler::getPVRChannel(ePtr<iDVBPVRChannel> &pvr_channel)
451 {
452         pvr_channel = m_pvr_channel;
453         if (pvr_channel)
454                 return 0;
455         else
456                 return -1;
457 }
458
459 void eDVBServicePMTHandler::SDTScanEvent(int event)
460 {
461         switch (event)
462         {
463                 case eDVBScan::evtFinish:
464                 {
465                         ePtr<iDVBChannelList> db;
466                         if (m_resourceManager->getChannelList(db) != 0)
467                                 eDebug("no channel list");
468                         else
469                         {
470                                 m_dvb_scan->insertInto(db);
471                                 eDebug("sdt update done!");
472                         }
473                         break;
474                 }
475
476                 default:
477                         break;
478         }
479 }
480
481 int eDVBServicePMTHandler::tune(eServiceReferenceDVB &ref, int use_decode_demux, eCueSheet *cue)
482 {
483         RESULT res;
484         m_reference = ref;
485         
486         m_use_decode_demux = use_decode_demux;
487         
488                 /* is this a normal (non PVR) channel? */
489         if (ref.path.empty())
490         {
491                 eDVBChannelID chid;
492                 ref.getChannelID(chid);
493                 res = m_resourceManager->allocateChannel(chid, m_channel);
494                 eDebug("allocate Channel: res %d", res);
495         } else
496         {
497                 eDVBMetaParser parser;
498                 
499                 if (parser.parseFile(ref.path))
500                 {
501                         eWarning("no .meta file found, trying to find PMT pid");
502                         eDVBTSTools tstools;
503                         if (tstools.openFile(ref.path.c_str()))
504                                 eWarning("failed to open file");
505                         else
506                         {
507                                 int service_id, pmt_pid;
508                                 if (!tstools.findPMT(pmt_pid, service_id))
509                                 {
510                                         eDebug("PMT pid found on pid %04x, service id %d", pmt_pid, service_id);
511                                         m_reference.setServiceID(service_id);
512                                         m_pmt_pid = pmt_pid;
513                                 }
514                         }
515                 } else
516                         m_reference = parser.m_ref;
517                 
518                 eDebug("alloc PVR");
519                         /* allocate PVR */
520                 res = m_resourceManager->allocatePVRChannel(m_pvr_channel);
521                 if (res)
522                         eDebug("allocatePVRChannel failed!\n");
523                 m_channel = m_pvr_channel;
524         }
525
526         ePtr<iDVBChannelList> db;
527         if (!m_resourceManager->getChannelList(db))
528                 db->getService((eServiceReferenceDVB&)m_reference, m_service);
529
530         if (m_channel)
531         {
532                 m_channel->connectStateChange(
533                         slot(*this, &eDVBServicePMTHandler::channelStateChanged), 
534                         m_channelStateChanged_connection);
535                 m_last_channel_state = -1;
536                 channelStateChanged(m_channel);
537
538                 m_channel->connectEvent(
539                         slot(*this, &eDVBServicePMTHandler::channelEvent), 
540                         m_channelEvent_connection);
541
542                 if (ref.path.empty())
543                 {
544                         delete m_dvb_scan;
545                         m_dvb_scan = new eDVBScan(m_channel);
546                         m_dvb_scan->connectEvent(slot(*this, &eDVBServicePMTHandler::SDTScanEvent), m_scan_event_connection);
547                 }
548         } else
549         {
550                 serviceEvent(eventTuneFailed);
551                 return res;
552         }
553
554         if (m_pvr_channel)
555         {
556                 m_pvr_channel->setCueSheet(cue);
557                 m_pvr_channel->playFile(ref.path.c_str());
558         }
559
560         return res;
561 }
562
563 void eDVBServicePMTHandler::free()
564 {
565         eDVBScan *tmp = m_dvb_scan;  // do a copy on stack (recursive call of free()) !!!
566         m_dvb_scan = 0;
567         delete m_dvb_scan;
568
569         if (m_ca_servicePtr)
570         {
571                 int demuxes[2] = {0,0};
572                 uint8_t tmp;
573                 m_demux->getCADemuxID(tmp);
574                 demuxes[0]=tmp;
575                 if (m_decode_demux_num != 0xFF)
576                         demuxes[1]=m_decode_demux_num;
577                 else
578                         demuxes[1]=demuxes[0];
579                 ePtr<eTable<ProgramMapSection> > ptr;
580                 m_PMT.getCurrent(ptr);
581                 eDVBCAService::unregister_service(m_reference, demuxes, ptr);
582                 eDVBCIInterfaces::getInstance()->removePMTHandler(this);
583                 m_ca_servicePtr = 0;
584         }
585
586         if (m_pvr_channel)
587         {
588                 m_pvr_channel->stopFile();
589                 m_pvr_channel->setCueSheet(0);
590         }
591         m_PMT.stop();
592         m_PAT.stop();
593         m_service = 0;
594         m_channel = 0;
595         m_pvr_channel = 0;
596         m_demux = 0;
597 }
598
599 std::map<eServiceReferenceDVB, eDVBCAService*> eDVBCAService::exist;
600
601 eDVBCAService::eDVBCAService()
602         :m_prev_build_hash(0), m_sendstate(0), m_retryTimer(eApp)
603 {
604         memset(m_used_demux, 0xFF, sizeof(m_used_demux));
605         CONNECT(m_retryTimer.timeout, eDVBCAService::sendCAPMT);
606         Connect();
607 }
608
609 eDVBCAService::~eDVBCAService()
610 {
611         eDebug("[eDVBCAService] free service %s", m_service.toString().c_str());
612         ::close(m_sock);
613 }
614
615 RESULT eDVBCAService::register_service( const eServiceReferenceDVB &ref, int demux_nums[2], eDVBCAService *&caservice )
616 {
617         CAServiceMap::iterator it = exist.find(ref);
618         if ( it != exist.end() )
619                 caservice = it->second;
620         else
621         {
622                 caservice = (exist[ref]=new eDVBCAService());
623                 caservice->m_service = ref;
624                 eDebug("[eDVBCAService] new service %s", ref.toString().c_str() );
625         }
626
627         int loops = demux_nums[0] != demux_nums[1] ? 2 : 1;
628         for (int i=0; i < loops; ++i)
629         {
630 // search free demux entry
631                 int iter=0, max_demux_slots = sizeof(caservice->m_used_demux);
632
633                 while ( iter < max_demux_slots && caservice->m_used_demux[iter] != 0xFF )
634                         ++iter;
635
636                 if ( iter < max_demux_slots )
637                 {
638                         caservice->m_used_demux[iter] = demux_nums[i] & 0xFF;
639                         eDebug("[eDVBCAService] add demux %d to slot %d service %s", caservice->m_used_demux[iter], iter, ref.toString().c_str());
640                 }
641                 else
642                 {
643                         eDebug("[eDVBCAService] no more demux slots free for service %s!!", ref.toString().c_str());
644                         return -1;
645                 }
646         }
647         return 0;
648 }
649
650 RESULT eDVBCAService::unregister_service( const eServiceReferenceDVB &ref, int demux_nums[2], eTable<ProgramMapSection> *ptr )
651 {
652         CAServiceMap::iterator it = exist.find(ref);
653         if ( it == exist.end() )
654         {
655                 eDebug("[eDVBCAService] try to unregister non registered %s", ref.toString().c_str());
656                 return -1;
657         }
658         else
659         {
660                 eDVBCAService *caservice = it->second;
661                 int loops = demux_nums[0] != demux_nums[1] ? 2 : 1;
662                 for (int i=0; i < loops; ++i)
663                 {
664                         bool freed = false;
665                         int iter = 0,
666                                 used_demux_slots = 0,
667                                 max_demux_slots = sizeof(caservice->m_used_demux)/sizeof(int);
668                         while ( iter < max_demux_slots )
669                         {
670                                 if ( caservice->m_used_demux[iter] != 0xFF )
671                                 {
672                                         if ( !freed && caservice->m_used_demux[iter] == demux_nums[i] )
673                                         {
674                                                 eDebug("[eDVBCAService] free slot %d demux %d for service %s", iter, caservice->m_used_demux[iter], caservice->m_service.toString().c_str() );
675                                                 caservice->m_used_demux[iter] = 0xFF;
676                                                 freed=true;
677                                         }
678                                         else
679                                                 ++used_demux_slots;
680                                 }
681                                 ++iter;
682                         }
683                         if (!freed)
684                                 eDebug("[eDVBCAService] couldn't free demux slot for demux %d", demux_nums[i]);
685                         if (i || loops == 1)
686                         {
687                                 if (!used_demux_slots)  // no more used.. so we remove it
688                                 {
689                                         delete it->second;
690                                         exist.erase(it);
691                                 }
692                                 else
693                                 {
694                                         if (ptr)
695                                                 it->second->buildCAPMT(ptr);
696                                         else
697                                                 eDebug("[eDVBCAService] can not send updated demux info");
698                                 }
699                         }
700                 }
701         }
702         return 0;
703 }
704
705 void eDVBCAService::Connect()
706 {
707         memset(&m_servaddr, 0, sizeof(struct sockaddr_un));
708         m_servaddr.sun_family = AF_UNIX;
709         strcpy(m_servaddr.sun_path, "/tmp/camd.socket");
710         m_clilen = sizeof(m_servaddr.sun_family) + strlen(m_servaddr.sun_path);
711         m_sock = socket(PF_UNIX, SOCK_STREAM, 0);
712         connect(m_sock, (struct sockaddr *) &m_servaddr, m_clilen);
713         fcntl(m_sock, F_SETFL, O_NONBLOCK);
714         int val=1;
715         setsockopt(m_sock, SOL_SOCKET, SO_REUSEADDR, &val, 4);
716 }
717
718 void eDVBCAService::buildCAPMT(eTable<ProgramMapSection> *ptr)
719 {
720         if (!ptr)
721                 return;
722
723         eDVBTableSpec table_spec;
724         ptr->getSpec(table_spec);
725
726         int pmtpid = table_spec.pid,
727                 pmt_version = table_spec.version;
728
729         uint8_t demux_mask = 0;
730         int data_demux = -1;
731
732         int iter=0, max_demux_slots = sizeof(m_used_demux);
733         while ( iter < max_demux_slots )
734         {
735                 if ( m_used_demux[iter] != 0xFF )
736                 {
737                         if ( m_used_demux[iter] > data_demux )
738                                 data_demux = m_used_demux[iter];
739                         demux_mask |= (1 << m_used_demux[iter]);
740                 }
741                 ++iter;
742         }
743
744         if ( data_demux == -1 )
745         {
746                 eDebug("[eDVBCAService] no data demux found for service %s", m_service.toString().c_str() );
747                 return;
748         }
749
750         eDebug("demux %d mask %02x prevhash %08x", data_demux, demux_mask, m_prev_build_hash);
751
752         unsigned int build_hash = (pmtpid << 16);
753         build_hash |= (demux_mask << 8);
754         build_hash |= (pmt_version&0xFF);
755
756         if ( build_hash == m_prev_build_hash )
757         {
758                 eDebug("[eDVBCAService] don't build/send the same CA PMT twice");
759                 return;
760         }
761
762         std::vector<ProgramMapSection*>::const_iterator i=ptr->getSections().begin();
763         if ( i != ptr->getSections().end() )
764         {
765                 CaProgramMapSection capmt(*i++, m_prev_build_hash ? 0x05 /*update*/ : 0x03 /*only*/, 0x01 );
766
767                 while( i != ptr->getSections().end() )
768                 {
769 //                      eDebug("append");
770                         capmt.append(*i++);
771                 }
772
773                 // add our private descriptors to capmt
774                 uint8_t tmp[10];
775
776                 tmp[0]=0x84;  // pmt pid
777                 tmp[1]=0x02;
778                 tmp[2]=pmtpid>>8;
779                 tmp[3]=pmtpid&0xFF;
780                 capmt.injectDescriptor(tmp, false);
781
782                 tmp[0] = 0x82; // demux
783                 tmp[1] = 0x02;
784                 tmp[2] = demux_mask;    // descramble bitmask
785                 tmp[3] = data_demux&0xFF; // read section data from demux number
786                 capmt.injectDescriptor(tmp, false);
787
788                 tmp[0] = 0x81; // dvbnamespace
789                 tmp[1] = 0x08;
790                 tmp[2] = m_service.getDVBNamespace().get()>>24;
791                 tmp[3]=(m_service.getDVBNamespace().get()>>16)&0xFF;
792                 tmp[4]=(m_service.getDVBNamespace().get()>>8)&0xFF;
793                 tmp[5]=m_service.getDVBNamespace().get()&0xFF;
794                 tmp[6]=m_service.getTransportStreamID().get()>>8;
795                 tmp[7]=m_service.getTransportStreamID().get()&0xFF;
796                 tmp[8]=m_service.getOriginalNetworkID().get()>>8;
797                 tmp[9]=m_service.getOriginalNetworkID().get()&0xFF;
798                 capmt.injectDescriptor(tmp, false);
799
800                 capmt.writeToBuffer(m_capmt);
801         }
802
803         m_prev_build_hash = build_hash;
804
805         if ( m_sendstate != 0xFFFFFFFF )
806                 m_sendstate=0;
807         sendCAPMT();
808 }
809
810 void eDVBCAService::sendCAPMT()
811 {
812         if ( m_sendstate && m_sendstate != 0xFFFFFFFF ) // broken pipe retry
813         {
814                 ::close(m_sock);
815                 Connect();
816         }
817
818         int wp=0;
819         if ( m_capmt[3] & 0x80 )
820         {
821                 int i=0;
822                 int lenbytes = m_capmt[3] & ~0x80;
823                 while(i < lenbytes)
824                         wp = (wp << 8) | m_capmt[4 + i++];
825                 wp+=4;
826                 wp+=lenbytes;
827         }
828         else
829         {
830                 wp = m_capmt[3];
831                 wp+=4;
832         }
833
834         if ( write(m_sock, m_capmt, wp) == wp )
835         {
836                 m_sendstate=0xFFFFFFFF;
837                 eDebug("[eDVBCAService] send %d bytes",wp);
838 #if 1
839                 for(int i=0;i<wp;i++)
840                         eDebugNoNewLine("%02x ", m_capmt[i]);
841                 eDebug("");
842 #endif
843         }
844         else
845         {
846                 switch(m_sendstate)
847                 {
848                         case 0xFFFFFFFF:
849                                 ++m_sendstate;
850                                 m_retryTimer.start(0,true);
851 //                              eDebug("[eDVBCAService] send failed .. immediate retry");
852                                 break;
853                         default:
854                                 m_retryTimer.start(5000,true);
855 //                              eDebug("[eDVBCAService] send failed .. retry in 5 sec");
856                                 break;
857                 }
858                 ++m_sendstate;
859         }
860 }