add possibility to query CAID/CAPID combination from python
[vuplus_dvbapp] / lib / dvb / pmt.cpp
1 #include <lib/base/nconfig.h> // access to python config
2 #include <lib/base/eerror.h>
3 #include <lib/dvb/pmt.h>
4 #include <lib/dvb/specs.h>
5 #include <lib/dvb/dvb.h>
6 #include <lib/dvb/metaparser.h>
7 #include <lib/dvb_ci/dvbci.h>
8 #include <lib/dvb/epgcache.h>
9 #include <lib/dvb/scan.h>
10 #include <lib/dvb_ci/dvbci_session.h>
11 #include <dvbsi++/ca_descriptor.h>
12 #include <dvbsi++/ca_program_map_section.h>
13 #include <dvbsi++/teletext_descriptor.h>
14 #include <dvbsi++/descriptor_tag.h>
15 #include <dvbsi++/iso639_language_descriptor.h>
16 #include <dvbsi++/stream_identifier_descriptor.h>
17 #include <dvbsi++/subtitling_descriptor.h>
18 #include <dvbsi++/teletext_descriptor.h>
19 #include <dvbsi++/video_stream_descriptor.h>
20 #include <dvbsi++/registration_descriptor.h>
21
22 eDVBServicePMTHandler::eDVBServicePMTHandler()
23         :m_ca_servicePtr(0), m_dvb_scan(0), m_decode_demux_num(0xFF)
24 {
25         m_use_decode_demux = 0;
26         m_pmt_pid = -1;
27         eDVBResourceManager::getInstance(m_resourceManager);
28         CONNECT(m_PMT.tableReady, eDVBServicePMTHandler::PMTready);
29         CONNECT(m_PAT.tableReady, eDVBServicePMTHandler::PATready);
30 }
31
32 eDVBServicePMTHandler::~eDVBServicePMTHandler()
33 {
34         free();
35 }
36
37 void eDVBServicePMTHandler::channelStateChanged(iDVBChannel *channel)
38 {
39         int state;
40         channel->getState(state);
41         
42         if ((m_last_channel_state != iDVBChannel::state_ok)
43                 && (state == iDVBChannel::state_ok) && (!m_demux))
44         {
45                 if (m_channel)
46                         if (m_channel->getDemux(m_demux, (!m_use_decode_demux) ? 0 : iDVBChannel::capDecode))
47                                 eDebug("Allocating %s-decoding a demux for now tuned-in channel failed.", m_use_decode_demux ? "" : "non-");
48                 
49                 serviceEvent(eventTuned);
50                 
51                 if (m_demux)
52                 {
53                         eDebug("ok ... now we start!!");
54
55                         if (!m_service || m_service->usePMT())
56                         {
57                                 if (m_pmt_pid == -1)
58                                         m_PAT.begin(eApp, eDVBPATSpec(), m_demux);
59                                 else
60                                         m_PMT.begin(eApp, eDVBPMTSpec(m_pmt_pid, m_reference.getServiceID().get()), m_demux);
61                         }
62
63                         if ( m_service && !m_service->cacheEmpty() )
64                                 serviceEvent(eventNewProgramInfo);
65                 }
66         } else if ((m_last_channel_state != iDVBChannel::state_failed) && 
67                         (state == iDVBChannel::state_failed))
68         {
69                 eDebug("tune failed.");
70                 serviceEvent(eventTuneFailed);
71         }
72 }
73
74 void eDVBServicePMTHandler::channelEvent(iDVBChannel *channel, int event)
75 {
76         switch (event)
77         {
78         case iDVBChannel::evtPreStart:
79                 serviceEvent(eventPreStart);
80                 break;
81         case iDVBChannel::evtEOF:
82                 serviceEvent(eventEOF);
83                 break;
84         case iDVBChannel::evtSOF:
85                 serviceEvent(eventSOF);
86                 break;
87         default:
88                 break;
89         }
90 }
91
92 void eDVBServicePMTHandler::PMTready(int error)
93 {
94         if (error)
95                 serviceEvent(eventNoPMT);
96         else
97         {
98                 m_have_cached_program = false;
99                 serviceEvent(eventNewProgramInfo);
100                 if (!m_pvr_channel) // don't send campmt to camd.socket for playbacked services
101                 {
102                         eEPGCache::getInstance()->PMTready(this);
103                         if(!m_ca_servicePtr)
104                         {
105                                 int demuxes[2] = {0,0};
106                                 uint8_t tmp;
107                                 m_demux->getCADemuxID(tmp);
108                                 demuxes[0]=tmp;
109                                 if (m_decode_demux_num != 0xFF)
110                                         demuxes[1]=m_decode_demux_num;
111                                 else
112                                         demuxes[1]=demuxes[0];
113                                 eDVBCAService::register_service(m_reference, demuxes, m_ca_servicePtr);
114                                 eDVBCIInterfaces::getInstance()->recheckPMTHandlers();
115                         }
116                         eDVBCIInterfaces::getInstance()->gotPMT(this);
117                 }
118                 if (m_ca_servicePtr)
119                 {
120                         ePtr<eTable<ProgramMapSection> > ptr;
121                         if (!m_PMT.getCurrent(ptr))
122                                 m_ca_servicePtr->buildCAPMT(ptr);
123                         else
124                                 eDebug("eDVBServicePMTHandler cannot call buildCAPMT");
125                 }
126         }
127 }
128
129 void eDVBServicePMTHandler::PATready(int)
130 {
131         ePtr<eTable<ProgramAssociationSection> > ptr;
132         if (!m_PAT.getCurrent(ptr))
133         {
134                 int pmtpid = -1;
135                 std::vector<ProgramAssociationSection*>::const_iterator i;
136                 for (i = ptr->getSections().begin(); pmtpid == -1 && i != ptr->getSections().end(); ++i)
137                 {
138                         const ProgramAssociationSection &pat = **i;
139                         ProgramAssociationConstIterator program;
140                         for (program = pat.getPrograms()->begin(); pmtpid == -1 && program != pat.getPrograms()->end(); ++program)
141                                 if (eServiceID((*program)->getProgramNumber()) == m_reference.getServiceID())
142                                         pmtpid = (*program)->getProgramMapPid();
143                 }
144                 if (pmtpid == -1)
145                         serviceEvent(eventNoPATEntry);
146                 else
147                         m_PMT.begin(eApp, eDVBPMTSpec(pmtpid, m_reference.getServiceID().get()), m_demux);
148         } else
149                 serviceEvent(eventNoPAT);
150 }
151
152 PyObject *eDVBServicePMTHandler::getCaIds(bool pair)
153 {
154         ePyObject ret;
155
156         program prog;
157
158         if ( !getProgramInfo(prog) )
159         {
160                 int cnt=prog.caids.size();
161                 if (cnt)
162                 {
163                         ret=PyList_New(cnt);
164                         std::set<program::capid_pair>::iterator it(prog.caids.begin());
165                         if (pair)
166                         {
167                                 while(cnt--)
168                                 {
169                                         ePyObject tuple = PyTuple_New(2);
170                                         PyTuple_SET_ITEM(tuple, 0, PyInt_FromLong(it->caid));
171                                         PyTuple_SET_ITEM(tuple, 1, PyInt_FromLong((it++)->capid));
172                                         PyList_SET_ITEM(ret, cnt, tuple);
173                                 }
174                         }
175                         else
176                         {
177                                 while(cnt--)
178                                         PyList_SET_ITEM(ret, cnt, PyInt_FromLong((it++)->caid));
179                         }
180                 }
181         }
182
183         return ret ? (PyObject*)ret : (PyObject*)PyList_New(0);
184 }
185
186 int eDVBServicePMTHandler::getProgramInfo(program &program)
187 {
188         ePtr<eTable<ProgramMapSection> > ptr;
189         int cached_apid_ac3 = -1;
190         int cached_apid_mpeg = -1;
191         int cached_vpid = -1;
192         int cached_tpid = -1;
193         int ret = -1;
194
195         program.videoStreams.clear();
196         program.audioStreams.clear();
197         program.pcrPid = -1;
198         program.pmtPid = -1;
199         program.textPid = -1;
200
201         int first_ac3 = -1;
202         program.defaultAudioStream = 0;
203         audioStream *prev_audio = 0;
204
205         if ( m_service && !m_service->cacheEmpty() )
206         {
207                 cached_vpid = m_service->getCacheEntry(eDVBService::cVPID);
208                 cached_apid_mpeg = m_service->getCacheEntry(eDVBService::cAPID);
209                 cached_apid_ac3 = m_service->getCacheEntry(eDVBService::cAC3PID);
210                 cached_tpid = m_service->getCacheEntry(eDVBService::cTPID);
211         }
212
213         if ( ((m_service && m_service->usePMT()) || !m_service) && !m_PMT.getCurrent(ptr))
214         {
215                 if (m_have_cached_program)
216                 {
217                         program = m_cached_program;
218                         ret = 0;
219                 }
220                 else
221                 {
222                         eDVBTableSpec table_spec;
223                         ptr->getSpec(table_spec);
224                         program.pmtPid = table_spec.pid < 0x1fff ? table_spec.pid : -1;
225                         std::vector<ProgramMapSection*>::const_iterator i;
226                         for (i = ptr->getSections().begin(); i != ptr->getSections().end(); ++i)
227                         {
228                                 const ProgramMapSection &pmt = **i;
229                                 program.pcrPid = pmt.getPcrPid();
230
231                                 ElementaryStreamInfoConstIterator es;
232                                 for (es = pmt.getEsInfo()->begin(); es != pmt.getEsInfo()->end(); ++es)
233                                 {
234                                         int isaudio = 0, isvideo = 0, issubtitle = 0, forced_video = 0, forced_audio = 0, isteletext = 0;
235                                         int streamtype = (*es)->getType();
236                                         videoStream video;
237                                         audioStream audio;
238                                         audio.component_tag=video.component_tag=-1;
239                                         video.type = videoStream::vtMPEG2;
240                                         audio.type = audioStream::atMPEG;
241                                         audio.rdsPid = -1;
242
243                                         switch (streamtype)
244                                         {
245                                         case 0x1b: // AVC Video Stream (MPEG4 H264)
246                                                 video.type = videoStream::vtMPEG4_H264;
247                                                 isvideo = 1;
248                                                 //break; fall through !!!
249                                         case 0x10: // MPEG 4 Part 2
250                                                 if (!isvideo)
251                                                 {
252                                                         video.type = videoStream::vtMPEG4_Part2;
253                                                         isvideo = 1;
254                                                 }
255                                                 //break; fall through !!!
256                                         case 0x01: // MPEG 1 video
257                                                 if (!isvideo)
258                                                         video.type = videoStream::vtMPEG1;
259                                                 //break; fall through !!!
260                                         case 0x02: // MPEG 2 video
261                                                 isvideo = 1;
262                                                 forced_video = 1;
263                                                 //break; fall through !!!
264                                         case 0x03: // MPEG 1 audio
265                                         case 0x04: // MPEG 2 audio:
266                                                 if (!isvideo) {
267                                                         isaudio = 1;
268                                                         forced_audio = 1;
269                                                 }
270                                                 //break; fall through !!!
271                                         case 0x0f: // MPEG 2 AAC
272                                                 if (!isvideo && !isaudio)
273                                                 {
274                                                         isaudio = 1;
275                                                         audio.type = audioStream::atAAC;
276                                                         forced_audio = 1;
277                                                 }
278                                                 //break; fall through !!!
279                                         case 0x11: // MPEG 4 AAC
280                                                 if (!isvideo && !isaudio)
281                                                 {
282                                                         isaudio = 1;
283                                                         audio.type = audioStream::atAACHE;
284                                                         forced_audio = 1;
285                                                 }
286                                         case 0x80: // user private ... but blueray LPCM
287                                                 if (!isvideo && !isaudio)
288                                                 {
289                                                         isaudio = 1;
290                                                         audio.type = audioStream::atLPCM;
291                                                 }
292                                         case 0x81: // user private ... but blueray AC3
293                                                 if (!isvideo && !isaudio)
294                                                 {
295                                                         isaudio = 1;
296                                                         audio.type = audioStream::atAC3;
297                                                 }
298                                         case 0x82: // Blueray DTS (dvb user private...)
299                                         case 0xA2: // Blueray secondary DTS
300                                                 if (!isvideo && !isaudio)
301                                                 {
302                                                         isaudio = 1;
303                                                         audio.type = audioStream::atDTS;
304                                                 }
305                                         case 0x06: // PES Private
306                                         case 0xEA: // TS_PSI_ST_SMPTE_VC1
307                                         {
308                                                 int num_descriptors = 0;
309                                                 for (DescriptorConstIterator desc = (*es)->getDescriptors()->begin();
310                                                         desc != (*es)->getDescriptors()->end(); ++desc)
311                                                 {
312                                                         uint8_t tag = (*desc)->getTag();
313                                                         /* check descriptors to get the exakt stream type. */
314                                                         ++num_descriptors;
315                                                         if (!forced_video && !forced_audio)
316                                                         {
317                                                                 switch (tag)
318                                                                 {
319                                                                 case AUDIO_STREAM_DESCRIPTOR:
320                                                                         isaudio = 1;
321                                                                         break;
322                                                                 case VIDEO_STREAM_DESCRIPTOR:
323                                                                 {
324                                                                         isvideo = 1;
325                                                                         VideoStreamDescriptor *d = (VideoStreamDescriptor*)(*desc);
326                                                                         if (d->getMpeg1OnlyFlag())
327                                                                                 video.type = videoStream::vtMPEG1;
328                                                                         break;
329                                                                 }
330                                                                 case SUBTITLING_DESCRIPTOR:
331                                                                 {
332                                                                         SubtitlingDescriptor *d = (SubtitlingDescriptor*)(*desc);
333                                                                         const SubtitlingList *list = d->getSubtitlings();
334                                                                         subtitleStream s;
335                                                                         s.pid = (*es)->getPid();
336                                                                         for (SubtitlingConstIterator it(list->begin()); it != list->end(); ++it)
337                                                                         {
338                                                                                 s.subtitling_type = (*it)->getSubtitlingType();
339                                                                                 switch(s.subtitling_type)
340                                                                                 {
341                                                                                 case 0x10 ... 0x13:
342                                                                                 case 0x20 ... 0x23: // dvb subtitles
343                                                                                         break;
344                                                                                 default:
345                                                                                         eDebug("dvb subtitle %s PID %04x with wrong subtitling type (%02x)... force 0x10!!",
346                                                                                                 s.language_code.c_str(), s.pid, s.subtitling_type);
347                                                                                         s.subtitling_type = 0x10;
348                                                                                         break;
349                                                                                 }
350                                                                                 s.composition_page_id = (*it)->getCompositionPageId();
351                                                                                 s.ancillary_page_id = (*it)->getAncillaryPageId();
352                                                                                 s.language_code = (*it)->getIso639LanguageCode();
353 //                                                                              eDebug("add dvb subtitle %s PID %04x, type %d, composition page %d, ancillary_page %d",
354 //                                                                                      s.language_code.c_str(), s.pid, s.subtitling_type, s.composition_page_id, s.ancillary_page_id);
355                                                                                 issubtitle=1;
356                                                                                 program.subtitleStreams.push_back(s);
357                                                                         }
358                                                                         break;
359                                                                 }
360                                                                 case TELETEXT_DESCRIPTOR:
361                                                                         if ( program.textPid == -1 || (*es)->getPid() == cached_tpid )
362                                                                         {
363                                                                                 subtitleStream s;
364                                                                                 s.subtitling_type = 0x01; // EBU TELETEXT SUBTITLES
365                                                                                 s.pid = program.textPid = (*es)->getPid();
366                                                                                 TeletextDescriptor *d = (TeletextDescriptor*)(*desc);
367                                                                                 isteletext = 1;
368                                                                                 const VbiTeletextList *list = d->getVbiTeletexts();
369                                                                                 for (VbiTeletextConstIterator it(list->begin()); it != list->end(); ++it)
370                                                                                 {
371                                                                                         switch((*it)->getTeletextType())
372                                                                                         {
373                                                                                         case 0x02: // Teletext subtitle page
374                                                                                         case 0x05: // Teletext subtitle page for hearing impaired pepople
375                                                                                                 s.language_code = (*it)->getIso639LanguageCode();
376                                                                                                 s.teletext_page_number = (*it)->getTeletextPageNumber();
377                                                                                                 s.teletext_magazine_number = (*it)->getTeletextMagazineNumber();
378 //                                                                                              eDebug("add teletext subtitle %s PID %04x, page number %d, magazine number %d",
379 //                                                                                                      s.language_code.c_str(), s.pid, s.teletext_page_number, s.teletext_magazine_number);
380                                                                                                 program.subtitleStreams.push_back(s);
381                                                                                                 issubtitle=1;
382                                                                                         default:
383                                                                                                 break;
384                                                                                         }
385                                                                                 }
386                                                                         }
387                                                                         break;
388                                                                 case DTS_DESCRIPTOR:
389                                                                         isaudio = 1;
390                                                                         audio.type = audioStream::atDTS;
391                                                                         break;
392                                                                 case 0x2B: // TS_PSI_DT_MPEG2_AAC
393                                                                         isaudio = 1;
394                                                                         audio.type = audioStream::atAAC; // MPEG2-AAC
395                                                                         break;
396                                                                 case 0x1C: // TS_PSI_DT_MPEG4_Audio
397                                                                 case AAC_DESCRIPTOR:
398                                                                         isaudio = 1;
399                                                                         audio.type = audioStream::atAACHE; // MPEG4-AAC
400                                                                         break;
401                                                                 case AC3_DESCRIPTOR:
402                                                                         isaudio = 1;
403                                                                         audio.type = audioStream::atAC3;
404                                                                         break;
405                                                                 case REGISTRATION_DESCRIPTOR: /* some services don't have a separate AC3 descriptor */
406                                                                 {
407                                                                         RegistrationDescriptor *d = (RegistrationDescriptor*)(*desc);
408                                                                         switch (d->getFormatIdentifier())
409                                                                         {
410                                                                         case 0x44545331 ... 0x44545333: // DTS1/DTS2/DTS3
411                                                                                 isaudio = 1;
412                                                                                 audio.type = audioStream::atDTS;
413                                                                                 break;
414                                                                         case 0x41432d33: // == 'AC-3'
415                                                                                 isaudio = 1;
416                                                                                 audio.type = audioStream::atAC3;
417                                                                                 break;
418                                                                         case 0x42535344: // == 'BSSD' (LPCM)
419                                                                                 isaudio = 1;
420                                                                                 audio.type = audioStream::atLPCM;
421                                                                                 break;
422                                                                         case 0x56432d31: // == 'VC-1'
423                                                                         {
424                                                                                 const AdditionalIdentificationInfoVector *vec = d->getAdditionalIdentificationInfo();
425                                                                                 if (vec->size() > 1 && (*vec)[0] == 0x01) // subdescriptor tag
426                                                                                 {
427                                                                                         if ((*vec)[1] >= 0x90) // profile_level
428                                                                                                 video.type = videoStream::vtVC1; // advanced profile
429                                                                                         else
430                                                                                                 video.type = videoStream::vtVC1_SM; // simple main
431                                                                                         isvideo = 1;
432                                                                                 }
433                                                                         }
434                                                                         default:
435                                                                                 break;
436                                                                         }
437                                                                         break;
438                                                                 }
439                                                                 case 0x28: // TS_PSI_DT_AVC
440                                                                         isvideo = 1;
441                                                                         video.type = videoStream::vtMPEG4_H264;
442                                                                         break;
443                                                                 case 0x1B: // TS_PSI_DT_MPEG4_Video
444                                                                         isvideo = 1;
445                                                                         video.type = videoStream::vtMPEG4_Part2;
446                                                                         break;
447                                                                 default:
448                                                                         break;
449                                                                 }
450                                                         }
451                                                         switch (tag)
452                                                         {
453                                                         case ISO_639_LANGUAGE_DESCRIPTOR:
454                                                                 if (!isvideo)
455                                                                 {
456                                                                         int cnt=0;
457                                                                         const Iso639LanguageList *languages = ((Iso639LanguageDescriptor*)*desc)->getIso639Languages();
458                                                                                 /* use last language code */
459                                                                         for (Iso639LanguageConstIterator i(languages->begin()); i != languages->end(); ++i, ++cnt)
460                                                                         {
461                                                                                 if (cnt == 0)
462                                                                                         audio.language_code = (*i)->getIso639LanguageCode();
463                                                                                 else
464                                                                                         audio.language_code += "/" + (*i)->getIso639LanguageCode();
465                                                                         }
466                                                                 }
467                                                                 break;
468                                                         case STREAM_IDENTIFIER_DESCRIPTOR:
469                                                                 audio.component_tag =
470                                                                         video.component_tag =
471                                                                                 ((StreamIdentifierDescriptor*)*desc)->getComponentTag();
472                                                                 break;
473                                                         case CA_DESCRIPTOR:
474                                                         {
475                                                                 CaDescriptor *descr = (CaDescriptor*)(*desc);
476                                                                 program::capid_pair pair;
477                                                                 pair.caid = descr->getCaSystemId();
478                                                                 pair.capid = descr->getCaPid();
479                                                                 program.caids.insert(pair);
480                                                                 break;
481                                                         }
482                                                         default:
483                                                                 break;
484                                                         }
485                                                 }
486                                                 if (!num_descriptors && streamtype == 0x06 && prev_audio)
487                                                 {
488                                                         prev_audio->rdsPid = (*es)->getPid();
489                                                         eDebug("Rds PID %04x detected ? ! ?", prev_audio->rdsPid);
490                                                 }
491                                                 prev_audio = 0;
492                                         }
493                                         default:
494                                                 break;
495                                         }
496                                         if (isteletext && (isaudio || isvideo)) 
497                                         {
498                                                 eDebug("ambiguous streamtype for PID %04x detected.. forced as teletext!", (*es)->getPid());                                    
499                                                 continue; // continue with next PID
500                                         }
501                                         else if (issubtitle && (isaudio || isvideo))
502                                                 eDebug("ambiguous streamtype for PID %04x detected.. forced as subtitle!", (*es)->getPid());
503                                         else if (isaudio && isvideo)
504                                                 eDebug("ambiguous streamtype for PID %04x detected.. forced as video!", (*es)->getPid());
505                                         if (issubtitle) // continue with next PID
506                                                 continue;
507                                         else if (isvideo)
508                                         {
509                                                 video.pid = (*es)->getPid();
510                                                 if ( !program.videoStreams.empty() && video.pid == cached_vpid )
511                                                 {
512                                                         program.videoStreams.push_back(program.videoStreams[0]);
513                                                         program.videoStreams[0] = video;
514                                                 }
515                                                 else
516                                                         program.videoStreams.push_back(video);
517                                         }
518                                         else if (isaudio)
519                                         {
520                                                 audio.pid = (*es)->getPid();
521
522                                                         /* if we find the cached pids, this will be our default stream */
523                                                 if (audio.pid == cached_apid_ac3 || audio.pid == cached_apid_mpeg)
524                                                         program.defaultAudioStream = program.audioStreams.size();
525
526                                                         /* also, we need to know the first non-mpeg (i.e. "ac3"/dts/...) stream */
527                                                 if ((audio.type != audioStream::atMPEG) && ((first_ac3 == -1) || (audio.pid == cached_apid_ac3)))
528                                                         first_ac3 = program.audioStreams.size();
529
530                                                 program.audioStreams.push_back(audio);
531                                                 prev_audio = &program.audioStreams.back();
532                                         }
533                                         else
534                                                 continue;
535                                 }
536                                 for (DescriptorConstIterator desc = pmt.getDescriptors()->begin();
537                                         desc != pmt.getDescriptors()->end(); ++desc)
538                                 {
539                                         if ((*desc)->getTag() == CA_DESCRIPTOR)
540                                         {
541                                                 CaDescriptor *descr = (CaDescriptor*)(*desc);
542                                                 program::capid_pair pair;
543                                                 pair.caid = descr->getCaSystemId();
544                                                 pair.capid = descr->getCaPid();
545                                                 program.caids.insert(pair);
546                                         }
547                                 }
548                         }
549                         ret = 0;
550
551                         /* finally some fixup: if our default audio stream is an MPEG audio stream, 
552                            and we have 'defaultac3' set, use the first available ac3 stream instead.
553                            (note: if an ac3 audio stream was selected before, this will be also stored
554                            in 'fisrt_ac3', so we don't need to worry. */
555                         bool defaultac3 = false;
556                         std::string default_ac3;
557
558                         if (!ePythonConfigQuery::getConfigValue("config.av.defaultac3", default_ac3))
559                                 defaultac3 = default_ac3 == "True";
560
561                         if (defaultac3 && (first_ac3 != -1))
562                                 program.defaultAudioStream = first_ac3;
563
564                         m_cached_program = program;
565                         m_have_cached_program = true;
566                 }
567         } else if ( m_service && !m_service->cacheEmpty() )
568         {
569                 int cached_pcrpid = m_service->getCacheEntry(eDVBService::cPCRPID),
570                         vpidtype = m_service->getCacheEntry(eDVBService::cVTYPE),
571                         cnt=0;
572                 if ( vpidtype == -1 )
573                         vpidtype = videoStream::vtMPEG2;
574                 if ( cached_vpid != -1 )
575                 {
576                         videoStream s;
577                         s.pid = cached_vpid;
578                         s.type = vpidtype;
579                         program.videoStreams.push_back(s);
580                         ++cnt;
581                 }
582                 if ( cached_apid_ac3 != -1 )
583                 {
584                         audioStream s;
585                         s.type = audioStream::atAC3;
586                         s.pid = cached_apid_ac3;
587                         s.rdsPid = -1;
588                         program.audioStreams.push_back(s);
589                         ++cnt;
590                 }
591                 if ( cached_apid_mpeg != -1 )
592                 {
593                         audioStream s;
594                         s.type = audioStream::atMPEG;
595                         s.pid = cached_apid_mpeg;
596                         s.rdsPid = -1;
597                         program.audioStreams.push_back(s);
598                         ++cnt;
599                 }
600                 if ( cached_pcrpid != -1 )
601                 {
602                         ++cnt;
603                         program.pcrPid = cached_pcrpid;
604                 }
605                 if ( cached_tpid != -1 )
606                 {
607                         ++cnt;
608                         program.textPid = cached_tpid;
609                 }
610                 CAID_LIST &caids = m_service->m_ca;
611                 for (CAID_LIST::iterator it(caids.begin()); it != caids.end(); ++it) {
612                         program::capid_pair pair;
613                         pair.caid = *it;
614                         pair.capid = -1; // not known yet
615                         program.caids.insert(pair);
616                 }
617                 if ( cnt )
618                         ret = 0;
619         }
620         return ret;
621 }
622
623 int eDVBServicePMTHandler::getChannel(eUsePtr<iDVBChannel> &channel)
624 {
625         channel = m_channel;
626         if (channel)
627                 return 0;
628         else
629                 return -1;
630 }
631
632 int eDVBServicePMTHandler::getDataDemux(ePtr<iDVBDemux> &demux)
633 {
634         demux = m_demux;
635         if (demux)
636                 return 0;
637         else
638                 return -1;
639 }
640
641 int eDVBServicePMTHandler::getDecodeDemux(ePtr<iDVBDemux> &demux)
642 {
643         int ret=0;
644                 /* if we're using the decoding demux as data source
645                    (for example in pvr playbacks), return that one. */
646         if (m_use_decode_demux)
647         {
648                 demux = m_demux;
649                 return ret;
650         }
651         
652         ASSERT(m_channel); /* calling without a previous ::tune is certainly bad. */
653
654         ret = m_channel->getDemux(demux, iDVBChannel::capDecode);
655         if (!ret)
656                 demux->getCADemuxID(m_decode_demux_num);
657
658         return ret;
659 }
660
661 int eDVBServicePMTHandler::getPVRChannel(ePtr<iDVBPVRChannel> &pvr_channel)
662 {
663         pvr_channel = m_pvr_channel;
664         if (pvr_channel)
665                 return 0;
666         else
667                 return -1;
668 }
669
670 void eDVBServicePMTHandler::SDTScanEvent(int event)
671 {
672         switch (event)
673         {
674                 case eDVBScan::evtFinish:
675                 {
676                         ePtr<iDVBChannelList> db;
677                         if (m_resourceManager->getChannelList(db) != 0)
678                                 eDebug("no channel list");
679                         else
680                         {
681                                 eDVBChannelID chid;
682                                 m_reference.getChannelID(chid);
683                                 if (chid == m_dvb_scan->getCurrentChannelID())
684                                 {
685                                         m_dvb_scan->insertInto(db, true);
686                                         eDebug("sdt update done!");
687                                 }
688                                 else
689                                         eDebug("ignore sdt update data.... incorrect transponder tuned!!!");
690                         }
691                         break;
692                 }
693
694                 default:
695                         break;
696         }
697 }
698
699 int eDVBServicePMTHandler::tune(eServiceReferenceDVB &ref, int use_decode_demux, eCueSheet *cue, bool simulate, eDVBService *service)
700 {
701         RESULT res=0;
702         m_reference = ref;
703         
704         m_use_decode_demux = use_decode_demux;
705
706                 /* use given service as backup. This is used for timeshift where we want to clone the live stream using the cache, but in fact have a PVR channel */
707         m_service = service;
708         
709                 /* is this a normal (non PVR) channel? */
710         if (ref.path.empty())
711         {
712                 eDVBChannelID chid;
713                 ref.getChannelID(chid);
714                 res = m_resourceManager->allocateChannel(chid, m_channel, simulate);
715                 if (!simulate)
716                         eDebug("allocate Channel: res %d", res);
717
718                 ePtr<iDVBChannelList> db;
719                 if (!m_resourceManager->getChannelList(db))
720                         db->getService((eServiceReferenceDVB&)m_reference, m_service);
721
722                 if (!res && !simulate)
723                         eDVBCIInterfaces::getInstance()->addPMTHandler(this);
724         } else if (!simulate) // no simulation of playback services
725         {
726                 if (!ref.getServiceID().get() /* incorrect sid in meta file or recordings.epl*/ )
727                 {
728                         eWarning("no .meta file found, trying to find PMT pid");
729                         eDVBTSTools tstools;
730                         if (tstools.openFile(ref.path.c_str()))
731                                 eWarning("failed to open file");
732                         else
733                         {
734                                 int service_id, pmt_pid;
735                                 if (!tstools.findPMT(pmt_pid, service_id))
736                                 {
737                                         eDebug("PMT pid found on pid %04x, service id %d", pmt_pid, service_id);
738                                         m_reference.setServiceID(service_id);
739                                         m_pmt_pid = pmt_pid;
740                                 }
741                         }
742                 }
743                 eDebug("alloc PVR");
744                         /* allocate PVR */
745                 res = m_resourceManager->allocatePVRChannel(m_pvr_channel);
746                 if (res)
747                         eDebug("allocatePVRChannel failed!\n");
748                 m_channel = m_pvr_channel;
749         }
750
751         if (!simulate)
752         {
753                 if (m_channel)
754                 {
755                         m_channel->connectStateChange(
756                                 slot(*this, &eDVBServicePMTHandler::channelStateChanged), 
757                                 m_channelStateChanged_connection);
758                         m_last_channel_state = -1;
759                         channelStateChanged(m_channel);
760         
761                         m_channel->connectEvent(
762                                 slot(*this, &eDVBServicePMTHandler::channelEvent), 
763                                 m_channelEvent_connection);
764
765                         if (ref.path.empty())
766                         {
767                                 m_dvb_scan = 0;
768                                 m_dvb_scan = new eDVBScan(m_channel, true, false);
769                                 m_dvb_scan->connectEvent(slot(*this, &eDVBServicePMTHandler::SDTScanEvent), m_scan_event_connection);
770                         }
771                 } else
772                 {
773                         if (res == eDVBResourceManager::errAllSourcesBusy)
774                                 serviceEvent(eventNoResources);
775                         else /* errChidNotFound, errNoChannelList, errChannelNotInList, errNoSourceFound */
776                                 serviceEvent(eventMisconfiguration);
777                         return res;
778                 }
779
780                 if (m_pvr_channel)
781                 {
782                         m_pvr_channel->setCueSheet(cue);
783                         m_pvr_channel->playFile(ref.path.c_str());
784                 }
785         }
786
787         return res;
788 }
789
790 void eDVBServicePMTHandler::free()
791 {
792         m_dvb_scan = 0;
793
794         if (m_ca_servicePtr)
795         {
796                 int demuxes[2] = {0,0};
797                 uint8_t tmp;
798                 m_demux->getCADemuxID(tmp);
799                 demuxes[0]=tmp;
800                 if (m_decode_demux_num != 0xFF)
801                         demuxes[1]=m_decode_demux_num;
802                 else
803                         demuxes[1]=demuxes[0];
804                 ePtr<eTable<ProgramMapSection> > ptr;
805                 m_PMT.getCurrent(ptr);
806                 eDVBCAService::unregister_service(m_reference, demuxes, ptr);
807                 m_ca_servicePtr = 0;
808         }
809
810         if (m_channel)
811                 eDVBCIInterfaces::getInstance()->removePMTHandler(this);
812
813         if (m_pvr_channel)
814         {
815                 m_pvr_channel->stopFile();
816                 m_pvr_channel->setCueSheet(0);
817         }
818
819         m_PMT.stop();
820         m_PAT.stop();
821         m_service = 0;
822         m_channel = 0;
823         m_pvr_channel = 0;
824         m_demux = 0;
825 }
826
827 CAServiceMap eDVBCAService::exist;
828 ChannelMap eDVBCAService::exist_channels;
829 ePtr<eConnection> eDVBCAService::m_chanAddedConn;
830
831 eDVBCAService::eDVBCAService()
832         :m_buffer(512), m_prev_build_hash(0), m_sendstate(0), m_retryTimer(eTimer::create(eApp))
833 {
834         memset(m_used_demux, 0xFF, sizeof(m_used_demux));
835         CONNECT(m_retryTimer->timeout, eDVBCAService::sendCAPMT);
836         Connect();
837 }
838
839 eDVBCAService::~eDVBCAService()
840 {
841         eDebug("[eDVBCAService] free service %s", m_service.toString().c_str());
842         ::close(m_sock);
843 }
844
845 // begin static methods
846 RESULT eDVBCAService::register_service( const eServiceReferenceDVB &ref, int demux_nums[2], eDVBCAService *&caservice )
847 {
848         CAServiceMap::iterator it = exist.find(ref);
849         if ( it != exist.end() )
850                 caservice = it->second;
851         else
852         {
853                 caservice = (exist[ref]=new eDVBCAService());
854                 caservice->m_service = ref;
855                 eDebug("[eDVBCAService] new service %s", ref.toString().c_str() );
856         }
857
858         int loops = demux_nums[0] != demux_nums[1] ? 2 : 1;
859         for (int i=0; i < loops; ++i)
860         {
861 // search free demux entry
862                 int iter=0, max_demux_slots = sizeof(caservice->m_used_demux);
863
864                 while ( iter < max_demux_slots && caservice->m_used_demux[iter] != 0xFF )
865                         ++iter;
866
867                 if ( iter < max_demux_slots )
868                 {
869                         caservice->m_used_demux[iter] = demux_nums[i] & 0xFF;
870                         eDebug("[eDVBCAService] add demux %d to slot %d service %s", caservice->m_used_demux[iter], iter, ref.toString().c_str());
871                 }
872                 else
873                 {
874                         eDebug("[eDVBCAService] no more demux slots free for service %s!!", ref.toString().c_str());
875                         return -1;
876                 }
877         }
878         return 0;
879 }
880
881 RESULT eDVBCAService::unregister_service( const eServiceReferenceDVB &ref, int demux_nums[2], eTable<ProgramMapSection> *ptr )
882 {
883         CAServiceMap::iterator it = exist.find(ref);
884         if ( it == exist.end() )
885         {
886                 eDebug("[eDVBCAService] try to unregister non registered %s", ref.toString().c_str());
887                 return -1;
888         }
889         else
890         {
891                 eDVBCAService *caservice = it->second;
892                 int loops = demux_nums[0] != demux_nums[1] ? 2 : 1;
893                 for (int i=0; i < loops; ++i)
894                 {
895                         bool freed = false;
896                         int iter = 0,
897                                 used_demux_slots = 0,
898                                 max_demux_slots = sizeof(caservice->m_used_demux)/sizeof(int);
899                         while ( iter < max_demux_slots )
900                         {
901                                 if ( caservice->m_used_demux[iter] != 0xFF )
902                                 {
903                                         if ( !freed && caservice->m_used_demux[iter] == demux_nums[i] )
904                                         {
905                                                 eDebug("[eDVBCAService] free slot %d demux %d for service %s", iter, caservice->m_used_demux[iter], caservice->m_service.toString().c_str() );
906                                                 caservice->m_used_demux[iter] = 0xFF;
907                                                 freed=true;
908                                         }
909                                         else
910                                                 ++used_demux_slots;
911                                 }
912                                 ++iter;
913                         }
914                         if (!freed)
915                                 eDebug("[eDVBCAService] couldn't free demux slot for demux %d", demux_nums[i]);
916                         if (i || loops == 1)
917                         {
918                                 if (!used_demux_slots)  // no more used.. so we remove it
919                                 {
920                                         delete it->second;
921                                         exist.erase(it);
922                                 }
923                                 else
924                                 {
925                                         if (ptr)
926                                                 it->second->buildCAPMT(ptr);
927                                         else
928                                                 eDebug("[eDVBCAService] can not send updated demux info");
929                                 }
930                         }
931                 }
932         }
933         return 0;
934 }
935
936 void eDVBCAService::registerChannelCallback(eDVBResourceManager *res_mgr)
937 {
938         res_mgr->connectChannelAdded(slot(&DVBChannelAdded), m_chanAddedConn);
939 }
940
941 void eDVBCAService::DVBChannelAdded(eDVBChannel *chan)
942 {
943         if ( chan )
944         {
945                 eDebug("[eDVBCAService] new channel %p!", chan);
946                 channel_data *data = new channel_data();
947                 data->m_channel = chan;
948                 data->m_prevChannelState = -1;
949                 data->m_dataDemux = -1;
950                 exist_channels[chan] = data;
951                 chan->connectStateChange(slot(&DVBChannelStateChanged), data->m_stateChangedConn);
952         }
953 }
954
955 void eDVBCAService::DVBChannelStateChanged(iDVBChannel *chan)
956 {
957         ChannelMap::iterator it =
958                 exist_channels.find(chan);
959         if ( it != exist_channels.end() )
960         {
961                 int state=0;
962                 chan->getState(state);
963                 if ( it->second->m_prevChannelState != state )
964                 {
965                         switch (state)
966                         {
967                                 case iDVBChannel::state_ok:
968                                 {
969                                         eDebug("[eDVBCAService] channel %p running", chan);
970                                         break;
971                                 }
972                                 case iDVBChannel::state_release:
973                                 {
974                                         eDebug("[eDVBCAService] remove channel %p", chan);
975                                         unsigned char msg[8] = { 0x9f,0x80,0x3f,0x04,0x83,0x02,0x00,0x00 };
976                                         msg[7] = it->second->m_dataDemux & 0xFF;
977                                         int sock, clilen;
978                                         struct sockaddr_un servaddr;
979                                         memset(&servaddr, 0, sizeof(struct sockaddr_un));
980                                         servaddr.sun_family = AF_UNIX;
981                                         strcpy(servaddr.sun_path, "/tmp/camd.socket");
982                                         clilen = sizeof(servaddr.sun_family) + strlen(servaddr.sun_path);
983                                         sock = socket(PF_UNIX, SOCK_STREAM, 0);
984                                         if (sock > -1)
985                                         {
986                                                 connect(sock, (struct sockaddr *) &servaddr, clilen);
987                                                 fcntl(sock, F_SETFL, O_NONBLOCK);
988                                                 int val=1;
989                                                 setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, &val, 4);
990                                                 if (write(sock, msg, 8) != 8)
991                                                         eDebug("[eDVBCAService] write leave transponder failed!!");
992                                                 close(sock);
993                                         }
994                                         exist_channels.erase(it);
995                                         delete it->second;
996                                         it->second=0;
997                                         break;
998                                 }
999                                 default: // ignore all other events
1000                                         return;
1001                         }
1002                         if (it->second)
1003                                 it->second->m_prevChannelState = state;
1004                 }
1005         }
1006 }
1007
1008 channel_data *eDVBCAService::getChannelData(eDVBChannelID &chid)
1009 {
1010         for (ChannelMap::iterator it(exist_channels.begin()); it != exist_channels.end(); ++it)
1011         {
1012                 if (chid == it->second->m_channel->getChannelID())
1013                         return it->second;
1014         }
1015         return 0;
1016 }
1017 // end static methods
1018
1019 #define CA_REPLY_DEBUG
1020 #define MAX_LENGTH_BYTES 4
1021 #define MIN_LENGTH_BYTES 1
1022
1023 void eDVBCAService::socketCB(int what)
1024 {
1025         if (what & (eSocketNotifier::Read | eSocketNotifier::Priority))
1026         {
1027                 char msgbuffer[4096];
1028                 ssize_t length = read(m_sock, msgbuffer, sizeof(msgbuffer));
1029                 if (length == -1)
1030                 {
1031                         if (errno != EAGAIN && errno != EINTR && errno != EBUSY)
1032                         {
1033                                 eDebug("[eSocketMMIHandler] read (%m)");
1034                                 what |= eSocketNotifier::Error;
1035                         }
1036                 } else if (length == 0)
1037                 {
1038                         what |= eSocketNotifier::Hungup;
1039                 } else
1040                 {
1041                         int len = length;
1042                         unsigned char *data = (unsigned char*)msgbuffer;
1043                         int clear = 1;
1044         // If a new message starts, then the previous message
1045         // should already have been processed. Otherwise the
1046         // previous message was incomplete and should therefore
1047         // be deleted.
1048                         if ((len >= 1) && ((data[0] & 0xFF) != 0x9f))
1049                                 clear = 0;
1050                         if ((len >= 2) && ((data[1] & 0x80) != 0x80))
1051                                 clear = 0;
1052                         if ((len >= 3) && ((data[2] & 0x80) != 0x00))
1053                                 clear = 0;
1054                         if (clear)
1055                         {
1056                                 m_buffer.clear();
1057 #ifdef CA_REPLY_DEBUG
1058                                 eDebug("clear buffer");
1059 #endif
1060                         }
1061 #ifdef CA_REPLY_DEBUG
1062                         eDebug("Put to buffer:");
1063                         for (int i=0; i < len; ++i)
1064                                 eDebugNoNewLine("%02x ", data[i]);
1065                         eDebug("\n--------");
1066 #endif
1067                         m_buffer.write( data, len );
1068
1069                         while ( m_buffer.size() >= (3 + MIN_LENGTH_BYTES) )
1070                         {
1071                                 unsigned char tmp[3+MAX_LENGTH_BYTES];
1072                                 m_buffer.peek(tmp, 3+MIN_LENGTH_BYTES);
1073                                 if (((tmp[0] & 0xFF) != 0x9f) || ((tmp[1] & 0x80) != 0x80) || ((tmp[2] & 0x80) != 0x00))
1074                                 {
1075                                         m_buffer.skip(1);
1076 #ifdef CA_REPLY_DEBUG
1077                                         eDebug("skip %02x", tmp[0]);
1078 #endif
1079                                         continue;
1080                                 }
1081                                 if (tmp[3] & 0x80)
1082                                 {
1083                                         int peekLength = (tmp[3] & 0x7f) + 4;
1084                                         if (m_buffer.size() < peekLength)
1085                                                 continue;
1086                                         m_buffer.peek(tmp, peekLength);
1087                                 }
1088                                 int size=0;
1089                                 int LengthBytes=eDVBCISession::parseLengthField(tmp+3, size);
1090                                 int messageLength = 3+LengthBytes+size;
1091                                 if ( m_buffer.size() >= messageLength )
1092                                 {
1093                                         unsigned char dest[messageLength];
1094                                         m_buffer.read(dest, messageLength);
1095 #ifdef CA_REPLY_DEBUG
1096                                         eDebug("dump ca reply:");
1097                                         for (int i=0; i < messageLength; ++i)
1098                                                 eDebugNoNewLine("%02x ", dest[i]);
1099                                         eDebug("\n--------");
1100 #endif
1101 //                                      /*emit*/ mmi_progress(0, dest, (const void*)(dest+3+LengthBytes), messageLength-3-LengthBytes);
1102                                 }
1103                         }
1104                 }
1105         }
1106         if (what & eSocketNotifier::Hungup) {
1107                 /*eDebug("[eDVBCAService] connection closed")*/;
1108                 m_sendstate=1;
1109                 sendCAPMT();
1110         }
1111         if (what & eSocketNotifier::Error)
1112                 eDebug("[eDVBCAService] connection error");
1113 }
1114
1115 void eDVBCAService::Connect()
1116 {
1117         m_sn=0;
1118         memset(&m_servaddr, 0, sizeof(struct sockaddr_un));
1119         m_servaddr.sun_family = AF_UNIX;
1120         strcpy(m_servaddr.sun_path, "/tmp/camd.socket");
1121         m_clilen = sizeof(m_servaddr.sun_family) + strlen(m_servaddr.sun_path);
1122         m_sock = socket(PF_UNIX, SOCK_STREAM, 0);
1123         if (m_sock != -1)
1124         {
1125                 if (!connect(m_sock, (struct sockaddr *) &m_servaddr, m_clilen))
1126                 {
1127                         int val=1;
1128                         fcntl(m_sock, F_SETFL, O_NONBLOCK);
1129                         setsockopt(m_sock, SOL_SOCKET, SO_REUSEADDR, &val, 4);
1130                         m_sn = eSocketNotifier::create(eApp, m_sock,
1131                                 eSocketNotifier::Read|eSocketNotifier::Priority|eSocketNotifier::Error|eSocketNotifier::Hungup);
1132                         CONNECT(m_sn->activated, eDVBCAService::socketCB);
1133                         
1134                 }
1135 //              else
1136 //                      eDebug("[eDVBCAService] connect failed %m");
1137         }
1138         else
1139                 eDebug("[eDVBCAService] create socket failed %m");
1140 }
1141
1142 void eDVBCAService::buildCAPMT(eTable<ProgramMapSection> *ptr)
1143 {
1144         if (!ptr)
1145                 return;
1146
1147         eDVBTableSpec table_spec;
1148         ptr->getSpec(table_spec);
1149
1150         int pmtpid = table_spec.pid,
1151                 pmt_version = table_spec.version;
1152
1153         uint8_t demux_mask = 0;
1154         int data_demux = -1;
1155
1156         int iter=0, max_demux_slots = sizeof(m_used_demux);
1157         while ( iter < max_demux_slots )
1158         {
1159                 if ( m_used_demux[iter] != 0xFF )
1160                 {
1161                         if ( m_used_demux[iter] > data_demux )
1162                                 data_demux = m_used_demux[iter];
1163                         demux_mask |= (1 << m_used_demux[iter]);
1164                 }
1165                 ++iter;
1166         }
1167
1168         if ( data_demux == -1 )
1169         {
1170                 eDebug("[eDVBCAService] no data demux found for service %s", m_service.toString().c_str() );
1171                 return;
1172         }
1173
1174         eDebug("demux %d mask %02x prevhash %08x", data_demux, demux_mask, m_prev_build_hash);
1175
1176         unsigned int build_hash = ( pmtpid << 16);
1177         build_hash |= (demux_mask << 8);
1178         build_hash |= (pmt_version&0xFF);
1179
1180         if ( build_hash == m_prev_build_hash )
1181         {
1182                 eDebug("[eDVBCAService] don't build/send the same CA PMT twice");
1183                 return;
1184         }
1185
1186         std::vector<ProgramMapSection*>::const_iterator i=ptr->getSections().begin();
1187         if ( i != ptr->getSections().end() )
1188         {
1189                 CaProgramMapSection capmt(*i++, m_prev_build_hash ? 0x05 /*update*/ : 0x03 /*only*/, 0x01 );
1190
1191                 while( i != ptr->getSections().end() )
1192                 {
1193 //                      eDebug("append");
1194                         capmt.append(*i++);
1195                 }
1196
1197                 // add our private descriptors to capmt
1198                 uint8_t tmp[10];
1199
1200                 tmp[0]=0x84;  // pmt pid
1201                 tmp[1]=0x02;
1202                 tmp[2]=pmtpid>>8;
1203                 tmp[3]=pmtpid&0xFF;
1204                 capmt.injectDescriptor(tmp, false);
1205
1206                 tmp[0] = 0x82; // demux
1207                 tmp[1] = 0x02;
1208                 tmp[2] = demux_mask;    // descramble bitmask
1209                 tmp[3] = data_demux&0xFF; // read section data from demux number
1210                 capmt.injectDescriptor(tmp, false);
1211
1212                 tmp[0] = 0x81; // dvbnamespace
1213                 tmp[1] = 0x08;
1214                 tmp[2] = m_service.getDVBNamespace().get()>>24;
1215                 tmp[3]=(m_service.getDVBNamespace().get()>>16)&0xFF;
1216                 tmp[4]=(m_service.getDVBNamespace().get()>>8)&0xFF;
1217                 tmp[5]=m_service.getDVBNamespace().get()&0xFF;
1218                 tmp[6]=m_service.getTransportStreamID().get()>>8;
1219                 tmp[7]=m_service.getTransportStreamID().get()&0xFF;
1220                 tmp[8]=m_service.getOriginalNetworkID().get()>>8;
1221                 tmp[9]=m_service.getOriginalNetworkID().get()&0xFF;
1222                 capmt.injectDescriptor(tmp, false);
1223
1224                 capmt.writeToBuffer(m_capmt);
1225         }
1226
1227         m_prev_build_hash = build_hash;
1228
1229         if ( m_sendstate != 0xFFFFFFFF )
1230                 m_sendstate=0;
1231         sendCAPMT();
1232 }
1233
1234 void eDVBCAService::sendCAPMT()
1235 {
1236         if ( m_sendstate && m_sendstate != 0xFFFFFFFF ) // broken pipe retry
1237         {
1238                 ::close(m_sock);
1239                 Connect();
1240         }
1241
1242         int wp=0;
1243         if ( m_capmt[3] & 0x80 )
1244         {
1245                 int i=0;
1246                 int lenbytes = m_capmt[3] & ~0x80;
1247                 while(i < lenbytes)
1248                         wp = (wp << 8) | m_capmt[4 + i++];
1249                 wp+=4;
1250                 wp+=lenbytes;
1251         }
1252         else
1253         {
1254                 wp = m_capmt[3];
1255                 wp+=4;
1256         }
1257
1258         if ( write(m_sock, m_capmt, wp) == wp )
1259         {
1260                 m_sendstate=0xFFFFFFFF;
1261                 eDebug("[eDVBCAService] send %d bytes",wp);
1262                 eDVBChannelID chid;
1263                 m_service.getChannelID(chid);
1264                 channel_data *data = getChannelData(chid);
1265                 if (data)
1266                 {
1267                         int lenbytes = m_capmt[3] & 0x80 ? m_capmt[3] & ~0x80 : 0;
1268                         data->m_dataDemux = m_capmt[24+lenbytes];
1269                 }
1270 #if 1
1271                 for(int i=0;i<wp;i++)
1272                         eDebugNoNewLine("%02x ", m_capmt[i]);
1273                 eDebug("");
1274 #endif
1275         }
1276         else
1277         {
1278                 switch(m_sendstate)
1279                 {
1280                         case 0xFFFFFFFF:
1281                                 ++m_sendstate;
1282                                 m_retryTimer->start(0,true);
1283 //                              eDebug("[eDVBCAService] send failed .. immediate retry");
1284                                 break;
1285                         default:
1286                                 m_retryTimer->start(5000,true);
1287 //                              eDebug("[eDVBCAService] send failed .. retry in 5 sec");
1288                                 break;
1289                 }
1290                 ++m_sendstate;
1291         }
1292 }
1293
1294 static PyObject *createTuple(int pid, const char *type)
1295 {
1296         PyObject *r = PyTuple_New(2);
1297         PyTuple_SET_ITEM(r, 0, PyInt_FromLong(pid));
1298         PyTuple_SET_ITEM(r, 1, PyString_FromString(type));
1299         return r;
1300 }
1301
1302 static inline void PyList_AppendSteal(PyObject *list, PyObject *item)
1303 {
1304         PyList_Append(list, item);
1305         Py_DECREF(item);
1306 }
1307
1308 extern void PutToDict(ePyObject &dict, const char*key, ePyObject item); // defined in dvb/frontend.cpp
1309
1310 PyObject *eDVBServicePMTHandler::program::createPythonObject()
1311 {
1312         ePyObject r = PyDict_New();
1313         ePyObject l = PyList_New(0);
1314
1315         PyList_AppendSteal(l, createTuple(0, "pat"));
1316
1317         if (pmtPid != -1)
1318                 PyList_AppendSteal(l, createTuple(pmtPid, "pmt"));
1319
1320         for (std::vector<eDVBServicePMTHandler::videoStream>::const_iterator
1321                         i(videoStreams.begin()); 
1322                         i != videoStreams.end(); ++i)
1323                 PyList_AppendSteal(l, createTuple(i->pid, "video"));
1324
1325         for (std::vector<eDVBServicePMTHandler::audioStream>::const_iterator
1326                         i(audioStreams.begin()); 
1327                         i != audioStreams.end(); ++i)
1328                 PyList_AppendSteal(l, createTuple(i->pid, "audio"));
1329
1330         for (std::vector<eDVBServicePMTHandler::subtitleStream>::const_iterator
1331                         i(subtitleStreams.begin());
1332                         i != subtitleStreams.end(); ++i)
1333                 PyList_AppendSteal(l, createTuple(i->pid, "subtitle"));
1334
1335         PyList_AppendSteal(l, createTuple(pcrPid, "pcr"));
1336
1337         if (textPid != -1)
1338                 PyList_AppendSteal(l, createTuple(textPid, "text"));
1339
1340         PutToDict(r, "pids", l);
1341
1342         return r;
1343 }