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