+
+void fillTuple(PyObject *tuple, char *argstring, int argcount, PyObject *service, ePtr<eServiceEvent> &ptr, PyObject *nowTime, PyObject *service_name )
+{
+ PyObject *tmp=NULL;
+ int pos=0;
+ while(pos < argcount)
+ {
+ bool inc_refcount=false;
+ switch(argstring[pos])
+ {
+ case 'I': // Event Id
+ tmp = ptr ? PyLong_FromLong(ptr->getEventId()) : NULL;
+ break;
+ case 'B': // Event Begin Time
+ tmp = ptr ? PyLong_FromLong(ptr->getBeginTime()) : NULL;
+ break;
+ case 'D': // Event Duration
+ tmp = ptr ? PyLong_FromLong(ptr->getDuration()) : NULL;
+ break;
+ case 'T': // Event Title
+ tmp = ptr ? PyString_FromString(ptr->getEventName().c_str()) : NULL;
+ break;
+ case 'S': // Event Short Description
+ tmp = ptr ? PyString_FromString(ptr->getShortDescription().c_str()) : NULL;
+ break;
+ case 'E': // Event Extended Description
+ tmp = ptr ? PyString_FromString(ptr->getExtendedDescription().c_str()) : NULL;
+ break;
+ case 'C': // Current Time
+ tmp = nowTime;
+ inc_refcount = true;
+ break;
+ case 'R': // service reference string
+ tmp = service;
+ inc_refcount = true;
+ break;
+ case 'N': // service name
+ tmp = service_name;
+ inc_refcount = true;
+ }
+ if (!tmp)
+ {
+ tmp = Py_None;
+ inc_refcount = true;
+ }
+ if (inc_refcount)
+ Py_INCREF(tmp);
+ PyTuple_SET_ITEM(tuple, pos++, tmp);
+ }
+}
+
+PyObject *handleEvent(ePtr<eServiceEvent> &ptr, PyObject *dest_list, char* argstring, int argcount, PyObject *service, PyObject *nowTime, PyObject *service_name, PyObject *convertFunc, PyObject *convertFuncArgs)
+{
+ if (convertFunc)
+ {
+ fillTuple(convertFuncArgs, argstring, argcount, service, ptr, nowTime, service_name);
+ PyObject *result = PyObject_CallObject(convertFunc, convertFuncArgs);
+ if (result == NULL)
+ {
+ if (service_name)
+ Py_DECREF(service_name);
+ if (nowTime)
+ Py_DECREF(nowTime);
+ Py_DECREF(convertFuncArgs);
+ Py_DECREF(dest_list);
+ return result;
+ }
+ PyList_Append(dest_list, result);
+ Py_DECREF(result);
+ }
+ else
+ {
+ PyObject *tuple = PyTuple_New(argcount);
+ fillTuple(tuple, argstring, argcount, service, ptr, nowTime, service_name);
+ PyList_Append(dest_list, tuple);
+ Py_DECREF(tuple);
+ }
+ return 0;
+}
+
+// here we get a list with tuples
+// first tuple entry is the servicereference
+// the second is the type of query (0 = time, 1 = event_id)
+// the third
+// when type is eventid it is the event_id
+// when type is time then it is the start_time ( 0 for now_time )
+// the fourth is the end_time .. ( optional )
+
+/* argv is a python string
+ I = Event Id
+ B = Event Begin Time
+ D = Event Duration
+ T = Event Title
+ S = Event Short Description
+ E = Event Extended Description
+ C = Current Time
+ R = Service Reference
+ N = Service Name
+*/
+
+PyObject *eEPGCache::lookupEvent(PyObject *list, PyObject *convertFunc)
+{
+ PyObject *convertFuncArgs=NULL;
+ int argcount=0;
+ char *argstring=NULL;
+ if (!PyList_Check(list))
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "type error");
+ eDebug("no list");
+ return NULL;
+ }
+ int listIt=0;
+ int listSize=PyList_Size(list);
+ if (!listSize)
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "not params given");
+ eDebug("not params given");
+ return NULL;
+ }
+ else
+ {
+ PyObject *argv=PyList_GET_ITEM(list, 0); // borrowed reference!
+ if (PyString_Check(argv))
+ {
+ argstring = PyString_AS_STRING(argv);
+ ++listIt;
+ }
+ else
+ argstring = "I"; // just event id as default
+ argcount = strlen(argstring);
+// eDebug("have %d args('%s')", argcount, argstring);
+ }
+ if (convertFunc)
+ {
+ if (!PyCallable_Check(convertFunc))
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "convertFunc must be callable");
+ eDebug("convertFunc is not callable");
+ return NULL;
+ }
+ convertFuncArgs = PyTuple_New(argcount);
+ }
+
+ PyObject *nowTime = strchr(argstring, 'C') ?
+ PyLong_FromLong(time(0)+eDVBLocalTimeHandler::getInstance()->difference()) :
+ NULL;
+
+ bool must_get_service_name = strchr(argstring, 'N') ? true : false;
+
+ // create dest list
+ PyObject *dest_list=PyList_New(0);
+ while(listSize > listIt)
+ {
+ PyObject *item=PyList_GET_ITEM(list, listIt++); // borrowed reference!
+ if (PyTuple_Check(item))
+ {
+ int type=0;
+ long event_id=-1;
+ time_t stime=-1;
+ int minutes=0;
+ int tupleSize=PyTuple_Size(item);
+ int tupleIt=0;
+ PyObject *service=NULL;
+ while(tupleSize > tupleIt) // parse query args
+ {
+ PyObject *entry=PyTuple_GET_ITEM(item, tupleIt); // borrowed reference!
+ switch(tupleIt++)
+ {
+ case 0:
+ {
+ if (!PyString_Check(entry))
+ {
+ eDebug("tuple entry 0 is no a string");
+ continue;
+ }
+ service = entry;
+ break;
+ }
+ case 1:
+ type=PyInt_AsLong(entry);
+ if (type < -1 || type > 2)
+ {
+ eDebug("unknown type %d", type);
+ continue;
+ }
+ break;
+ case 2:
+ event_id=stime=PyInt_AsLong(entry);
+ break;
+ case 3:
+ minutes=PyInt_AsLong(entry);
+ break;
+ default:
+ eDebug("unneeded extra argument");
+ break;
+ }
+ }
+ eServiceReference ref(PyString_AS_STRING(service));
+ if (ref.type != eServiceReference::idDVB)
+ {
+ eDebug("service reference for epg query is not valid");
+ continue;
+ }
+ PyObject *service_name=NULL;
+ if (must_get_service_name)
+ {
+ ePtr<iStaticServiceInformation> sptr;
+ eServiceCenterPtr service_center;
+ eServiceCenter::getPrivInstance(service_center);
+ if (service_center)
+ {
+ service_center->info(ref, sptr);
+ if (sptr)
+ {
+ std::string name;
+ sptr->getName(ref, name);
+ if (name.length())
+ service_name = PyString_FromString(name.c_str());
+ }
+ }
+ if (!service_name)
+ service_name = PyString_FromString("<n/a>");
+ }
+ if (minutes)
+ {
+ Lock();
+ if (!startTimeQuery(ref, stime, minutes))
+ {
+ ePtr<eServiceEvent> ptr;
+ while (!getNextTimeEntry(ptr))
+ {
+ PyObject *ret = handleEvent(ptr, dest_list, argstring, argcount, service, nowTime, service_name, convertFunc, convertFuncArgs);
+ if (ret)
+ return ret;
+ }
+ }
+ Unlock();
+ }
+ else
+ {
+ ePtr<eServiceEvent> ptr;
+ if (stime)
+ {
+ if (type == 2)
+ lookupEventId(ref, event_id, ptr);
+ else
+ lookupEventTime(ref, stime, ptr, type);
+ }
+ PyObject *ret = handleEvent(ptr, dest_list, argstring, argcount, service, nowTime, service_name, convertFunc, convertFuncArgs);
+ if (ret)
+ return ret;
+ }
+ if (service_name)
+ Py_DECREF(service_name);
+ }
+ }
+ if (convertFuncArgs)
+ Py_DECREF(convertFuncArgs);
+ if (nowTime)
+ Py_DECREF(nowTime);
+ return dest_list;
+}
+
+#ifdef ENABLE_PRIVATE_EPG
+#include <dvbsi++/descriptor_tag.h>
+#include <dvbsi++/unknown_descriptor.h>
+#include <dvbsi++/private_data_specifier_descriptor.h>
+
+void eEPGCache::PMTready(eDVBServicePMTHandler *pmthandler)
+{
+ ePtr<eTable<ProgramMapSection> > ptr;
+ if (!pmthandler->getPMT(ptr) && ptr)
+ {
+ std::vector<ProgramMapSection*>::const_iterator i;
+ for (i = ptr->getSections().begin(); i != ptr->getSections().end(); ++i)
+ {
+ const ProgramMapSection &pmt = **i;
+
+ ElementaryStreamInfoConstIterator es;
+ for (es = pmt.getEsInfo()->begin(); es != pmt.getEsInfo()->end(); ++es)
+ {
+ int tmp=0;
+ switch ((*es)->getType())
+ {
+ case 0x05: // private
+ for (DescriptorConstIterator desc = (*es)->getDescriptors()->begin();
+ desc != (*es)->getDescriptors()->end(); ++desc)
+ {
+ switch ((*desc)->getTag())
+ {
+ case PRIVATE_DATA_SPECIFIER_DESCRIPTOR:
+ if (((PrivateDataSpecifierDescriptor*)(*desc))->getPrivateDataSpecifier() == 190)
+ tmp |= 1;
+ break;
+ case 0x90:
+ {
+ UnknownDescriptor *descr = (UnknownDescriptor*)*desc;
+ int descr_len = descr->getLength();
+ if (descr_len == 4)
+ {
+ uint8_t data[descr_len+2];
+ descr->writeToBuffer(data);
+ if ( !data[2] && !data[3] && data[4] == 0xFF && data[5] == 0xFF )
+ tmp |= 2;
+ }
+ break;
+ }
+ default:
+ break;
+ }
+ }
+ default:
+ break;
+ }
+ if (tmp==3)
+ {
+ eServiceReferenceDVB ref;
+ if (!pmthandler->getService(ref))
+ {
+ int pid = (*es)->getPid();
+ messages.send(Message(Message::got_private_pid, ref, pid));
+ return;
+ }
+ }
+ }
+ }
+ }
+ else
+ eDebug("PMTready but no pmt!!");
+}
+
+struct date_time
+{
+ __u8 data[5];
+ time_t tm;
+ date_time( const date_time &a )
+ {
+ memcpy(data, a.data, 5);
+ tm = a.tm;
+ }
+ date_time( const __u8 data[5])
+ {
+ memcpy(this->data, data, 5);
+ tm = parseDVBtime(data[0], data[1], data[2], data[3], data[4]);
+ }
+ date_time()
+ {
+ }
+ const __u8& operator[](int pos) const
+ {
+ return data[pos];
+ }
+};
+
+struct less_datetime
+{
+ bool operator()( const date_time &a, const date_time &b ) const
+ {
+ return abs(a.tm-b.tm) < 360 ? false : a.tm < b.tm;
+ }
+};
+
+void eEPGCache::privateSectionRead(const uniqueEPGKey ¤t_service, const __u8 *data)
+{
+ contentMap &content_time_table = content_time_tables[current_service];
+ singleLock s(cache_lock);
+ std::map< date_time, std::list<uniqueEPGKey>, less_datetime > start_times;
+ eventMap &evMap = eventDB[current_service].first;
+ timeMap &tmMap = eventDB[current_service].second;
+ int ptr=8;
+ int content_id = data[ptr++] << 24;
+ content_id |= data[ptr++] << 16;
+ content_id |= data[ptr++] << 8;
+ content_id |= data[ptr++];
+
+ contentTimeMap &time_event_map =
+ content_time_table[content_id];
+ for ( contentTimeMap::iterator it( time_event_map.begin() );
+ it != time_event_map.end(); ++it )
+ {
+ eventMap::iterator evIt( evMap.find(it->second.second) );
+ if ( evIt != evMap.end() )
+ {
+ delete evIt->second;
+ evMap.erase(evIt);
+ }
+ tmMap.erase(it->second.first);
+ }
+ time_event_map.clear();
+
+ __u8 duration[3];
+ memcpy(duration, data+ptr, 3);
+ ptr+=3;
+ int duration_sec =
+ fromBCD(duration[0])*3600+fromBCD(duration[1])*60+fromBCD(duration[2]);
+
+ const __u8 *descriptors[65];
+ const __u8 **pdescr = descriptors;
+
+ int descriptors_length = (data[ptr++]&0x0F) << 8;
+ descriptors_length |= data[ptr++];
+ while ( descriptors_length > 0 )
+ {
+ int descr_type = data[ptr];
+ int descr_len = data[ptr+1];
+ descriptors_length -= (descr_len+2);
+ if ( descr_type == 0xf2 )
+ {
+ ptr+=2;
+ int tsid = data[ptr++] << 8;
+ tsid |= data[ptr++];
+ int onid = data[ptr++] << 8;
+ onid |= data[ptr++];
+ int sid = data[ptr++] << 8;
+ sid |= data[ptr++];
+ uniqueEPGKey service( sid, onid, tsid );
+ descr_len -= 6;
+ while( descr_len > 0 )
+ {
+ __u8 datetime[5];
+ datetime[0] = data[ptr++];
+ datetime[1] = data[ptr++];
+ int tmp_len = data[ptr++];
+ descr_len -= 3;
+ while( tmp_len > 0 )
+ {
+ memcpy(datetime+2, data+ptr, 3);
+ ptr+=3;
+ descr_len -= 3;
+ tmp_len -= 3;
+ start_times[datetime].push_back(service);
+ }
+ }
+ }
+ else
+ {
+ *pdescr++=data+ptr;
+ ptr += 2;
+ ptr += descr_len;
+ }
+ }
+ __u8 event[4098];
+ eit_event_struct *ev_struct = (eit_event_struct*) event;
+ ev_struct->running_status = 0;
+ ev_struct->free_CA_mode = 1;
+ memcpy(event+7, duration, 3);
+ ptr = 12;
+ const __u8 **d=descriptors;
+ while ( d < pdescr )
+ {
+ memcpy(event+ptr, *d, ((*d)[1])+2);
+ ptr+=(*d++)[1];
+ ptr+=2;
+ }
+ for ( std::map< date_time, std::list<uniqueEPGKey> >::iterator it(start_times.begin()); it != start_times.end(); ++it )
+ {
+ time_t now = eDVBLocalTimeHandler::getInstance()->nowTime();
+ if ( (it->first.tm + duration_sec) < now )
+ continue;
+ memcpy(event+2, it->first.data, 5);
+ int bptr = ptr;
+ int cnt=0;
+ for (std::list<uniqueEPGKey>::iterator i(it->second.begin()); i != it->second.end(); ++i)
+ {
+ event[bptr++] = 0x4A;
+ __u8 *len = event+(bptr++);
+ event[bptr++] = (i->tsid & 0xFF00) >> 8;
+ event[bptr++] = (i->tsid & 0xFF);
+ event[bptr++] = (i->onid & 0xFF00) >> 8;
+ event[bptr++] = (i->onid & 0xFF);
+ event[bptr++] = (i->sid & 0xFF00) >> 8;
+ event[bptr++] = (i->sid & 0xFF);
+ event[bptr++] = 0xB0;
+ bptr += sprintf((char*)(event+bptr), "Option %d", ++cnt);
+ *len = ((event+bptr) - len)-1;
+ }
+ int llen = bptr - 12;
+ ev_struct->descriptors_loop_length_hi = (llen & 0xF00) >> 8;
+ ev_struct->descriptors_loop_length_lo = (llen & 0xFF);
+
+ time_t stime = it->first.tm;
+ while( tmMap.find(stime) != tmMap.end() )
+ ++stime;
+ event[6] += (stime - it->first.tm);
+ __u16 event_id = 0;
+ while( evMap.find(event_id) != evMap.end() )
+ ++event_id;
+ event[0] = (event_id & 0xFF00) >> 8;
+ event[1] = (event_id & 0xFF);
+ time_event_map[it->first.tm]=std::pair<time_t, __u16>(stime, event_id);
+ eventData *d = new eventData( ev_struct, bptr, eEPGCache::SCHEDULE );
+ evMap[event_id] = d;
+ tmMap[stime] = d;
+ }
+}
+
+void eEPGCache::channel_data::startPrivateReader(int pid, int version)
+{
+ eDVBSectionFilterMask mask;
+ memset(&mask, 0, sizeof(mask));
+ mask.pid = pid;
+ mask.flags = eDVBSectionFilterMask::rfCRC;
+ mask.data[0] = 0xA0;
+ mask.mask[0] = 0xFF;
+ eDebug("start privatefilter for pid %04x and version %d", pid, version);
+ if (version != -1)
+ {
+ mask.data[3] = version << 1;
+ mask.mask[3] = 0x3E;
+ mask.mode[3] = 0x3E;
+ }
+ seenPrivateSections.clear();
+ m_PrivateReader->connectRead(slot(*this, &eEPGCache::channel_data::readPrivateData), m_PrivateConn);
+ m_PrivateReader->start(mask);
+#ifdef NEED_DEMUX_WORKAROUND
+ m_PrevVersion=version;
+#endif
+}
+
+void eEPGCache::channel_data::readPrivateData( const __u8 *data)
+{
+ if (!data)
+ eDebug("get Null pointer from section reader !!");
+ else
+ {
+ if ( seenPrivateSections.find( data[6] ) == seenPrivateSections.end() )
+ {
+#ifdef NEED_DEMUX_WORKAROUND
+ int version = data[5];
+ version = ((version & 0x3E) >> 1);
+ can_delete = 0;
+ if ( m_PrevVersion != version )
+ {
+ cache->privateSectionRead(m_PrivateService, data);
+ seenPrivateSections.insert(data[6]);
+ }
+ else
+ eDebug("ignore");
+#else
+ can_delete = 0;
+ cache->privateSectionRead(m_PrivateService, data);
+ seenPrivateSections.insert(data[6]);
+#endif
+ }
+ if ( seenPrivateSections.size() == (unsigned int)(data[7] + 1) )
+ {
+ eDebug("[EPGC] private finished");
+ if (!isRunning)
+ can_delete = 1;
+ int version = data[5];
+ version = ((version & 0x3E) >> 1);
+ startPrivateReader(m_PrivatePid, version);
+ }
+ }
+}
+
+#endif // ENABLE_PRIVATE_EPG