+
+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 '0': // PyLong 0
+ tmp = PyLong_FromLong(0);
+ break;
+ 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 python list
+// the first entry in the list is a python string to specify the format of the returned tuples (in a list)
+// 0 = PyLong(0)
+// 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
+// then for each service follows a tuple
+// first tuple entry is the servicereference (as string... use the ref.toString() function)
+// the second is the type of query
+// 2 = event_id
+// -1 = event before given start_time
+// 0 = event intersects given start_time
+// +1 = event after given start_time
+// 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 .. for query all events in time range)
+
+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(eDVBLocalTimeHandler::getInstance()->nowTime()) :
+ 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))
+ {
+ bool service_changed=false;
+ 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");
+ goto skip_entry;
+ }
+ service = entry;
+ break;
+ }
+ case 1:
+ type=PyInt_AsLong(entry);
+ if (type < -1 || type > 2)
+ {
+ eDebug("unknown type %d", type);
+ goto skip_entry;
+ }
+ 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;
+ }
+
+ // redirect subservice querys to parent service
+ eServiceReferenceDVB &dvb_ref = (eServiceReferenceDVB&)ref;
+ if (dvb_ref.getParentTransportStreamID().get()) // linkage subservice
+ {
+ eServiceCenterPtr service_center;
+ if (!eServiceCenter::getPrivInstance(service_center))
+ {
+ dvb_ref.setTransportStreamID( dvb_ref.getParentTransportStreamID() );
+ dvb_ref.setServiceID( dvb_ref.getParentServiceID() );
+ dvb_ref.setParentTransportStreamID(eTransportStreamID(0));
+ dvb_ref.setParentServiceID(eServiceID(0));
+ dvb_ref.name="";
+ service = PyString_FromString(dvb_ref.toString().c_str());
+ service_changed = true;
+ }
+ }
+
+ 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_changed)
+ Py_DECREF(service);
+ if (service_name)
+ Py_DECREF(service_name);
+ }
+skip_entry:
+ ;
+ }
+ if (convertFuncArgs)
+ Py_DECREF(convertFuncArgs);
+ if (nowTime)
+ Py_DECREF(nowTime);
+ return dest_list;
+}
+
+void fillTuple2(PyObject *tuple, const char *argstring, int argcount, eventData *evData, ePtr<eServiceEvent> &ptr, PyObject *service_name, PyObject *service_reference)
+{
+ PyObject *tmp=NULL;
+ int pos=0;
+ while(pos < argcount)
+ {
+ bool inc_refcount=false;
+ switch(argstring[pos])
+ {
+ case '0': // PyLong 0
+ tmp = PyLong_FromLong(0);
+ break;
+ case 'I': // Event Id
+ tmp = PyLong_FromLong(evData->getEventID());
+ break;
+ case 'B': // Event Begin Time
+ if (ptr)
+ tmp = ptr ? PyLong_FromLong(ptr->getBeginTime()) : NULL;
+ else
+ tmp = PyLong_FromLong(evData->getStartTime());
+ break;
+ case 'D': // Event Duration
+ if (ptr)
+ tmp = ptr ? PyLong_FromLong(ptr->getDuration()) : NULL;
+ else
+ tmp = PyLong_FromLong(evData->getDuration());
+ 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 'R': // service reference string
+ tmp = service_reference;
+ inc_refcount = true;
+ break;
+ case 'N': // service name
+ tmp = service_name;
+ inc_refcount = true;
+ break;
+ }
+ if (!tmp)
+ {
+ tmp = Py_None;
+ inc_refcount = true;
+ }
+ if (inc_refcount)
+ Py_INCREF(tmp);
+ PyTuple_SET_ITEM(tuple, pos++, tmp);
+ }
+}
+
+// here we get a python tuple
+// the first entry in the tuple is a python string to specify the format of the returned tuples (in a list)
+// I = Event Id
+// B = Event Begin Time
+// D = Event Duration
+// T = Event Title
+// S = Event Short Description
+// E = Event Extended Description
+// R = Service Reference
+// N = Service Name
+// the second tuple entry is the MAX matches value
+// the third tuple entry is the type of query
+// 0 = search for similar broadcastings (SIMILAR_BROADCASTINGS_SEARCH)
+// 1 = search events with exactly title name (EXAKT_TITLE_SEARCH)
+// 2 = search events with text in title name (PARTIAL_TITLE_SEARCH)
+// when type is 0 (SIMILAR_BROADCASTINGS_SEARCH)
+// the fourth is the servicereference string
+// the fifth is the eventid
+// when type is 1 or 2 (EXAKT_TITLE_SEARCH or PARTIAL_TITLE_SEARCH)
+// the fourth is the search text
+// the fifth is
+// 0 = case sensitive (CASE_CHECK)
+// 1 = case insensitive (NO_CASECHECK)
+
+PyObject *eEPGCache::search(PyObject *arg)
+{
+ PyObject *ret = 0;
+ int descridx = -1;
+ __u32 descr[512];
+ int eventid = -1;
+ const char *argstring=0;
+ char *refstr=0;
+ int argcount=0;
+ int querytype=-1;
+ bool needServiceEvent=false;
+ int maxmatches=0;
+
+ if (PyTuple_Check(arg))
+ {
+ int tuplesize=PyTuple_Size(arg);
+ if (tuplesize > 0)
+ {
+ PyObject *obj = PyTuple_GET_ITEM(arg,0);
+ if (PyString_Check(obj))
+ {
+ argcount = PyString_GET_SIZE(obj);
+ argstring = PyString_AS_STRING(obj);
+ for (int i=0; i < argcount; ++i)
+ switch(argstring[i])
+ {
+ case 'S':
+ case 'E':
+ case 'T':
+ needServiceEvent=true;
+ default:
+ break;
+ }
+ }
+ else
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "type error");
+ eDebug("tuple arg 0 is not a string");
+ return NULL;
+ }
+ }
+ if (tuplesize > 1)
+ maxmatches = PyLong_AsLong(PyTuple_GET_ITEM(arg, 1));
+ if (tuplesize > 2)
+ {
+ querytype = PyLong_AsLong(PyTuple_GET_ITEM(arg, 2));
+ if (tuplesize > 4 && querytype == 0)
+ {
+ PyObject *obj = PyTuple_GET_ITEM(arg, 3);
+ if (PyString_Check(obj))
+ {
+ refstr = PyString_AS_STRING(obj);
+ eServiceReferenceDVB ref(refstr);
+ if (ref.valid())
+ {
+ eventid = PyLong_AsLong(PyTuple_GET_ITEM(arg, 4));
+ singleLock s(cache_lock);
+ const eventData *evData = 0;
+ lookupEventId(ref, eventid, evData);
+ if (evData)
+ {
+ __u8 *data = evData->EITdata;
+ int tmp = evData->ByteSize-12;
+ __u32 *p = (__u32*)(data+12);
+ // search short and extended event descriptors
+ while(tmp>0)
+ {
+ __u32 crc = *p++;
+ descriptorMap::iterator it =
+ eventData::descriptors.find(crc);
+ if (it != eventData::descriptors.end())
+ {
+ __u8 *descr_data = it->second.second;
+ switch(descr_data[0])
+ {
+ case 0x4D ... 0x4E:
+ descr[++descridx]=crc;
+ default:
+ break;
+ }
+ }
+ tmp-=4;
+ }
+ }
+ if (descridx<0)
+ eDebug("event not found");
+ }
+ else
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "type error");
+ eDebug("tuple arg 4 is not a valid service reference string");
+ return NULL;
+ }
+ }
+ else
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "type error");
+ eDebug("tuple arg 4 is not a string");
+ return NULL;
+ }
+ }
+ else if (tuplesize > 4 && (querytype == 1 || querytype == 2) )
+ {
+ PyObject *obj = PyTuple_GET_ITEM(arg, 3);
+ if (PyString_Check(obj))
+ {
+ int casetype = PyLong_AsLong(PyTuple_GET_ITEM(arg, 4));
+ const char *str = PyString_AS_STRING(obj);
+ int textlen = PyString_GET_SIZE(obj);
+ if (querytype == 1)
+ eDebug("lookup for events with '%s' as title(%s)", str, casetype?"ignore case":"case sensitive");
+ else
+ eDebug("lookup for events with '%s' in title(%s)", str, casetype?"ignore case":"case sensitive");
+ singleLock s(cache_lock);
+ for (descriptorMap::iterator it(eventData::descriptors.begin());
+ it != eventData::descriptors.end() && descridx < 511; ++it)
+ {
+ __u8 *data = it->second.second;
+ if ( data[0] == 0x4D ) // short event descriptor
+ {
+ int title_len = data[5];
+ if ( querytype == 1 )
+ {
+ if (title_len > textlen)
+ continue;
+ else if (title_len < textlen)
+ continue;
+ if ( casetype )
+ {
+ if ( !strncasecmp((const char*)data+6, str, title_len) )
+ {
+// std::string s((const char*)data+6, title_len);
+// eDebug("match1 %s %s", str, s.c_str() );
+ descr[++descridx] = it->first;
+ }
+ }
+ else if ( !strncmp((const char*)data+6, str, title_len) )
+ {
+// std::string s((const char*)data+6, title_len);
+// eDebug("match2 %s %s", str, s.c_str() );
+ descr[++descridx] = it->first;
+ }
+ }
+ else
+ {
+ int idx=0;
+ while((title_len-idx) >= textlen)
+ {
+ if (casetype)
+ {
+ if (!strncasecmp((const char*)data+6+idx, str, textlen) )
+ {
+ descr[++descridx] = it->first;
+// std::string s((const char*)data+6, title_len);
+// eDebug("match 3 %s %s", str, s.c_str() );
+ break;
+ }
+ else if (!strncmp((const char*)data+6+idx, str, textlen) )
+ {
+ descr[++descridx] = it->first;
+// std::string s((const char*)data+6, title_len);
+// eDebug("match 4 %s %s", str, s.c_str() );
+ break;
+ }
+ }
+ ++idx;
+ }
+ }
+ }
+ }
+ }
+ else
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "type error");
+ eDebug("tuple arg 4 is not a string");
+ return NULL;
+ }
+ }
+ else
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "type error");
+ eDebug("tuple arg 3(%d) is not a known querytype(0, 1, 2)", querytype);
+ return NULL;
+ }
+ }
+ else
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "type error");
+ eDebug("not enough args in tuple");
+ return NULL;
+ }
+ }
+ else
+ {
+ PyErr_SetString(PyExc_StandardError,
+ "type error");
+ eDebug("arg 0 is not a tuple");
+ return NULL;
+ }
+
+ if (descridx > -1)
+ {
+ int maxcount=maxmatches;
+ eServiceReferenceDVB ref(refstr?refstr:"");
+ // ref is only valid in SIMILAR_BROADCASTING_SEARCH
+ // in this case we start searching with the base service
+ bool first = ref.valid() ? true : false;
+ singleLock s(cache_lock);
+ eventCache::iterator cit(ref.valid() ? eventDB.find(ref) : eventDB.begin());
+ while(cit != eventDB.end() && maxcount)
+ {
+ if ( ref.valid() && !first && cit->first == ref )
+ {
+ // do not scan base service twice ( only in SIMILAR BROADCASTING SEARCH )
+ ++cit;
+ continue;
+ }
+ PyObject *service_name=0;
+ PyObject *service_reference=0;
+ timeMap &evmap = cit->second.second;
+ // check all events
+ for (timeMap::iterator evit(evmap.begin()); evit != evmap.end() && maxcount; ++evit)
+ {
+ if (evit->second->getEventID() == eventid)
+ continue;
+ __u8 *data = evit->second->EITdata;
+ int tmp = evit->second->ByteSize-12;
+ __u32 *p = (__u32*)(data+12);
+ // check if any of our descriptor used by this event
+ int cnt=-1;
+ while(tmp>0)
+ {
+ __u32 crc32 = *p++;
+ for ( int i=0; i <= descridx; ++i)
+ {
+ if (descr[i] == crc32) // found...
+ ++cnt;
+ }
+ tmp-=4;
+ }
+ if ( (querytype == 0 && cnt == descridx) ||
+ ((querytype == 1 || querytype == 2) && cnt != -1) )
+ {
+ const uniqueEPGKey &service = cit->first;
+ eServiceReference ref =
+ eDVBDB::getInstance()->searchReference(service.tsid, service.onid, service.sid);
+ if (ref.valid())
+ {
+ // create servive event
+ ePtr<eServiceEvent> ptr;
+ if (needServiceEvent)
+ {
+ lookupEventId(ref, evit->first, ptr);
+ if (!ptr)
+ eDebug("event not found !!!!!!!!!!!");
+ }
+ // create service name
+ if (!service_name && strchr(argstring,'N'))
+ {
+ 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>");
+ }
+ // create servicereference string
+ if (!service_reference && strchr(argstring,'R'))
+ service_reference = PyString_FromString(ref.toString().c_str());
+ // create list
+ if (!ret)
+ ret = PyList_New(0);
+ // create tuple
+ PyObject *tuple = PyTuple_New(argcount);
+ // fill tuple
+ fillTuple2(tuple, argstring, argcount, evit->second, ptr, service_name, service_reference);
+ PyList_Append(ret, tuple);
+ Py_DECREF(tuple);
+ --maxcount;
+ }
+ }
+ }
+ if (service_name)
+ Py_DECREF(service_name);
+ if (service_reference)
+ Py_DECREF(service_reference);
+ if (first)
+ {
+ // now start at first service in epgcache database ( only in SIMILAR BROADCASTING SEARCH )
+ first=false;
+ cit=eventDB.begin();
+ }
+ else
+ ++cit;
+ }
+ }
+
+ if (!ret)
+ {
+ Py_INCREF(Py_None);
+ ret=Py_None;
+ }
+
+ return ret;
+}
+
+#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->getServiceReference(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++];
+
+// WORKAROUND for wrong transmitted epg data
+ if ( onid == 0x85 && tsid == 0x11 && sid == 0xd3 ) // premiere sends wrong tsid here
+ tsid = 0x1;
+ else if ( onid == 0x85 && tsid == 0x3 && sid == 0xf5 ) // premiere sends wrong sid here
+ sid = 0xdc;
+////////////////////////////////////////////
+
+ 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, PRIVATE );
+ evMap[event_id] = d;
+ tmMap[stime] = d;
+ }
+}
+
+void eEPGCache::channel_data::startPrivateReader()
+{
+ eDVBSectionFilterMask mask;
+ memset(&mask, 0, sizeof(mask));
+ mask.pid = m_PrivatePid;
+ mask.flags = eDVBSectionFilterMask::rfCRC;
+ mask.data[0] = 0xA0;
+ mask.mask[0] = 0xFF;
+ eDebug("[EPGC] start privatefilter for pid %04x and version %d", m_PrivatePid, m_PrevVersion);
+ if (m_PrevVersion != -1)
+ {
+ mask.data[3] = m_PrevVersion << 1;
+ mask.mask[3] = 0x3E;
+ mask.mode[3] = 0x3E;
+ }
+ seenPrivateSections.clear();
+ if (!m_PrivateConn)
+ m_PrivateReader->connectRead(slot(*this, &eEPGCache::channel_data::readPrivateData), m_PrivateConn);
+ m_PrivateReader->start(mask);
+}
+
+void eEPGCache::channel_data::readPrivateData( const __u8 *data)
+{
+ if ( seenPrivateSections.find( data[6] ) == seenPrivateSections.end() )
+ {
+ cache->privateSectionRead(m_PrivateService, data);
+ seenPrivateSections.insert(data[6]);
+ }
+ if ( seenPrivateSections.size() == (unsigned int)(data[7] + 1) )
+ {
+ eDebug("[EPGC] private finished");
+ m_PrevVersion = (data[5] & 0x3E) >> 1;
+ startPrivateReader();
+ }
+}
+
+#endif // ENABLE_PRIVATE_EPG
+
+#ifdef ENABLE_MHW_EPG
+void eEPGCache::channel_data::cleanup()
+{
+ m_channels.clear();
+ m_themes.clear();
+ m_titles.clear();
+ m_program_ids.clear();
+}
+
+__u8 *eEPGCache::channel_data::delimitName( __u8 *in, __u8 *out, int len_in )
+{
+ // Names in mhw structs are not strings as they are not '\0' terminated.
+ // This function converts the mhw name into a string.
+ // Constraint: "length of out" = "length of in" + 1.
+ int i;
+ for ( i=0; i < len_in; i++ )
+ out[i] = in[i];
+
+ i = len_in - 1;
+ while ( ( i >=0 ) && ( out[i] == 0x20 ) )
+ i--;
+
+ out[i+1] = 0;
+ return out;
+}
+
+void eEPGCache::channel_data::timeMHW2DVB( u_char hours, u_char minutes, u_char *return_time)
+// For time of day
+{
+ return_time[0] = toBCD( hours );
+ return_time[1] = toBCD( minutes );
+ return_time[2] = 0;
+}
+
+void eEPGCache::channel_data::timeMHW2DVB( int minutes, u_char *return_time)
+{
+ timeMHW2DVB( int(minutes/60), minutes%60, return_time );
+}
+
+void eEPGCache::channel_data::timeMHW2DVB( u_char day, u_char hours, u_char minutes, u_char *return_time)
+// For date plus time of day
+{
+ // Remove offset in mhw time.
+ __u8 local_hours = hours;
+ if ( hours >= 16 )
+ local_hours -= 4;
+ else if ( hours >= 8 )
+ local_hours -= 2;
+
+ // As far as we know all mhw time data is sent in central Europe time zone.
+ // So, temporarily set timezone to western europe
+ time_t dt = eDVBLocalTimeHandler::getInstance()->nowTime();
+
+ char *old_tz = getenv( "TZ" );
+ putenv("TZ=CET-1CEST,M3.5.0/2,M10.5.0/3");
+ tzset();
+
+ tm *localnow = localtime( &dt );
+
+ if (day == 7)
+ day = 0;
+ if ( day + 1 < localnow->tm_wday ) // day + 1 to prevent old events to show for next week.
+ day += 7;
+ if (local_hours <= 5)
+ day++;
+
+ dt += 3600*24*(day - localnow->tm_wday); // Shift dt to the recording date (local time zone).
+ dt += 3600*(local_hours - localnow->tm_hour); // Shift dt to the recording hour.
+
+ tm *recdate = gmtime( &dt ); // This will also take care of DST.
+
+ if ( old_tz == NULL )
+ unsetenv( "TZ" );
+ else
+ putenv( old_tz );
+ tzset();
+
+ // Calculate MJD according to annex in ETSI EN 300 468
+ int l=0;
+ if ( recdate->tm_mon <= 1 ) // Jan or Feb
+ l=1;
+ int mjd = 14956 + recdate->tm_mday + int( (recdate->tm_year - l) * 365.25) +
+ int( (recdate->tm_mon + 2 + l * 12) * 30.6001);
+
+ return_time[0] = (mjd & 0xFF00)>>8;
+ return_time[1] = mjd & 0xFF;
+
+ timeMHW2DVB( recdate->tm_hour, minutes, return_time+2 );
+}
+
+void eEPGCache::channel_data::storeTitle(std::map<__u32, mhw_title_t>::iterator itTitle, std::string sumText, const __u8 *data)
+// data is borrowed from calling proc to save memory space.
+{
+ // For each title a separate EIT packet will be sent to eEPGCache::sectionRead()
+ __u8 name[24];
+
+ eit_t *packet = (eit_t *) data;
+ packet->table_id = 0x50;
+ packet->section_syntax_indicator = 1;
+ packet->service_id_hi = m_channels[ itTitle->second.channel_id - 1 ].channel_id_hi;
+ packet->service_id_lo = m_channels[ itTitle->second.channel_id - 1 ].channel_id_lo;
+ packet->version_number = 0; // eEPGCache::sectionRead() will dig this for the moment
+ packet->current_next_indicator = 0;
+ packet->section_number = 0; // eEPGCache::sectionRead() will dig this for the moment
+ packet->last_section_number = 0; // eEPGCache::sectionRead() will dig this for the moment
+ packet->transport_stream_id_hi = m_channels[ itTitle->second.channel_id - 1 ].transport_stream_id_hi;
+ packet->transport_stream_id_lo = m_channels[ itTitle->second.channel_id - 1 ].transport_stream_id_lo;
+ packet->original_network_id_hi = m_channels[ itTitle->second.channel_id - 1 ].network_id_hi;
+ packet->original_network_id_lo = m_channels[ itTitle->second.channel_id - 1 ].network_id_lo;
+ packet->segment_last_section_number = 0; // eEPGCache::sectionRead() will dig this for the moment
+ packet->segment_last_table_id = 0x50;
+
+ std::string prog_title = (char *) delimitName( itTitle->second.title, name, 23 );
+ int prog_title_length = prog_title.length();
+
+ int packet_length = EIT_SIZE + EIT_LOOP_SIZE + EIT_SHORT_EVENT_DESCRIPTOR_SIZE +
+ prog_title_length + 1;
+
+ eit_event_t *event_data = (eit_event_t *) (data + EIT_SIZE);
+ event_data->event_id_hi = (( itTitle->first ) >> 8 ) & 0xFF;
+ event_data->event_id_lo = ( itTitle->first ) & 0xFF;
+
+ timeMHW2DVB( itTitle->second.day, itTitle->second.hours, itTitle->second.minutes,
+ (u_char *) event_data + 2 );
+ timeMHW2DVB( HILO(itTitle->second.duration), (u_char *) event_data+7 );
+
+ event_data->running_status = 0;
+ event_data->free_CA_mode = 0;
+ int descr_ll = EIT_SHORT_EVENT_DESCRIPTOR_SIZE + 1 + prog_title_length;
+
+ eit_short_event_descriptor_struct *short_event_descriptor =
+ (eit_short_event_descriptor_struct *) ( (u_char *) event_data + EIT_LOOP_SIZE);
+ short_event_descriptor->descriptor_tag = EIT_SHORT_EVENT_DESCRIPTOR;
+ short_event_descriptor->descriptor_length = EIT_SHORT_EVENT_DESCRIPTOR_SIZE +
+ prog_title_length - 1;
+ short_event_descriptor->language_code_1 = 'e';
+ short_event_descriptor->language_code_2 = 'n';
+ short_event_descriptor->language_code_3 = 'g';
+ short_event_descriptor->event_name_length = prog_title_length;
+ delimitName( itTitle->second.title, name, 23 );
+ u_char *event_name = (u_char *) short_event_descriptor + EIT_SHORT_EVENT_DESCRIPTOR_SIZE;
+ memcpy(event_name, name, prog_title_length);
+
+ // Set text length
+ event_name[prog_title_length] = 0;
+
+ if ( sumText.length() > 0 )
+ // There is summary info
+ {
+ unsigned int sum_length = sumText.length();
+ if ( sum_length + short_event_descriptor->descriptor_length <= 0xff )
+ // Store summary in short event descriptor
+ {
+ // Increase all relevant lengths
+ event_name[prog_title_length] = sum_length;
+ short_event_descriptor->descriptor_length += sum_length;
+ packet_length += sum_length;
+ descr_ll += sum_length;
+ sumText.copy( (char *) event_name+prog_title_length+1, sum_length );
+ }
+ else
+ // Store summary in extended event descriptors
+ {
+ int remaining_sum_length = sumText.length();
+ int nbr_descr = int(remaining_sum_length/247) + 1;
+ for ( int i=0; i < nbr_descr; i++)
+ // Loop once per extended event descriptor
+ {
+ eit_extended_descriptor_struct *ext_event_descriptor = (eit_extended_descriptor_struct *) (data + packet_length);
+ sum_length = remaining_sum_length > 247 ? 247 : remaining_sum_length;
+ remaining_sum_length -= sum_length;
+ packet_length += 8 + sum_length;
+ descr_ll += 8 + sum_length;
+
+ ext_event_descriptor->descriptor_tag = EIT_EXTENDED_EVENT_DESCRIPOR;
+ ext_event_descriptor->descriptor_length = sum_length + 6;
+ ext_event_descriptor->descriptor_number = i;
+ ext_event_descriptor->last_descriptor_number = nbr_descr - 1;
+ ext_event_descriptor->iso_639_2_language_code_1 = 'e';
+ ext_event_descriptor->iso_639_2_language_code_2 = 'n';
+ ext_event_descriptor->iso_639_2_language_code_3 = 'g';
+ u_char *the_text = (u_char *) ext_event_descriptor + 8;
+ the_text[-2] = 0;
+ the_text[-1] = sum_length;
+ sumText.copy( (char *) the_text, sum_length, sumText.length() - sum_length - remaining_sum_length );
+ }
+ }
+ }
+ // Add content descriptor
+ u_char *descriptor = (u_char *) data + packet_length;
+ packet_length += 4;
+ descr_ll += 4;
+
+ int content_id = 0;
+ std::string content_descr = (char *) delimitName( m_themes[itTitle->second.theme_id].name, name, 15 );
+ if ( content_descr.find( "FILM" ) != std::string::npos )
+ content_id = 0x10;
+ else if ( content_descr.find( "SPORT" ) != std::string::npos )
+ content_id = 0x40;
+
+ descriptor[0] = 0x54;
+ descriptor[1] = 2;
+ descriptor[2] = content_id;
+ descriptor[3] = 0;
+
+ event_data->descriptors_loop_length_hi = (descr_ll & 0xf00)>>8;
+ event_data->descriptors_loop_length_lo = (descr_ll & 0xff);
+
+ packet->section_length_hi = ((packet_length - 3)&0xf00)>>8;
+ packet->section_length_lo = (packet_length - 3)&0xff;
+
+ // Feed the data to eEPGCache::sectionRead()
+ cache->sectionRead( data, MHW, this );
+}
+
+void eEPGCache::channel_data::startTimeout(int msec)
+{
+ m_MHWTimeoutTimer.start(msec,true);
+ m_MHWTimeoutet=false;
+}
+
+void eEPGCache::channel_data::startMHWReader(__u16 pid, __u8 tid)
+{
+ m_MHWFilterMask.pid = pid;
+ m_MHWFilterMask.data[0] = tid;
+ m_MHWReader->start(m_MHWFilterMask);
+// eDebug("start 0x%02x 0x%02x", pid, tid);
+}
+
+void eEPGCache::channel_data::readMHWData(const __u8 *data)
+{
+ if ( state > 1 || // aborted
+ // have si data.. so we dont read mhw data
+ (haveData & (SCHEDULE|SCHEDULE_OTHER)) )
+ {
+ eDebug("[EPGC] mhw aborted %d", state);
+ }
+ else if (m_MHWFilterMask.pid == 0xD3 && m_MHWFilterMask.data[0] == 0x91)
+ // Channels table
+ {
+ int len = ((data[1]&0xf)<<8) + data[2] - 1;
+ int record_size = sizeof( mhw_channel_name_t );
+ int nbr_records = int (len/record_size);
+
+ for ( int i = 0; i < nbr_records; i++ )
+ {
+ mhw_channel_name_t *channel = (mhw_channel_name_t*) &data[4 + i*record_size];
+ m_channels.push_back( *channel );
+ }
+ haveData |= MHW;
+
+ eDebug("[EPGC] mhw %d channels found", m_channels.size());
+
+ // Channels table has been read, start reading the themes table.
+ startMHWReader(0xD3, 0x92);
+ return;
+ }
+ else if (m_MHWFilterMask.pid == 0xD3 && m_MHWFilterMask.data[0] == 0x92)
+ // Themes table
+ {
+ int len = ((data[1]&0xf)<<8) + data[2] - 16;
+ int record_size = sizeof( mhw_theme_name_t );
+ int nbr_records = int (len/record_size);
+ int idx_ptr = 0;
+ __u8 next_idx = (__u8) *(data + 3 + idx_ptr);
+ __u8 idx = 0;
+ __u8 sub_idx = 0;
+ for ( int i = 0; i < nbr_records; i++ )
+ {
+ mhw_theme_name_t *theme = (mhw_theme_name_t*) &data[19 + i*record_size];
+ if ( i >= next_idx )
+ {
+ idx = (idx_ptr<<4);
+ idx_ptr++;
+ next_idx = (__u8) *(data + 3 + idx_ptr);
+ sub_idx = 0;
+ }
+ else
+ sub_idx++;
+
+ m_themes[idx+sub_idx] = *theme;
+ }
+ eDebug("[EPGC] mhw %d themes found", m_themes.size());
+ // Themes table has been read, start reading the titles table.
+ startMHWReader(0xD2, 0x90);
+ startTimeout(4000);
+ return;
+ }
+ else if (m_MHWFilterMask.pid == 0xD2 && m_MHWFilterMask.data[0] == 0x90)
+ // Titles table
+ {
+ mhw_title_t *title = (mhw_title_t*) data;
+
+ if ( title->channel_id == 0xFF ) // Separator
+ return; // Continue reading of the current table.
+ else
+ {
+ // Create unique key per title
+ __u32 title_id = ((title->channel_id)<<16)|((title->day)<<13)|((title->hours)<<8)|
+ (title->minutes);
+ __u32 program_id = ((title->program_id_hi)<<24)|((title->program_id_mh)<<16)|
+ ((title->program_id_ml)<<8)|(title->program_id_lo);
+
+ if ( m_titles.find( title_id ) == m_titles.end() )
+ {
+ startTimeout(4000);
+ m_titles[ title_id ] = *title;
+ if ( (title->summary_available) && (m_program_ids.find(program_id) == m_program_ids.end()) )
+ // program_ids will be used to gather summaries.
+ m_program_ids[ program_id ] = title_id;
+ return; // Continue reading of the current table.
+ }
+ else if (!checkTimeout())
+ return;
+ }
+ if ( !m_program_ids.empty())
+ {
+ // Titles table has been read, there are summaries to read.
+ // Start reading summaries, store corresponding titles on the fly.
+ startMHWReader(0xD3, 0x90);
+ eDebug("[EPGC] mhw %d titles(%d with summary) found",
+ m_titles.size(),
+ m_program_ids.size());
+ startTimeout(4000);
+ return;
+ }
+ }
+ else if (m_MHWFilterMask.pid == 0xD3 && m_MHWFilterMask.data[0] == 0x90)
+ // Summaries table
+ {
+ mhw_summary_t *summary = (mhw_summary_t*) data;
+
+ // Create unique key per record
+ __u32 program_id = ((summary->program_id_hi)<<24)|((summary->program_id_mh)<<16)|
+ ((summary->program_id_ml)<<8)|(summary->program_id_lo);
+ int len = ((data[1]&0xf)<<8) + data[2];
+
+ // ugly workaround to convert const __u8* to char*
+ char *tmp=0;
+ memcpy(&tmp, &data, sizeof(void*));
+ tmp[len+3] = 0; // Terminate as a string.
+
+ std::map<__u32, __u32>::iterator itProgid( m_program_ids.find( program_id ) );
+ if ( itProgid == m_program_ids.end() )
+ { /* This part is to prevent to looping forever if some summaries are not received yet.
+ There is a timeout of 4 sec. after the last successfully read summary. */
+ if (!m_program_ids.empty() && !checkTimeout())
+ return; // Continue reading of the current table.
+ }
+ else
+ {
+ std::string the_text = (char *) (data + 11 + summary->nb_replays * 7);
+
+ unsigned int pos=0;
+ while((pos = the_text.find("\r\n")) != std::string::npos)
+ the_text.replace(pos, 2, " ");
+
+ // Find corresponding title, store title and summary in epgcache.
+ std::map<__u32, mhw_title_t>::iterator itTitle( m_titles.find( itProgid->second ) );
+ if ( itTitle != m_titles.end() )
+ {
+ startTimeout(4000);
+ storeTitle( itTitle, the_text, data );
+ m_titles.erase( itTitle );
+ }
+ m_program_ids.erase( itProgid );
+ if ( !m_program_ids.empty() )
+ return; // Continue reading of the current table.
+ }
+ }
+ eDebug("[EPGC] mhw finished(%ld) %d summaries not found",
+ eDVBLocalTimeHandler::getInstance()->nowTime(),
+ m_program_ids.size());
+ // Summaries have been read, titles that have summaries have been stored.
+ // Now store titles that do not have summaries.
+ for (std::map<__u32, mhw_title_t>::iterator itTitle(m_titles.begin()); itTitle != m_titles.end(); itTitle++)
+ storeTitle( itTitle, "", data );
+ isRunning &= ~MHW;
+ m_MHWConn=0;
+ if ( m_MHWReader )
+ m_MHWReader->stop();
+ if (haveData)
+ finishEPG();
+}
+
+#endif
git.cweiske.de / enigma2.git / blobdiff