+
+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, eEPGCache::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("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();
+ m_PrivateReader->connectRead(slot(*this, &eEPGCache::channel_data::readPrivateData), m_PrivateConn);
+ m_PrivateReader->start(mask);
+}
+
+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;
+ m_PrevVersion = (data[5] & 0x3E) >> 1;
+ startPrivateReader();
+ }
+ }
+}
+
+#endif // ENABLE_PRIVATE_EPG