diff options
Diffstat (limited to 'eepg.c')
| -rw-r--r-- | eepg.c | 8753 |
1 files changed, 4377 insertions, 4376 deletions
@@ -1,4376 +1,4377 @@ -/*
- * Extended Epg plugin to VDR (C++)
- *
- * (C) 2008-2009 Dingo35
- *
- * This code is based on:
- * -Premiere plugin (C) 2005-2007 Stefan Huelswitt <s.huelswitt@gmx.de>
- * -mhwepg program (C) 2002, 2003 Jean-Claude Repetto <mhwepg@repetto.org>
- * -LoadEpg plugin written by Luca De Pieri <dpluca@libero.it>
- * -Freesat patch written by dom /at/ suborbital.org.uk
- *
- *
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or (at your option) any later version.
- *
- * This code is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- * Or, point your browser to http://www.gnu.org/copyleft/gpl.html
- */
-
-#include <vdr/plugin.h>
-#include <vdr/filter.h>
-#include <vdr/epg.h>
-#include <vdr/channels.h>
-#include <vdr/dvbdevice.h>
-#include <vdr/i18n.h>
-#include <vdr/config.h>
-#include <libsi/section.h>
-#include <libsi/descriptor.h>
-#include <libsi/si.h>
-#include "eepg.h"
-#include "dish.h"
-
-#include <map>
-#include <string>
-#include <stdarg.h>
-
-#define VERBOSE 3
-/* 0 = only print errors, 1 = print channels and themes, 2 = print channels, themes, titles, summaries 3 = debug mode */
-/* all is logged into /var/log/syslog */
-
-#if APIVERSNUM < 10401
-#error You need at least VDR API version 1.4.1 for this plugin
-#endif
-#if APIVERSNUM < 10507
-#define trNOOP(s) (s)
-#endif
-
-//#define DEBUG
-//#define DEBUG2
-
-/*#ifdef DEBUG
-#define d(x) { (x); }
-#else
-#define d(x) ;
-#endif
-#ifdef DEBUG2
-#define d2(x) { (x); }
-#else
-#define d2(x) ;
-#endif*/
-
-#define PMT_SCAN_TIMEOUT 10 // seconds
-#define PMT_SCAN_IDLE 3600 // seconds
-
-static const char *VERSION = "0.0.6pre";
-static const char *DESCRIPTION = trNOOP ("Parses Extended EPG data");
-
-using namespace std;
-
-// --- cSetupEEPG -------------------------------------------------------
-
-const char *optPats[] = {
- "%s",
- "%s (Option %d)",
- "%s (O%d)",
- "#%2$d %1$s",
- "[%2$d] %1$s"
-};
-
-#define NUM_PATS (sizeof(optPats)/sizeof(char *))
-
-char *cs_hexdump (int m, const uchar * buf, int n)
-{
- int i;
- static char dump[1024];
-
- dump[i = 0] = '\0';
- m = (m) ? 3 : 2;
- if (m * n >= (int) sizeof (dump))
- n = (sizeof (dump) / m) - 1;
- while (i < n)
- sprintf (dump + (m * i++), "%02X%s", *buf++, (m > 2) ? " " : "");
- return (dump);
-}
-
-class cSetupEEPG
-{
-public:
- int OptPat;
- int OrderInfo;
- int RatingInfo;
- int FixEpg;
- int DisplayMessage;
-#ifdef DEBUG
- int LogLevel;
-#endif
-
-public:
- cSetupEEPG (void);
-};
-
-cSetupEEPG SetupPE;
-
-cSetupEEPG::cSetupEEPG (void)
-{
- OptPat = 1;
- OrderInfo = 1;
- RatingInfo = 1;
- FixEpg = 0;
- DisplayMessage = 1;
-#ifdef DEBUG
- LogLevel = 0;
-#endif
-
-}
-
-// --- cMenuSetupPremiereEpg ------------------------------------------------------------
-
-class cMenuSetupPremiereEpg:public cMenuSetupPage
-{
-private:
- cSetupEEPG data;
- const char *optDisp[NUM_PATS];
- char buff[NUM_PATS][32];
-protected:
- virtual void Store (void);
-public:
- cMenuSetupPremiereEpg (void);
-};
-
-cMenuSetupPremiereEpg::cMenuSetupPremiereEpg (void)
-{
- data = SetupPE;
- SetSection (tr ("PremiereEPG"));
- optDisp[0] = tr ("off");
- for (unsigned int i = 1; i < NUM_PATS; i++) {
- snprintf (buff[i], sizeof (buff[i]), optPats[i], "Event", 1);
- optDisp[i] = buff[i];
- }
- Add (new cMenuEditStraItem (tr ("Tag option events"), &data.OptPat, NUM_PATS, optDisp));
- Add (new cMenuEditBoolItem (tr ("Show order information"), &data.OrderInfo));
- Add (new cMenuEditBoolItem (tr ("Show rating information"), &data.RatingInfo));
- Add (new cMenuEditBoolItem (tr ("Fix EPG data"), &data.FixEpg));
- Add (new cMenuEditBoolItem (tr ("Display summary message"), &data.DisplayMessage));
-#ifdef DEBUG
- Add (new cMenuEditIntItem (tr ("Level of logging verbosity"), &data.LogLevel, 0, 5));
-#endif
-}
-
-void cMenuSetupPremiereEpg::Store (void)
-{
- SetupPE = data;
- SetupStore ("OptionPattern", SetupPE.OptPat);
- SetupStore ("OrderInfo", SetupPE.OrderInfo);
- SetupStore ("RatingInfo", SetupPE.RatingInfo);
- SetupStore ("FixEpg", SetupPE.FixEpg);
- SetupStore ("DisplayMessage", SetupPE.DisplayMessage);
-#ifdef DEBUG
- SetupStore ("LogLevel", SetupPE.LogLevel);
-#endif
-}
-
-bool CheckLevel(int level)
-{
-#ifdef DEBUG
- if (SetupPE.LogLevel >= level)
-#else
- if (VERBOSE >= level)
-#endif
- {
- return true;
- }
- return false;
-}
-
-const char* PrepareLog(string message)
-{
- message = "EEPG: " + message;
- return message.c_str();
-}
-
-#define MAXSYSLOGBUF 256
-
-//void LogVsyslog(int errLevel, const char * message, ...)
-void LogVsyslog(int errLevel, int const& lineNum, const char * function, const char * message, ...)
-{
- va_list ap;
- char fmt[MAXSYSLOGBUF];
- if (errLevel == LOG_DEBUG) {
- snprintf(fmt, sizeof(fmt), "[%d] %s:%d %s", cThread::ThreadId(), function, lineNum, message);
- } else {
- snprintf(fmt, sizeof(fmt), "[%d] %s", cThread::ThreadId(), message);
- }
- va_start(ap,message);
- vsyslog ( errLevel, fmt, ap );
- va_end(ap);
-}
-
-#define LogI(a, b...) void( CheckLevel(a) ? LogVsyslog ( LOG_INFO, __LINE__, __FUNCTION__, b ) : void() )
-#define LogE(a, b...) void( CheckLevel(a) ? LogVsyslog ( LOG_ERR, __LINE__, __FUNCTION__, b ) : void() )
-#define LogD(a, b...) void( CheckLevel(a) ? LogVsyslog ( LOG_DEBUG, __LINE__, __FUNCTION__, b ) : void() )
-//#define LogE(a, b...) void( CheckLevel(a) ? esyslog ( b ) : void() )
-//#define LogD(a, b...) void( CheckLevel(a) ? dsyslog ( b ) : void() )
-#define prep(s) PrepareLog(s)
-#define prep2(s) s
-
-//void LogF(int level, const char * message, ...) __attribute__ ((format (printf,2,3)));
-
-//void LogF(int level, const char * message, ...)
-//{
-// if (CheckLevel(level)) {
-// va_list ap;
-// va_start(ap,message);
-// vsyslog (LOG_ERR, PrepareLog(message), ap );
-// va_end(ap);
-// }
-//}
-
-#define Asprintf(a, b, c...) void( asprintf(a, b, c) < 0 ? esyslog("memory allocation error - %s", b) : void() )
-
-// --- CRC16 -------------------------------------------------------------------
-
-#define POLY 0xA001 // CRC16
-
-unsigned int crc16 (unsigned int crc, unsigned char const *p, int len)
-{
- while (len--) {
- crc ^= *p++;
- for (int i = 0; i < 8; i++)
- crc = (crc & 1) ? (crc >> 1) ^ POLY : (crc >> 1);
- }
- return crc & 0xFFFF;
-}
-
-// --- cFilterEEPG ------------------------------------------------------
-
-#define STARTTIME_BIAS (20*60)
-
-static int AvailableSources[32];
-static int NumberOfAvailableSources = 0;
-static int LastVersionNagra = -1; //currently only used for Nagra, should be stored per transponder, per system
-
-#ifdef USE_NOEPG
-bool allowedEPG (tChannelID kanalID)
-{
- bool rc;
-
- if (Setup.noEPGMode == 1) {
- rc = false;
- if (strstr (::Setup.noEPGList, kanalID.ToString ()) != NULL)
- rc = true;
- } else {
- rc = true;
- if (strstr (::Setup.noEPGList, kanalID.ToString ()) != NULL)
- rc = false;
- }
-
- return rc;
-}
-#endif /* NOEPG */
-
-
-class cFilterEEPG:public cFilter
-{
-private:
- int pmtpid, pmtsid, pmtidx, pmtnext;
- int UnprocessedFormat[HIGHEST_FORMAT + 1]; //stores the pid when a format is detected on this transponder, and that are not processed yet
- int nEquivChannels, nChannels, nThemes, nTitles, nSummaries, NumberOfTables, Version;
- int TitleCounter, SummaryCounter, NoSummaryCounter, RejectTableId;
- bool EndChannels, EndThemes; //only used for ??
- int MHWStartTime; //only used for MHW1
- bool ChannelsOk;
- //int Format; //the format that this filter currently is processing
- std::map < int, int >ChannelSeq; // ChannelSeq[ChannelId] returns the recordnumber of the channel
-
- Summary_t *Summaries[MAX_TITLES];
- Title_t *Titles[MAX_TITLES];
- sChannel sChannels[MAX_CHANNELS];
- unsigned char Themes[MAX_THEMES][64];
-
- std::map < unsigned short int, unsigned char *>buffer; //buffer[Table_Extension_Id] returns the pointer to the buffer for this TEI
- std::map < unsigned short int, int >bufsize; //bufsize[Table_Extension_Id] returns the buffersize of the buffer for this TEI
- unsigned short int NagraTIE[64]; //at this moment a max of 31 table_ids could be used, so 64 should be enough ....stores the Table_Extension_Id's of summaries received, so they can be processed. Processing while receiving somehow drops sections, the 0x0000 marker will be missed ...
- unsigned short int NagraCounter;
-
- unsigned char InitialChannel[8];
- unsigned char InitialTitle[64];
- unsigned char InitialSummary[64];
-
- void NextPmt (void);
- void ProccessContinuous(u_short Pid, u_char Tid, int Length, const u_char *Data);
-protected:
- virtual void Process (u_short Pid, u_char Tid, const u_char * Data, int Length);
- virtual void AddFilter (u_short Pid, u_char Tid);
- virtual void AddFilter (u_short Pid, u_char Tid, unsigned char Mask);
- virtual void ProcessNextFormat (bool FirstTime);
- virtual int GetChannelsSKYBOX (const u_char * Data, int Length);
- virtual bool GetThemesSKYBOX (void);
- virtual bool ReadFileDictionary (void); //Reads Huffman tables for SKY
- virtual int GetTitlesSKYBOX (const u_char * Data, int Length);
- virtual int GetSummariesSKYBOX (const u_char * Data, int Length);
- virtual int GetChannelsMHW (const u_char * Data, int Length, int MHW); //TODO replace MHW by Format?
- virtual int GetThemesMHW1 (const u_char * Data, int Length);
- virtual int GetNagra (const u_char * Data, int Length);
- virtual void ProcessNagra (void);
- virtual void GetTitlesNagra (const u_char * Data, int Length, unsigned short TableIdExtension);
- virtual char *GetSummaryTextNagra (const u_char * DataStart, long int Offset, unsigned int EventId);
- virtual int GetChannelsNagra (const u_char * Data, int Length);
- virtual int GetThemesNagra (const u_char * Data, int Length, unsigned short TableIdExtension);
- virtual int GetTitlesMHW1 (const u_char * Data, int Length);
- virtual int GetSummariesMHW1 (const u_char * Data, int Length);
- virtual int GetThemesMHW2 (const u_char * Data, int Length);
- virtual int GetTitlesMHW2 (const u_char * Data, int Length);
- virtual int GetSummariesMHW2 (const u_char * Data, int Length);
- virtual void FreeSummaries (void);
- virtual void FreeTitles (void);
- virtual void PrepareToWriteToSchedule (sChannel * C, cSchedules * s, cSchedule * ps[MAX_EQUIVALENCES]); //gets a channel and returns an array of schedules that WriteToSchedule can write to. Call this routine before a batch of titles with the same ChannelId will be WriteToScheduled; batchsize can be 1
- virtual void FinishWriteToSchedule (sChannel * C, cSchedules * s, cSchedule * ps[MAX_EQUIVALENCES]);
- virtual void WriteToSchedule (cSchedule * ps[MAX_EQUIVALENCES], unsigned short int NumberOfEquivalences,
- unsigned int EventId, unsigned int StartTime, unsigned int Duration, char *Text,
- char *SummText, unsigned short int ThemeId, unsigned short int TableId,
- unsigned short int Version, char Rating = 0x00);
- virtual void LoadIntoSchedule (void);
- virtual void LoadEquivalentChannels (void);
-public:
- cFilterEEPG (void);
- virtual void SetStatus (bool On);
- void Trigger (void);
-};
-
-cFilterEEPG::cFilterEEPG (void)
-{
- Trigger ();
- //Set (0x00, 0x00);
-}
-
-void cFilterEEPG::Trigger (void)
-{
- LogI(3, prep("trigger\n"));
- pmtpid = 0;
- pmtidx = 0;
- pmtnext = 0;
-}
-
-void cFilterEEPG::SetStatus (bool On)
-{
- LogI(0, prep("setstatus %d\n"), On);
- if (!On) {
- FreeSummaries ();
- FreeTitles ();
- //Format = 0;
- ChannelsOk = false;
- NumberOfTables = 0;
- } else {
- //Set(0x00,0x00);
- for (int i = 0; i <= HIGHEST_FORMAT; i++)
- UnprocessedFormat[i] = 0; //pid 0 is assumed to be nonvalid for EEPG transfers
- AddFilter (0, 0);
- }
- cFilter::SetStatus (On);
- Trigger ();
-}
-
-void cFilterEEPG::NextPmt (void)
-{
- Del (pmtpid, 0x02);
- pmtpid = 0;
- pmtidx++;
- LogE(3, prep("PMT next\n"));
-}
-
-
-
-// ------------------- Freesat -------------------
-
-/* FreeSat Huffman decoder for VDR
- *
- * Insert GPL licence
- */
-
-/* The following features can be controlled:
- *
- * FREEVIEW_NO_SYSLOG - Disable use of isyslog
- */
-
-#ifndef FREEVIEW_NO_SYSLOG
-#include <vdr/tools.h>
-/* Logging via vdr */
-#ifndef isyslog
-#define isyslog(a...) void( (SysLogLevel > 1) ? syslog_with_tid(LOG_INFO, a) : void() )
-#endif
-void syslog_with_tid (int priority, const char *format, ...) __attribute__ ((format (printf, 2, 3)));
-#else
-#define isyslog(a...) fprintf(stderr,a)
-#endif
-
-
-
-struct hufftab {
- unsigned int value;
- short bits;
- char next;
-};
-
-#define START '\0'
-#define STOP '\0'
-#define ESCAPE '\1'
-
-
-int freesat_decode_error = 0; /* If set an error has occurred during decoding */
-
-static struct hufftab *tables[2][256];
-static int table_size[2][256];
-
-/** \brief Convert a textual character description into a value
- *
- * \param str - Encoded (in someway) string
- *
- * \return Raw character
- */
-static unsigned char resolve_char (char *str)
-{
- int val;
- if (strcmp (str, "ESCAPE") == 0) {
- return ESCAPE;
- } else if (strcmp (str, "STOP") == 0) {
- return STOP;
- } else if (strcmp (str, "START") == 0) {
- return START;
- } else if (sscanf (str, "0x%02x", &val) == 1) {
- return val;
- }
- return str[0];
-
-
-}
-
-
-/** \brief Decode a binary string into a value
- *
- * \param binary - Binary string to decode
- *
- * \return Decoded value
- */
-static unsigned long decode_binary (char *binary)
-{
- unsigned long mask = 0x80000000;
- unsigned long maskval = 0;
- unsigned long val = 0;
- size_t i;
-
- for (i = 0; i < strlen (binary); i++) {
- if (binary[i] == '1') {
- val |= mask;
- }
- maskval |= mask;
- mask >>= 1;
- }
- return val;
-}
-
-/** \brief Load an individual freesat data file
- *
- * \param tableid - Table id that should be loaded
- * \param filename - Filename to load
- */
-static void load_file (int tableid, const char *filename)
-{
- char buf[1024];
- char *from, *to, *binary;
- FILE *fp;
-
- tableid--;
- if ((fp = fopen (filename, "r")) != NULL) {
- LogI(0, prep("Loading table %d Filename <%s>"), tableid + 1, filename);
-
- while (fgets (buf, sizeof (buf), fp) != NULL) {
- from = binary = to = NULL;
- int elems = sscanf (buf, "%a[^:]:%a[^:]:%a[^:]:", &from, &binary, &to);
- if (elems == 3) {
- int bin_len = strlen (binary);
- int from_char = resolve_char (from);
- char to_char = resolve_char (to);
- unsigned long bin = decode_binary (binary);
- int i = table_size[tableid][from_char]++;
-
- tables[tableid][from_char] =
- (struct hufftab *) realloc (tables[tableid][from_char], (i + 1) * sizeof (tables[tableid][from_char][0]));
- tables[tableid][from_char][i].value = bin;
- tables[tableid][from_char][i].next = to_char;
- tables[tableid][from_char][i].bits = bin_len;
- free (from);
- free (to);
- free (binary);
- }
- }
- fclose (fp);
- } else {
- LogE(0, prep("Cannot load <%s> for table %d"), filename, tableid + 1);
- }
-}
-
-
-/** \brief Decode an EPG string as necessary
- *
- * \param src - Possibly encoded string
- * \param size - Size of the buffer
- *
- * \retval NULL - Can't decode
- * \return A decoded string
- */
-char *freesat_huffman_decode (const unsigned char *src, size_t size)
-{
- int tableid;
- freesat_decode_error = 0;
-
- if (src[0] == 0x1f && (src[1] == 1 || src[1] == 2)) {
- int uncompressed_len = 30;
- char *uncompressed = (char *) calloc (1, uncompressed_len + 1);
- unsigned value = 0, byte = 2, bit = 0;
- int p = 0;
- int lastch = START;
-
- tableid = src[1] - 1;
- while (byte < 6 && byte < size) {
- value |= src[byte] << ((5 - byte) * 8);
- byte++;
- }
- //freesat_table_load (); /**< Load the tables as necessary */
-
- do {
- int found = 0;
- unsigned bitShift = 0;
- if (lastch == ESCAPE) {
- char nextCh = (value >> 24) & 0xff;
- found = 1;
- // Encoded in the next 8 bits.
- // Terminated by the first ASCII character.
- bitShift = 8;
- if ((nextCh & 0x80) == 0)
- lastch = nextCh;
- if (p >= uncompressed_len) {
- uncompressed_len += 10;
- uncompressed = (char *) realloc (uncompressed, uncompressed_len + 1);
- }
- uncompressed[p++] = nextCh;
- uncompressed[p] = 0;
- } else {
- int j;
- for (j = 0; j < table_size[tableid][lastch]; j++) {
- unsigned mask = 0, maskbit = 0x80000000;
- short kk;
- for (kk = 0; kk < tables[tableid][lastch][j].bits; kk++) {
- mask |= maskbit;
- maskbit >>= 1;
- }
- if ((value & mask) == tables[tableid][lastch][j].value) {
- char nextCh = tables[tableid][lastch][j].next;
- bitShift = tables[tableid][lastch][j].bits;
- if (nextCh != STOP && nextCh != ESCAPE) {
- if (p >= uncompressed_len) {
- uncompressed_len += 10;
- uncompressed = (char *) realloc (uncompressed, uncompressed_len + 1);
- }
- uncompressed[p++] = nextCh;
- uncompressed[p] = 0;
- }
- found = 1;
- lastch = nextCh;
- break;
- }
- }
- }
- if (found) {
- // Shift up by the number of bits.
- unsigned b;
- for (b = 0; b < bitShift; b++) {
- value = (value << 1) & 0xfffffffe;
- if (byte < size)
- value |= (src[byte] >> (7 - bit)) & 1;
- if (bit == 7) {
- bit = 0;
- byte++;
- } else
- bit++;
- }
- } else {
- LogE (0, prep("Missing table %d entry: <%s>"), tableid + 1, uncompressed);
- // Entry missing in table.
- return uncompressed;
- }
- } while (lastch != STOP && value != 0);
-
- return uncompressed;
- }
- return NULL;
-}
-
-//here all declarations for global variables over all devices
-
-char *ConfDir;
-
-sNodeH *nH, H;
-
-//unsigned char DecodeErrorText[4096]; //TODO only used for debugging?
-
-int Yesterday;
-int YesterdayEpoch;
-int YesterdayEpochUTC;
-
-/*
- * Convert local time to UTC
- */
-time_t LocalTime2UTC (time_t t)
-{
- struct tm *temp;
-
- temp = gmtime (&t);
- temp->tm_isdst = -1;
- return mktime (temp);
-}
-
-/*
- * Convert UTC to local time
- */
-time_t UTC2LocalTime (time_t t)
-{
- return 2 * t - LocalTime2UTC (t);
-}
-
-void GetLocalTimeOffset (void)
-{
- time_t timeLocal;
- struct tm *tmCurrent;
-
- timeLocal = time (NULL);
- timeLocal -= 86400;
- tmCurrent = gmtime (&timeLocal);
- Yesterday = tmCurrent->tm_wday;
- tmCurrent->tm_hour = 0;
- tmCurrent->tm_min = 0;
- tmCurrent->tm_sec = 0;
- tmCurrent->tm_isdst = -1;
- YesterdayEpoch = mktime (tmCurrent);
- YesterdayEpochUTC = UTC2LocalTime (mktime (tmCurrent));
-}
-
-void CleanString (unsigned char *String)
-{
-
-// LogD (1, prep("Unclean: %s"), String);
- unsigned char *Src;
- unsigned char *Dst;
- int Spaces;
- int pC;
- Src = String;
- Dst = String;
- Spaces = 0;
- pC = 0;
- while (*Src) {
- // corrections
- if (*Src == 0x8c) { // iso-8859-2 LATIN CAPITAL LETTER S WITH ACUTE
- *Src = 0xa6;
- }
- if (*Src == 0x8f) { // iso-8859-2 LATIN CAPITAL LETTER Z WITH ACUTE
- *Src = 0xac;
- }
-
- if (*Src!=0x0A && *Src < 0x20) { //don't remove newline
- *Src = 0x20;
- }
- if (*Src == 0x20) {
- Spaces++;
- if (pC == 0) {
- Spaces++;
- }
- } else {
- Spaces = 0;
- }
- if (Spaces < 2) {
- *Dst = *Src;
- Dst++;
- pC++;
- }
- Src++;
- }
- if (Spaces > 0) {
- Dst--;
- *Dst = 0;
- } else {
- *Dst = 0;
- }
-// LogD (1, prep("Clean: %s"), String);
-}
-
-cChannel *GetChannelByID(tChannelID & channelID, bool searchOtherPos)
-{
- cChannel *VC = Channels.GetByChannelID(channelID, true);
- if(!VC && searchOtherPos){
- //look on other satpositions
- for(int i = 0;i < NumberOfAvailableSources;i++){
- channelID = tChannelID(AvailableSources[i], channelID.Nid(), channelID.Tid(), channelID.Sid());
- VC = Channels.GetByChannelID(channelID, true);
- if(VC){
- //found this actually on satellite nextdoor...
- break;
- }
- }
- }
-
- return VC;
-}
-
-bool cFilterEEPG::GetThemesSKYBOX (void) //TODO can't we read this from the DVB stream?
-{
- string FileName = ConfDir;
- FILE *FileThemes;
- char *Line;
- char Buffer[256];
- if (Format == SKY_IT)
- FileName += "/sky_it.themes";
- else if (Format == SKY_UK)
- FileName += "/sky_uk.themes";
- else {
- LogE (0, prep("Error, wrong format detected in GetThemesSKYBOX. Format = %i."), Format);
- return false;
- }
- //asprintf( &FileName, "%s/%s", ConfDir, ( lProviders + CurrentProvider )->Parm3 );
- FileThemes = fopen (FileName.c_str(), "r");
- if (FileThemes == NULL) {
- LogE (0, prep("Error opening file '%s'. %s"), FileName.c_str(), strerror (errno));
- return false;
- } else {
- //int id = 0;
- nThemes = 0;
- char string1[256];
- char string2[256];
- //sTheme *T;
- while ((Line = fgets (Buffer, sizeof (Buffer), FileThemes)) != NULL) {
- memset (string1, 0, sizeof (string1));
- memset (string2, 0, sizeof (string2));
- if (!isempty (Line)) {
- //T = &Themes[nThemes];
- if (sscanf (Line, "%[^=] =%[^\n] ", string1, string2) == 2) {
- snprintf ((char *) Themes[nThemes], 255, "%s", string2);
- } else {
- Themes[nThemes][0] = '\0';
- }
- //id ++;
- nThemes++;
- }
- }
- fclose (FileThemes);
- }
- return true;
-}
-
-bool cFilterEEPG::ReadFileDictionary (void)
-{
- string FileName = ConfDir;
- FILE *FileDict;
- char *Line;
- char Buffer[256];
- switch (Format) {
- case SKY_IT:
- FileName += "/sky_it.dict";
- break;
- case SKY_UK:
- FileName += "/sky_uk.dict";
- break;
- case FREEVIEW:
- FileName += "/freesat.t1";
- load_file (1, FileName.c_str());
- FileName = ConfDir;
- FileName += "/freesat.t2";
- load_file (2, FileName.c_str());
- break;
- default:
- LogE (0 ,prep("Error, wrong format detected in ReadFileDictionary. Format = %i."), Format);
- return false;
- }
- if ((Format == SKY_IT) || (Format == SKY_UK)) { //SKY
- FileDict = fopen (FileName.c_str(), "r");
- if (FileDict == NULL) {
- LogE (0, prep("Error opening file '%s'. %s"), FileName.c_str(), strerror (errno));
- return false;
- } else {
- int i;
- int LenPrefix;
- char string1[256];
- char string2[256];
- H.Value = NULL;
- H.P0 = NULL;
- H.P1 = NULL;
- while ((Line = fgets (Buffer, sizeof (Buffer), FileDict)) != NULL) {
- if (!isempty (Line)) {
- memset (string1, 0, sizeof (string1));
- memset (string2, 0, sizeof (string2));
- if (sscanf (Line, "%c=%[^\n]\n", string1, string2) == 2
- || (sscanf (Line, "%[^=]=%[^\n]\n", string1, string2) == 2)) {
- nH = &H;
- LenPrefix = strlen (string2);
- for (i = 0; i < LenPrefix; i++) {
- switch (string2[i]) {
- case '0':
- if (nH->P0 == NULL) {
- nH->P0 = new sNodeH ();
- nH = nH->P0;
- nH->Value = NULL;
- nH->P0 = NULL;
- nH->P1 = NULL;
- if ((LenPrefix - 1) == i) {
- Asprintf (&nH->Value, "%s", string1);
- }
- } else {
- nH = nH->P0;
- if (nH->Value != NULL || (LenPrefix - 1) == i) {
- LogE (0 ,prep("Error, huffman prefix code already exists for \"%s\"=%s with '%s'"), string1,
- string2, nH->Value);
- }
- }
- break;
- case '1':
- if (nH->P1 == NULL) {
- nH->P1 = new sNodeH ();
- nH = nH->P1;
- nH->Value = NULL;
- nH->P0 = NULL;
- nH->P1 = NULL;
- if ((LenPrefix - 1) == i) {
- Asprintf (&nH->Value, "%s", string1);
- }
- } else {
- nH = nH->P1;
- if (nH->Value != NULL || (LenPrefix - 1) == i) {
- LogE (0, prep("Error, huffman prefix code already exists for \"%s\"=%s with '%s'"), string1,
- string2, nH->Value);
- }
- }
- break;
- default:
- break;
- }
- }
- }
- }
- }
- fclose (FileDict);
- }
-
- // check tree huffman nodes
- FileDict = fopen (FileName.c_str(), "r");
- if (FileDict) {
- int i;
- int LenPrefix;
- char string1[256];
- char string2[256];
- while ((Line = fgets (Buffer, sizeof (Buffer), FileDict)) != NULL) {
- if (!isempty (Line)) {
- memset (string1, 0, sizeof (string1));
- memset (string2, 0, sizeof (string2));
- if (sscanf (Line, "%c=%[^\n]\n", string1, string2) == 2
- || (sscanf (Line, "%[^=]=%[^\n]\n", string1, string2) == 2)) {
- nH = &H;
- LenPrefix = strlen (string2);
- for (i = 0; i < LenPrefix; i++) {
- switch (string2[i]) {
- case '0':
- if (nH->P0 != NULL) {
- nH = nH->P0;
- }
- break;
- case '1':
- if (nH->P1 != NULL) {
- nH = nH->P1;
- }
- break;
- default:
- break;
- }
- }
- if (nH->Value != NULL) {
- if (memcmp (nH->Value, string1, strlen (nH->Value)) != 0) {
- LogE (0, prep("Error, huffman prefix value '%s' not equal to '%s'"), nH->Value, string1);
- }
- } else {
- LogE (0, prep("Error, huffman prefix value is not exists for \"%s\"=%s"), string1, string2);
- }
- }
- }
- }
- fclose (FileDict);
- }
- } //if Format == 3 || Format == 4
- return true;
-}
-
-int DecodeHuffmanCode (const u_char * Data, int Length, unsigned char *DecodeText)
-{
- int i;
- int p;
- int q;
- bool CodeError;
- bool IsFound;
- unsigned char Byte;
- unsigned char lastByte;
- unsigned char Mask;
- unsigned char lastMask;
- nH = &H;
- p = 0;
- q = 0;
- DecodeText[0] = '\0';
- //DecodeErrorText[0] = '\0';
- CodeError = false;
- IsFound = false;
- lastByte = 0;
- lastMask = 0;
- for (i = 0; i < Length; i++) {
- Byte = Data[i];
- Mask = 0x80;
- if (i == 0) {
- Mask = 0x20;
- lastByte = i;
- lastMask = Mask;
- }
-loop1:
- if (IsFound) {
- lastByte = i;
- lastMask = Mask;
- IsFound = false;
- }
- if ((Byte & Mask) == 0) {
- if (CodeError) {
- //DecodeErrorText[q] = 0x30;
- q++;
- goto nextloop1;
- }
- if (nH->P0 != NULL) {
- nH = nH->P0;
- if (nH->Value != NULL) {
- memcpy (&DecodeText[p], nH->Value, strlen (nH->Value));
- p += strlen (nH->Value);
- nH = &H;
- IsFound = true;
- }
- } else {
- memcpy (&DecodeText[p], "<...?...>", 9);
- p += 9;
- i = lastByte;
- Byte = Data[lastByte];
- Mask = lastMask;
- CodeError = true;
- goto loop1;
- }
- } else {
- if (CodeError) {
- //DecodeErrorText[q] = 0x31;
- q++;
- goto nextloop1;
- }
- if (nH->P1 != NULL) {
- nH = nH->P1;
- if (nH->Value != NULL) {
- memcpy (&DecodeText[p], nH->Value, strlen (nH->Value));
- p += strlen (nH->Value);
- nH = &H;
- IsFound = true;
- }
- } else {
- memcpy (&DecodeText[p], "<...?...>", 9);
- p += 9;
- i = lastByte;
- Byte = Data[lastByte];
- Mask = lastMask;
- CodeError = true;
- goto loop1;
- }
- }
-nextloop1:
- Mask = Mask >> 1;
- if (Mask > 0) {
- goto loop1;
- }
- }
- DecodeText[p] = '\0';
- //DecodeErrorText[q] = '\0';
- return p;
-}
-
-void decodeText2 (const unsigned char *from, int len, char *buffer, int buffsize)
-{
- if (from[0] == 0x1f) {
- char *temp = freesat_huffman_decode (from, len);
- if (temp) {
- len = strlen (temp);
- len = len < buffsize - 1 ? len : buffsize - 1;
- strncpy (buffer, temp, len);
- buffer[len] = 0;
- free (temp);
- return;
- }
- }
-
- SI::String convStr;
- SI::CharArray charArray;
- charArray.assign(from, len);
- convStr.setData(charArray, len);
- //LogE(5, prep("decodeText2 from %s - length %d"), from, len);
- convStr.getText(buffer, buffsize);
- //LogE(5, prep("decodeText2 buffer %s - buffsize %d"), buffer, buffsize);
-}
-
-void cFilterEEPG::LoadEquivalentChannels (void)
-{
- char Buffer[1024];
- char *Line;
- FILE *File;
- string FileName = string(ConfDir) + "/" + EEPG_FILE_EQUIV;
-
- File = fopen (FileName.c_str(), "r");
- if (File) {
- memset (Buffer, 0, sizeof (Buffer));
- char string1[256];
- char string2[256];
- char string3[256];
- int int1;
- int int2;
- int int3;
- int int4;
- while ((Line = fgets (Buffer, sizeof (Buffer), File)) != NULL) {
- Line = compactspace (skipspace (stripspace (Line)));
- if (!isempty (Line)) {
- if (sscanf (Line, "%[^ ] %[^ ] %[^\n]\n", string1, string2, string3) == 3) {
- if (string1[0] != '#' && string1[0] != ';') {
- int1 = 0; //TODO: this could be made more readable
- int2 = 0;
- int3 = 0;
- int4 = 0;
- if (sscanf (string1, "%[^-]-%i -%i -%i ", string3, &int1, &int2, &int3) == 4)
- if (sscanf (string2, "%[^-]-%i -%i -%i ", string3, &int1, &int2, &int3) == 4) {
- if (sscanf (string1, "%[^-]-%i -%i -%i -%i ", string3, &int1, &int2, &int3, &int4) != 5) {
- int4 = 0;
- }
- tChannelID OriginalChID = tChannelID (cSource::FromString (string3), int1, int2, int3, int4);
- bool found = false;
- int i = 0;
- sChannel *C = NULL;
- while (i < nChannels && (!found)) {
- C = &sChannels[i];
- if (C->Src[0] == (unsigned int)cSource::FromString (string3) && C->Nid[0] == int1
- && C->Tid[0] == int2 && C->Sid[0] == int3)
- found = true;
- else
- i++;
- }
- if (!found) {
- LogI(2, prep("Warning: in equivalence file, cannot find original channel %s. Perhaps you are tuned to another transponder right now."),
- string1);
- } else {
- cChannel *OriginalChannel = Channels.GetByChannelID (OriginalChID, false);
- if (!OriginalChannel)
- LogI(2, prep("Warning, not found epg channel \'%s\' in channels.conf. Equivalency is assumed to be valid, but perhaps you should check the entry in the equivalents file"), string1); //TODO: skip this ing?
- if (sscanf (string2, "%[^-]-%i -%i -%i ", string3, &int1, &int2, &int3) == 4) {
- if (sscanf (string2, "%[^-]-%i -%i -%i -%i ", string3, &int1, &int2, &int3, &int4)
- != 5) {
- int4 = 0;
- }
- tChannelID EquivChID = tChannelID (cSource::FromString (string3), int1, int2, int3, int4);
- cChannel *EquivChannel = Channels.GetByChannelID (EquivChID, false); //TODO use valid function?
- if (EquivChannel) {
- if (C->NumberOfEquivalences < MAX_EQUIVALENCES) {
- C->Src[C->NumberOfEquivalences] = EquivChannel->Source ();
- C->Nid[C->NumberOfEquivalences] = EquivChannel->Nid ();
- C->Tid[C->NumberOfEquivalences] = EquivChannel->Tid ();
- C->Sid[C->NumberOfEquivalences] = EquivChannel->Sid ();
- C->NumberOfEquivalences++;
- nEquivChannels++;
- LogI(3, prep("Added equivalent nr %i with Channel Id %s-%i-%i-%i to channel with id %i."),
- C->NumberOfEquivalences, *cSource::ToString (C->Src[C->NumberOfEquivalences - 1]),
- C->Nid[C->NumberOfEquivalences - 1], C->Tid[C->NumberOfEquivalences - 1],
- C->Sid[C->NumberOfEquivalences - 1], i);
- } else
- LogE(0, prep("Error, channel with id %i has more than %i equivalences. Increase MAX_EQUIVALENCES."),
- i, MAX_EQUIVALENCES);
- } else
- LogI(0, prep("Warning, not found equivalent channel \'%s\' in channels.conf"), string2);
- }
- } //else !found
- } //if scanf string1
- } //if string1
- } //if scanf
- } //if isempty
- } //while
- fclose (File);
- } //if file
-} //end of loadequiv
-
-/**
- * \brief Get MHW channels
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetChannelsMHW (const u_char * Data, int Length, int MHW)
-{
- if ((MHW == 1) || (nChannels == 0)) { //prevents MHW2 from reading channels twice while waiting for themes on same filter
- sChannelMHW1 *Channel;
- int Size, Off;
- Size = sizeof (sChannelMHW1);
- Off = 4;
- if (MHW == 1) {
- //Channel = (sChannelMHW1 *) (Data + 4);
- nChannels = (Length - Off) / sizeof (sChannelMHW1);
- }
- if (MHW == 2) {
- if (Length > 120)
- nChannels = Data[120];
- else {
- LogE(0, prep("Error, channels packet too short for MHW2."));
- return 0;
- }
- int pName = ((nChannels * 8) + 121);
- if (Length > pName) {
- //Channel = (sChannelMHW1 *) (Data + 120);
- Size -= 14; //MHW2 is 14 bytes shorter
- Off = 121; //and offset differs
- } else {
- LogE(0, prep("Error, channels length does not match pname."));
- return 0;
- }
- }
-
- if (nChannels > MAX_CHANNELS) {
- LogE(0, prep("EEPG: Error, %i channels found more than %i"), nChannels, MAX_CHANNELS);
- return 0;
- } else {
- LogI(1, "| ID | %-26.26s | %-22.22s | FND | %-8.8s |\n", "Channel ID", "Channel Name", "Sky Num.");
- LogI(1, "|------|-%-26.26s-|-%-22.22s-|-----|-%-8.8s-|\n", "------------------------------",
- "-----------------------------", "--------------------");
- int pName = ((nChannels * 8) + 121); //TODO double ...
- for (int i = 0; i < nChannels; i++) {
- Channel = (sChannelMHW1 *) (Data + Off);
- sChannel *C = &sChannels[i];
- C->ChannelId = i;
- ChannelSeq[C->ChannelId] = i; //fill lookup table to go from channel-id to sequence nr in table
- C->SkyNumber = 0;
- if (MHW == 1)
- memcpy (C->Name, &Channel->Name, 16); //MHW1
- else { //MHW2
- int lenName = Data[pName] & 0x0f;
- //LogD (1, prep("EEPGDebug: MHW2 lenName:%d"), lenName);
- decodeText2(&Data[pName+1],lenName,(char*)C->Name,256);
- //memcpy (C->Name, &Data[pName + 1], lenName);
- //else
- //memcpy (C->Name, &Data[pName + 1], 256);
- pName += (lenName + 1);
- }
- C->NumberOfEquivalences = 1; //there is always an original channel. every equivalence adds 1
- C->Src[0] = Source (); //assume all EPG channels are on same satellite, if not, manage this via equivalents!!!
- C->Nid[0] = HILO16 (Channel->NetworkId);
- C->Tid[0] = HILO16 (Channel->TransportId);
- C->Sid[0] = HILO16 (Channel->ServiceId);
- tChannelID channelID = tChannelID (C->Src[0], C->Nid[0], C->Tid[0], C->Sid[0]);
- cChannel *VC = GetChannelByID(channelID, true);
- bool IsFound = (VC);
- if(IsFound) {
- C->Src[0] = VC->Source();
- }
- CleanString (C->Name);
-
- LogI(1, "|% 5d | %-26.26s | %-22.22s | %-3.3s | % 6d |\n", C->ChannelId
- , *tChannelID (C->Src[0], C->Nid[0], C->Tid[0], C->Sid[0]).ToString()
- , C->Name, IsFound ? "YES" : "NO", C->SkyNumber);
-
- Off += Size;
- } //for loop
- } //else nChannels > MAX_CHANNELS
- LoadEquivalentChannels ();
- GetLocalTimeOffset (); //reread timing variables, only used for MHW
- return 2; //obviously, when you get here, channels are read succesfully, but since all channels are sent at once, you can stop now
- } //if nChannels == 0
- LogE (0, prep("Warning: Trying to read Channels more than once!"));
-//you will only get here when GetChannelsMHW is called, and nChannels !=0, e.g. when multiple citpids cause channels to be read multiple times. Second time, do nothing, give error so that the rest of the chain is not restarted also.
- return 0;
-}
-
-/**
- * \brief Get MHW1 Themes
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetThemesMHW1 (const u_char * Data, int Length)
-{ //MHW1 Themes
- if (Length > 19) {
- sThemeMHW1 *Theme = (sThemeMHW1 *) (Data + 19);
- nThemes = (Length - 19) / 15;
- if (nThemes > MAX_THEMES) {
- LogE(1, prep("Error, %i themes found more than %i"), nThemes, MAX_THEMES);
- return 0;
- } else {
- LogI(1, "-------------THEMES FOUND--------------");
- int ThemeId = 0;
- int Offset = 0;
- const u_char *ThemesIndex = (Data + 3);
- for (int i = 0; i < nThemes; i++) {
- if (ThemesIndex[ThemeId] == i) {
- Offset = (Offset + 15) & 0xf0; //TODO do not understand this
- ThemeId++;
- }
- memcpy (&Themes[Offset][0], &Theme->Name, 15);
- Themes[Offset][15] = '\0'; //trailing null
- CleanString (Themes[Offset]);
- LogI(1, prep("%.15s"), Themes[Offset]);
- Offset++;
- Theme++;
- }
- if ((nThemes * 15) + 19 != Length) {
- LogE(0, "Themes error: buffer is smaller or bigger than sum of entries.");
- return 0;
- } else
- return 2;
- }
- }
- return 1;
-}
-
-/**
- * \brief Get MHW2 Themes
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetThemesMHW2 (const u_char * Data, int Length)
-{
- if (!EndThemes) { //only process if not processed
- int p1;
- int p2;
- int pThemeName = 0;
- int pSubThemeName = 0;
- int lenThemeName = 0;
- int lenSubThemeName = 0;
- int pThemeId = 0;
- if (Length > 4) {
- LogI(1, "-------------THEMES FOUND--------------");
- for (int i = 0; i < Data[4]; i++) {
- p1 = ((Data[5 + i * 2] << 8) | Data[6 + i * 2]) + 3;
- if (Length > p1) {
- for (int ii = 0; ii <= (Data[p1] & 0x3f); ii++) {
- p2 = ((Data[p1 + 1 + ii * 2] << 8) | Data[p1 + 2 + ii * 2]) + 3;
- if (Length > p2) {
- if (ii == 0) {
- pThemeName = p2 + 1;
- lenThemeName = Data[p2] & 0x1f;
- lenSubThemeName = 0;
- } else {
- pSubThemeName = p2 + 1;
- lenSubThemeName = Data[p2] & 0x1f;
- }
- if (Length >= (pThemeName + lenThemeName)) {
- pThemeId = ((i & 0x3f) << 6) | (ii & 0x3f);
- if (pThemeId > MAX_THEMES) {
- LogE(1, prep("Error, something wrong with themes id calculation MaxThemes: %i pThemeID:%d"), MAX_THEMES, pThemeId);
- return 0; //fatal error
- }
- if ((lenThemeName + 2) < 256) {
- decodeText2(&Data[pThemeName],lenThemeName,(char*)Themes[pThemeId],256);
- //memcpy (Themes[pThemeId], &Data[pThemeName], lenThemeName);
- if (Length >= (pSubThemeName + lenSubThemeName))
- if (lenSubThemeName > 0)
- if ((lenThemeName + lenSubThemeName + 2) < 256) {
- Themes[pThemeId][lenThemeName] = ' ';
- decodeText2(&Data[pSubThemeName],lenSubThemeName,(char*)&Themes[pThemeId][lenThemeName + 1],256);
- //memcpy (&Themes[pThemeId][lenThemeName + 1], &Data[pSubThemeName], lenSubThemeName);
- }
- CleanString (Themes[pThemeId]);
- LogI(1, prep("%.*s"), lenThemeName + 1 + lenSubThemeName, Themes[pThemeId]);
- //isyslog ("%.15s", (lThemes + pThemeId)->Name);
- nThemes++;
- if (nThemes > MAX_THEMES) {
- LogE(1, prep("Error, %i themes found more than %i"), nThemes, MAX_THEMES);
- return 0; //fatal error
- }
- }
- } else
- return 1; //I assume non fatal error or success
- } else
- return 1; //I assume non fatal error or success
- }
- } else
- return 1; //I assume non fatal error or success
- } //for loop
- //Del (Pid, Tid);
- EndThemes = true;
- return 2; //all themes read
- } //if length
- } //if !EndThemes
- return 1; //non fatal or success
-}
-
-/**
- * \brief Get Nagra Summary text
- *
- * \param TitleEventId EventId passed from title, to check it against the eventId of the summary
- * \return pointer to reserved part of memory with summary text in it, terminated by NULL
- */
-char *cFilterEEPG::GetSummaryTextNagra (const u_char * DataStart, long int Offset, unsigned int TitleEventId)
-//EventId is passed from title, to check it against the eventid of the summary
-{
- u_char *p = (u_char *) DataStart + Offset;
- sSummaryDataNagraGuide *SD = (sSummaryDataNagraGuide *) p;
-
- if (TitleEventId != HILO32 (SD->EventId)) {
- LogI(0, prep("ERROR, Title has EventId %08x and points to Summary with EventId %08x."), TitleEventId,
- HILO32 (SD->EventId));
- return 0; //return empty string
- }
-
- if (CheckLevel(3)) {
- if (SD->AlwaysZero1 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero1 is NOT ZERO:%x.", SD->AlwaysZero1);
- if (SD->AlwaysZero2 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero2 is NOT ZERO:%x.", SD->AlwaysZero2);
- if (SD->AlwaysZero3 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero3 is NOT ZERO:%x.", SD->AlwaysZero3);
- if (SD->AlwaysZero4 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero4 is NOT ZERO:%x.", SD->AlwaysZero4);
- if (SD->AlwaysZero5 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero5 is NOT ZERO:%x.", SD->AlwaysZero5);
- if (SD->AlwaysZero6 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero6 is NOT ZERO:%x.", SD->AlwaysZero6);
- if (SD->AlwaysZero7 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero7 is NOT ZERO:%x.", SD->AlwaysZero7);
- if (SD->AlwaysZero8 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero8 is NOT ZERO:%x.", SD->AlwaysZero8);
- if (SD->AlwaysZero9 != 0)
- isyslog ("EEPGDEBUG: SummAlwaysZero9 is NOT ZERO:%x.", SD->AlwaysZero9);
-
- if (SD->Always1 != 0x31) //1970
- isyslog ("EEPGDEBUG: SummAlways1:%02x.", SD->Always1);
- if (SD->Always9 != 0x39)
- isyslog ("EEPGDEBUG: SummAlways9:%02x.", SD->Always9);
- if (SD->Always7 != 0x37)
- isyslog ("EEPGDEBUG: SummAlways7:%02x.", SD->Always7);
- if (SD->Always0 != 0x30)
- isyslog ("EEPGDEBUG: SummAlways0:%02x.", SD->Always0);
-
- if (SD->Always0x01 != 0x01) // 0x01 byte
- isyslog ("EEPGDEBUG: Summ0x01 byte:%02x.", SD->Always0x01);
- }
- u_char *p2 = (u_char *) DataStart + HILO32 (SD->SummTxtOffset);
- /* esyslog
- ("EEPGDEBUG: EventId %08x NumberOfBlocks %02x BlockId %08x SummTxtOffset %08x *p2: %02x Unkn1:%02x, Unkn2:%02x.",
- HILO32 (SD->EventId), SD->NumberOfBlocks, HILO32 (SD->BlockId), HILO32 (SD->SummTxtOffset), *p2, SD->Unknown1,
- SD->Unknown2);
- */
- unsigned char *Text = NULL; //makes first realloc work like malloc
- int TotLength = 0; //and also makes empty summaries if *p2 != 0x4e
- if (SD->NumberOfBlocks > 1) {
- switch (*p2) {
- case 0x4e: //valid summary text follows
- {
- bool LastTextBlock = false;
-
- do { //for all text parts
- sSummaryTextNagraGuide *ST = (sSummaryTextNagraGuide *) p2;
- p2 += 8; //skip fixed block
- if (ST->AlwaysZero1 != 0)
- LogD(3, prep("DEBUG: ST AlwaysZero1 is NOT ZERO:%x."), ST->AlwaysZero1);
- if (ST->Always0x4e != 0x4e) {
- LogI(0, prep("DEBUG: ST Always0x4e is NOT 0x4e:%x."), ST->AlwaysZero1);
- return 0; //fatal error, empty text
- }
- LogI(5, prep("DEBUG: Textnr %i, Lasttxt %i."), ST->TextNr, ST->LastTextNr);
- int SummaryLength = ST->Textlength;
-
- Text = (unsigned char *) realloc (Text, SummaryLength + TotLength);
- if (Text == NULL) {
- LogI(0, prep("Summaries memory allocation error."));
- return 0; //empty text
- }
- memcpy (Text + TotLength, p2, SummaryLength); //append new textpart
- TotLength += SummaryLength;
- p2 += ST->Textlength; //skip text
-
- LastTextBlock = ((ST->LastTextNr == 0) || (ST->TextNr >= ST->LastTextNr));
- } while (!LastTextBlock);
- Text = (unsigned char *) realloc (Text, 1 + TotLength); //allocate 1 extra byte
- Text[TotLength] = '\0'; //terminate string by NULL char
- LogD(5, prep("DEBUG: Full Text:%s."), Text);
-
- break;
- }
- case 0x8c: //"Geen uitzending" "Geen informatie beschikbaar" e.d.
- {
- sSummaryGBRNagraGuide *GBR = (sSummaryGBRNagraGuide *) p2;
-
- p2 += 16; //skip fixed part, point to byte after Nextlength
- if (CheckLevel(3)) {
- if (GBR->AlwaysZero1 != 0)
- isyslog ("EEPGDEBUG: GBR AlwaysZero1 is NOT ZERO:%x.", GBR->AlwaysZero1);
- if (GBR->AlwaysZero2 != 0)
- isyslog ("EEPGDEBUG: GBR AlwaysZero2 is NOT ZERO:%x.", GBR->AlwaysZero2);
- if (GBR->AlwaysZero3 != 0)
- isyslog ("EEPGDEBUG: GBR AlwaysZero3 is NOT ZERO:%x.", GBR->AlwaysZero3);
- if (GBR->AlwaysZero4 != 0)
- isyslog ("EEPGDEBUG: GBR AlwaysZero4 is NOT ZERO:%x.", GBR->AlwaysZero4);
-
- isyslog ("EEPGDEBUG: Blocklength: %02x Data %02x %02x %02x %02x %02x %02x %02x %02x %02x", GBR->Blocklength,
- GBR->Un1, GBR->Un2, GBR->Un3, GBR->Un4, GBR->Un5, GBR->Un6, GBR->Un7, GBR->Un8, GBR->Un9);
- for (int i = 0; i < GBR->Nextlength; i += 2)
- isyslog ("GBR Extradata %02x %02x.", *(p2 + i), *(p2 + i + 1));
- }
- }
- break;
- default:
- LogE(0, prep("ERROR *p2 has strange value: EventId %08x NumberOfBlocks %02x BlockId %08x SummTxtOffset %08x *p2: %02x Unkn1:%02x, Unkn2:%02x."),
- HILO32 (SD->EventId), SD->NumberOfBlocks, HILO32 (SD->BlockId), HILO32 (SD->SummTxtOffset), *p2,
- SD->Unknown1, SD->Unknown2);
- break;
- } //end of switch
- } //NrOfBlocks > 1
-
- if (TotLength == 0)
- Text = NULL;
-
- p += 29; //skip fixed part of block
- if (SD->NumberOfBlocks == 1)
- p -= 4; //in this case there is NO summarytext AND no GBR??!!
- for (int i = 1; i < (SD->NumberOfBlocks - 1); i++) {
- LogD(3, prep("DEBUG: Extra Blockinfo: %02x %02x %02x %02x."), *p, *(p + 1), *(p + 2), *(p + 3));
- p += 4; //skip this extra blockinfo
- }
- return (char *) Text;
-}
-
-void cFilterEEPG::PrepareToWriteToSchedule (sChannel * C, cSchedules * s, cSchedule * ps[MAX_EQUIVALENCES]) //gets a channel and returns an array of schedules that WriteToSchedule can write to. Call this routine before a batch of titles with the same ChannelId will be WriteToScheduled; batchsize can be 1
-{
- for (int eq = 0; eq < C->NumberOfEquivalences; eq++) {
- tChannelID channelID = tChannelID (C->Src[eq], C->Nid[eq], C->Tid[eq], C->Sid[eq]);
-#ifdef USE_NOEPG
- if (allowedEPG (channelID) && (channelID.Valid ()))
-#else
- if (channelID.Valid ()) //only add channels that are known to vdr
-#endif /* NOEPG */
- ps[eq] = s->AddSchedule (channelID); //open a a schedule for each equivalent channel
- else {
- ps[eq] = NULL;
- LogE(5, prep("ERROR: Titleblock has invalid (equivalent) channel ID: Equivalence: %i, Source:%x, C->Nid:%x,C->Tid:%x,C->Sid:%x."),
- eq, C->Src[eq], C->Nid[eq], C->Tid[eq], C->Sid[eq]);
- }
- }
-}
-
-void cFilterEEPG::FinishWriteToSchedule (sChannel * C, cSchedules * s, cSchedule * ps[MAX_EQUIVALENCES])
-{
- for (int eq = 0; eq < C->NumberOfEquivalences; eq++)
- if (ps[eq]) {
- ps[eq]->Sort ();
- s->SetModified (ps[eq]);
- }
-}
-
-/**
- * \brief write event to schedule
- *
- * \param Duration the Duration of the event in minutes
- * \param ps points to array of schedules ps[eq], where eq is equivalence number of the channel. If channelId is invalid then ps[eq]=NULL
- */
-void cFilterEEPG::WriteToSchedule (cSchedule * ps[MAX_EQUIVALENCES], unsigned short int NumberOfEquivalences, unsigned int EventId, unsigned int StartTime, unsigned int Duration, char *Text, char *SummText, unsigned short int ThemeId, unsigned short int TableId, unsigned short int Version, char Rating)
-{
- bool WrittenTitle = false;
- bool WrittenSummary = false;
- for (int eq = 0; eq < NumberOfEquivalences; eq++) {
- if (ps[eq]) {
- cEvent *Event = NULL;
-
- Event = (cEvent *) ps[eq]->GetEvent (EventId); //since Nagra uses consistent EventIds, try this first
- bool TableIdMatches = false;
- if (Event)
- TableIdMatches = (Event->TableID() == TableId);
- if (!Event || !TableIdMatches || abs(Event->StartTime() - (time_t) StartTime) > Duration * 60) //if EventId does not match, or it matched with wrong TableId, then try with StartTime
- Event = (cEvent *) ps[eq]->GetEvent (EventId, StartTime);
-
- cEvent *newEvent = NULL;
- if (!Event) { //event is new
- Event = newEvent = new cEvent (EventId);
- Event->SetSeen ();
- } else if (Event->TableID() < TableId) { //existing table may not be overwritten
- RejectTableId++;
- //esyslog ("EEPGDEBUG: Rejecting Event, existing TableID:%x, new TableID:%x.", Event->TableID (),
- // TableId);
- Event = NULL;
- }
-
- if (Event) {
- Event->SetEventID (EventId); //otherwise the summary cannot be added later
- Event->SetTableID (TableId); //TableID 0 is reserved for external epg, will not be overwritten; the lower the TableID, the more actual it is
- Event->SetVersion (Version); //TODO use version and tableID to decide whether to update; TODO add language code
- Event->SetStartTime (StartTime);
- Event->SetDuration (Duration * 60);
- if (Rating) {
- Event->SetParentalRating(Rating);
- }
- char *tmp;
- if (Text != 0x00) {
- WrittenTitle = true;
- CleanString ((uchar *) Text);
- Event->SetTitle (Text);
- }
- Asprintf (&tmp, "%s - %d\'", Themes[ThemeId], Duration);
- Event->SetShortText (tmp);
- //strreplace(t, '|', '\n');
- if (SummText != 0x00) {
- WrittenSummary = true;
- CleanString ((uchar *) SummText);
- Event->SetDescription (SummText);
- }
- free (tmp);
- if (newEvent)
- ps[eq]->AddEvent (newEvent);
- //newEvent->FixEpgBugs (); causes segfault
- }
- /* else
- esyslog ("EEPG: ERROR, somehow not able to add/update event.");*///at this moment only reports RejectTableId events
- if (CheckLevel(4)) {
- isyslog ("EEPG: Title:%i, Summary:%i I would put into schedule:", TitleCounter, SummaryCounter);
- //isyslog ("C %s-%i-%i-%i\n", *cSource::ToString (C->Src[eq]), C->Nid[eq], C->Tid[eq], C->Sid[eq]);
- isyslog ("E %u %u %u 01 FF\n", EventId, StartTime, Duration * 60);
- isyslog ("T %s\n", Text);
- isyslog ("S %s - %d\'\n", Themes[ThemeId], Duration);
- isyslog ("D %s\n", SummText);
- isyslog ("e\nc\n.\n");
- }
- } //if ps[eq]
- } //for eq
- if (WrittenTitle)
- TitleCounter++;
- if (WrittenSummary)
- SummaryCounter++;
-}
-
-/**
- * \brief Get Nagra titles
- *
- * \param TableIdExtension the TIE from the relevant summary sections!
- */
-void cFilterEEPG::GetTitlesNagra (const u_char * Data, int Length, unsigned short TableIdExtension)
-{
- u_char *p = (u_char *) Data;
- u_char *DataEnd = (u_char *) Data + Length;
- u_char *next_p;
- unsigned short int MonthdayTitles = ((TableIdExtension & 0x1ff) >> 4); //Day is coded in day of the month
- time_t timeLocal;
- struct tm *tmCurrent;
-
- timeLocal = time (NULL);
- tmCurrent = gmtime (&timeLocal); //gmtime gives UTC; only used for getting current year and current day of the month...
- unsigned short int CurrentMonthday = tmCurrent->tm_mday;
- unsigned short int CurrentYear = tmCurrent->tm_year;
- unsigned short int CurrentMonth = tmCurrent->tm_mon;
- //esyslog("EEPGDEBUG: CurrentMonthday=%i, TableIdExtension:%04x, MonthdayTitles=%i.",CurrentMonthday,TableIdExtension, MonthdayTitles);
- cSchedulesLock SchedulesLock (true);
- cSchedules *s = (cSchedules *) cSchedules::Schedules (SchedulesLock);
- do { //process each block of titles
- sTitleBlockNagraGuide *TB = (sTitleBlockNagraGuide *) p;
- int ChannelId = HILO16 (TB->ChannelId);
- int Blocklength = HILO16 (TB->Blocklength);
- long int NumberOfTitles = HILO32 (TB->NumberOfTitles);
-
- LogD(3, prep("DEBUG: ChannelId %04x, Blocklength %04x, NumberOfTitles %lu."), ChannelId, Blocklength,
- NumberOfTitles);
- p += 4; //skip ChannelId and Blocklength
- next_p = p + Blocklength;
- if (next_p > DataEnd) { //only process if block is complete
- LogE(0, prep("ERROR, Block exceeds end of Data. p:%p, Blocklength:%x,DataEnd:%p."), p, Blocklength, DataEnd);
- return; //fatal error, this should never happen
- }
- p += 4; //skip Titlenumber
-
- sChannel *C = &sChannels[ChannelSeq[ChannelId]]; //find channel
- cSchedule *ps[MAX_EQUIVALENCES];
- PrepareToWriteToSchedule (C, s, ps);
-
- for (int i = 0; i < NumberOfTitles; i++) { //process each title within block
- sTitleNagraGuide *Title = (sTitleNagraGuide *) p;
- unsigned int EventId = HILO32 (Title->EventId);
-
- unsigned int StartTime = Title->StartTimeHigh << 5 | Title->StartTimeLow;
- int Hours = (StartTime / 60);
- int Minutes = StartTime % 60;
-
- /*StartTime */
- tmCurrent->tm_year = CurrentYear;
- tmCurrent->tm_mon = CurrentMonth;
- tmCurrent->tm_mday = MonthdayTitles;
- tmCurrent->tm_hour = 0;
- tmCurrent->tm_min = StartTime; //if starttime is bigger than 1 hour, mktime will correct this!
- tmCurrent->tm_sec = 0;
- tmCurrent->tm_isdst = -1; //now correct with daylight savings
- if (MonthdayTitles < CurrentMonthday - 7) //the titles that are older than one week are not from the past, but from next month!
- //at first this was set at -1 day (= yesterday), but sometimes providers send old data which then
- //end up in next months schedule ...
- tmCurrent->tm_mon++; //if a year border is passed, mktime will take care of this!
- StartTime = UTC2LocalTime (mktime (tmCurrent)); //VDR stores its times in UTC, but wants its input in local time...
-
- char *Text = NULL;
- u_char *t = (u_char *) Data + HILO32 (Title->OffsetToText);
- //u_char *t2 = (u_char *) Data + HILO32 (Title->OffsetToText2);
- if (t >= DataEnd)
- LogE(0, prep("ERROR, Title Text out of range: t:%p, DataEnd:%p, Data:%p, Length:%i."), t, DataEnd, Data,
- Length);
- else {
- Asprintf (&Text, "%.*s", *t, t + 1); //FIXME second text string is not processed right now
- //asprintf (&Text, "%.*s %.*s", *t, t + 1, *t2, t2 + 1);
-
- //now get summary texts
- u_char *DataStartSummaries = buffer[TableIdExtension] + 4;
- unsigned int DataLengthSummaries = bufsize[TableIdExtension] - 4;
- char *SummText = NULL;
- if (HILO32 (Title->SumDataOffset) >= DataLengthSummaries)
- LogE(0, prep("ERROR, SumDataOffset out of range: Title->SumDataOffset:%i, DataLengthSummaries:%i."), HILO32 (Title->SumDataOffset),DataLengthSummaries);
- else
- SummText = GetSummaryTextNagra (DataStartSummaries, HILO32 (Title->SumDataOffset), EventId);
-
- LogD(3, prep("DEBUG: Eventid: %08x ChannelId:%x, Starttime %02i:%02i, Duration %i, OffsetToText:%08x, OffsetToText2:%08x, SumDataOffset:%08x ThemeId:%x Title:%s \n SummaryText:%s"),
- EventId, ChannelId, Hours, Minutes, Title->Duration,
- HILO32 (Title->OffsetToText), HILO32 (Title->OffsetToText2),
- HILO32 (Title->SumDataOffset), Title->ThemeId, Text, SummText);
-
- if (Themes[Title->ThemeId][0] == 0x00) //if detailed themeid is not known, get global themeid
- Title->ThemeId &= 0xf0;
- WriteToSchedule (ps, C->NumberOfEquivalences, EventId, StartTime, Title->Duration, Text, SummText,
- Title->ThemeId, NAGRA_TABLE_ID, Version);
-
- if (Text != NULL)
- free (Text);
- Text = NULL;
- if (SummText != NULL)
- free (SummText);
- SummText = NULL;
- }
-
- if (CheckLevel(3)) {
- if (Title->AlwaysZero16 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero16 (3bits) is NOT ZERO:%x.", Title->AlwaysZero16);
- if (Title->AlwaysZero17 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero17 is NOT ZERO:%x.", Title->AlwaysZero17);
- if (Title->AlwaysZero1 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero1 is NOT ZERO:%x.", Title->AlwaysZero1);
- if (Title->AlwaysZero2 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero2 is NOT ZERO:%x.", Title->AlwaysZero2);
- if (Title->AlwaysZero3 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero3 is NOT ZERO:%x.", Title->AlwaysZero3);
- if (Title->AlwaysZero4 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero4 is NOT ZERO:%x.", Title->AlwaysZero4);
- if (Title->AlwaysZero5 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero5 is NOT ZERO:%x.", Title->AlwaysZero5);
- if (Title->AlwaysZero8 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero8 is NOT ZERO:%x.", Title->AlwaysZero8);
- if (Title->AlwaysZero9 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero9 is NOT ZERO:%x.", Title->AlwaysZero9);
- if (Title->AlwaysZero10 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero10 is NOT ZERO:%x.", Title->AlwaysZero10);
- if (Title->AlwaysZero11 != 0)
- isyslog ("EEPGDEBUG: TitleAlwaysZero11 is NOT ZERO:%x.", Title->AlwaysZero11);
- }
- p += 30; //next title
- } //end for titles
-
- FinishWriteToSchedule (C, s, ps);
- p = next_p;
- } while (p < DataEnd); //end of TitleBlock
-}
-
-int cFilterEEPG::GetThemesNagra (const u_char * Data, int Length, unsigned short TableIdExtension) //return code 0 = fatal error, code 1 = success, code 2 = last item processed
-{
- u_char *DataStart = (u_char *) Data;
- u_char *p = DataStart; //TODO Language code terminated by 0 is ignored
- u_char *DataEnd = DataStart + Length;
- u_char *DataStartTitles = buffer[TableIdExtension] + 4;
- u_char *DataEndTitles = DataStartTitles + bufsize[TableIdExtension] - 4;
- if (Length == 0) {
- LogI(1, prep("NO THEMES FOUND"));
- return 2;
- }
-
- int NumberOfThemes = (*p << 24) | *(p + 1) << 16 | *(p + 2) << 8 | *(p + 3);
- p += 4; //skip number of themes block
- //isyslog ("EEPG: found %i themes.", NumberOfThemes);
-
- if ((nThemes == 0))
- LogI(1, "-------------THEMES FOUND--------------");
-
- for (int i = 0; i < NumberOfThemes; i++) {
- int Textlength = *p;
- p++; //skip textlength byte
- u_char *Text = p;
- u_char ThemeId = 0;
- p += Textlength; //skip text
- int NrOfBlocks = (*p << 8) | *(p + 1);
- p += 2; //skip nrofblocks
- bool AnyDoubt = false;
- u_char *p2 = p;
- p += NrOfBlocks * 8;
- for (int j = 0; j < NrOfBlocks; j++) {
- sThemesTitlesNagraGuide *TT = (sThemesTitlesNagraGuide *) p2;
- p2 += 8; //skip block
- u_char *NewThemeId = DataStartTitles + HILO32 (TT->TitleOffset) + 28;
- if (NewThemeId >= DataEndTitles)
- LogE(0, prep("ERROR, ThemeId out of range: NewThemeId:%p, DataEndTitles:%p, DataStartTitles:%p."), NewThemeId,
- DataEndTitles, DataStartTitles);
- else {
- //esyslog("EEPGDEBUG: NewThemeId:%02x, Text:%s.",*NewThemeId, Text);
- if (Themes[*NewThemeId][0] != 0x00) { //theme is already filled, break off
- AnyDoubt = true;
- break;
- }
- if (j == 0) //first block
- ThemeId = *NewThemeId;
- else if (ThemeId != *NewThemeId) { //different theme ids in block
- if ((ThemeId & 0xf0) != (*NewThemeId & 0xf0)) { //major nible of themeid does not correspond
- LogE(3, prep("ERROR, Theme has multiple indices which differ in major nibble, old index = %x, new index = %x. Ignoring both indices."),
- ThemeId, *NewThemeId);
- AnyDoubt = true;
- break;
- } else if ((ThemeId & 0x0f) != 0) //ThemeId is like 1a, 2a, not like 10,20. So it is minor in tree-structure, and it should be labeled in major part of tree
- ThemeId = *NewThemeId; //lets hope new themeid is major, if not, it has not worsened....
- }
- } //else NewThemeId >= DataEndTitles
- if (CheckLevel(3)) {
- if (TT->Always1 != 1)
- isyslog ("EEPGDEBUG: TT Always1 is NOT 1:%x.", TT->Always1);
- if (TT->AlwaysZero1 != 0)
- isyslog ("EEPGDEBUG: TT AlwaysZero1 is NOT ZERO:%x.", TT->AlwaysZero1);
- if (TT->AlwaysZero2 != 0)
- isyslog ("EEPGDEBUG: TT AlwaysZero2 is NOT ZERO:%x.", TT->AlwaysZero2);
- }
- } //for nrofblocks
- // esyslog("EEPGDEBUG: AnyDoubt:%x.",AnyDoubt);
- if (!AnyDoubt) {
- if (Textlength > 63)
- Textlength = 63; //leave room for trailing NULL
- if (Themes[ThemeId][0] != 0) {
- LogE(0, prep("Trying to add new theme, but Id already exists. ThemeId = %x, Old theme with this Id:%s, new theme: %s."),
- ThemeId, Themes[ThemeId], Text);
- continue;
- }
- memcpy (&Themes[ThemeId], Text, Textlength);
- Themes[ThemeId][Textlength] = '\0'; //trailing NULL
- CleanString (Themes[ThemeId]);
- nThemes++;
- LogI(1, prep("%02x %s"), ThemeId, Themes[ThemeId]);
- }
- } //for NumberOfThemes
- if (p != DataEnd) {
- LogE(0, prep("Themes error: buffer is smaller or bigger than sum of entries. p:%p,DataEnd:%p"), p, DataEnd);
- return 0;
- } else
- return 2;
-}
-
-/**
- * \brief Get Nagra channels
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetChannelsNagra (const u_char * Data, int Length)
-{
- u_char *DataStart = (u_char *) Data;
- u_char *p = DataStart;
- u_char *DataEnd = DataStart + Length;
-
- nChannels = (*p << 24) | *(p + 1) << 16 | *(p + 2) << 8 | *(p + 3);
- p += 4; //skip numberofchannels
- if (CheckLevel(1)) {
- isyslog ("| ID | %-26.26s | %-22.22s | FND | %-8.8s |\n", "Channel ID", "Channel Name", "Sky Num.");
- isyslog ("|------|-%-26.26s-|-%-22.22s-|-----|-%-8.8s-|\n", "------------------------------",
- "-----------------------------", "--------------------");
- }
-
- for (int j = 0; j < nChannels; j++) {
- sChannelsNagraGuide *Channel = (sChannelsNagraGuide *) p;
- sChannel *C = &sChannels[j];
- C->ChannelId = j + 1; //Nagra starts numbering at 1
- ChannelSeq[C->ChannelId] = j; //fill lookup table to go from channel-id to sequence nr in table; lookuptable starts with 0
- C->SkyNumber = 0;
- C->NumberOfEquivalences = 1; //there is always an original channel. every equivalence adds 1
- C->Src[0] = Source(); //assume all EPG channels are on same satellite, if not, manage this via equivalents!!!
- C->Nid[0] = HILO16 (Channel->NetworkId);
- C->Tid[0] = HILO16 (Channel->TransportId);
- C->Sid[0] = HILO16 (Channel->ServiceId);
- tChannelID channelID = tChannelID(C->Src[0], C->Nid[0], C->Tid[0], C->Sid[0]);
- cChannel *VC = GetChannelByID(channelID, true);
- bool IsFound = (VC);
- if(IsFound) {
- strncpy((char*)(C->Name), VC->Name (), 64);
- C->Src[0] = VC->Source();
- CleanString (C->Name);
- }
- else
- C->Name[0] = '\0'; //empty string
-
- LogI(1, "|% 5d | %-26.26s | %-22.22s | %-3.3s | % 6d |\n", C->ChannelId
- , *channelID.ToString(), C->Name, IsFound ? "YES" : "NO", C->SkyNumber);
-
- LogD(4, prep("DEBUG: start : %s"), cs_hexdump (0, p, 9));
-
- p += 8; //skip to first 0x8c if non-FTA, or 0x00 if FTA
- for (int i = 0; i < Channel->Nr8cBlocks; i++) {
- if (*p != 0x8c) {
- LogD(0, prep("DEBUG: ERROR in Channel Table, expected value of 0x8c is %02x"), *p);
- return 0; //fatal error
- }
- p++; //skip 8c byte
- LogD(4, prep("DEBUG: 8c string: %s"), cs_hexdump (0, p + 1, *p));
- p += *p; //skip 8c block
- p++; //forgot to skip length byte
- }
- //start last non 8c block here
- if (*p != 0x00) {
- LogE(0, prep("ERROR in Channel Table, expected value of 0x00 is %02x"), *p);
- return 0; //fatal error
- }
- p++; //skip 0x00 byte
- LogD(4, prep("DEBUG: endstring: %s"), cs_hexdump (0, p + 1, *p * 4));
- p += (*p * 4); //p points to nrofblocks, each block is 4 bytes
- p++; //forgot to skip nrofblocks byte
-
- /*
- if (Channel->AlwaysZero1 != 0)
- isyslog ("EEPGDEBUG: AlwaysZero1 is NOT ZERO:%x.", Channel->AlwaysZero1);
- if (Channel->AlwaysZero2 != 0)
- isyslog ("EEPGDEBUG: AlwaysZero2 is NOT ZERO:%x.", Channel->AlwaysZero2);
- if (Channel->Always0x8c != 0x8c)
- isyslog ("EEPGDEBUG: Always0x8c is NOT 0x8c:%x.", Channel->Always0x8c);
- if (Channel->Always0x08 != 0x08)
- isyslog ("EEPGDEBUG: Always0x08 is NOT 0x08:%x.", Channel->Always0x08);
- if (Channel->Always0x02 != 0x02)
- isyslog ("EEPGDEBUG: Always0x02 is NOT 0x02:%x.", Channel->Always0x02);
- if (Channel->Always0x01 != 0x01)
- isyslog ("EEPGDEBUG: Always0x01 is NOT 0x01:%x.", Channel->Always0x01);
- if (Channel->Always0x20 != 0x20)
- isyslog ("EEPGDEBUG: Always0x20 is NOT 0x20:%x.", Channel->Always0x20);
- if (Channel->Always0x0a != 0x0a)
- isyslog ("EEPGDEBUG: Always0x0a is NOT 0x0a:%x.", Channel->Always0x0a);
- if (Channel->Always0x81 != 0x81)
- isyslog ("EEPGDEBUG: Always0x81 is NOT 0x81:%x.", Channel->Always0x81);
- if (Channel->Always0x44 != 0x44)
- isyslog ("EEPGDEBUG: Always0x44 is NOT 0x44:%x.", Channel->Always0x44);
- */
-
- }
- if (p != DataEnd)
- LogE(0, prep("Warning, possible problem at end of channel table; p = %p, DataEnd = %p"), p, DataEnd);
- LoadEquivalentChannels ();
- return 2; //obviously, when you get here, channels are read succesfully, but since all channels are sent at once, you can stop now
-}
-
-/**
- * \brief Get Nagra extended EPG
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetNagra (const u_char * Data, int Length)
-{
- sTitleBlockHeaderNagraGuide *TBH = (sTitleBlockHeaderNagraGuide *) Data;
- if (InitialTitle[0] == 0x00) { //InitialTitle is empty, so we are waiting for the start marker
- if (TBH->TableIdExtensionHigh == 0x00 && TBH->TableIdExtensionLow == 0x00) { //this is the start of the data
- if (TBH->VersionNumber == LastVersionNagra) {
- LogI(0, prep("Nagra EEPG already up-to-date with version %i"), LastVersionNagra);
- return 2;
- }
- Version = TBH->VersionNumber;
- LogI(0, prep("initialized Nagraguide, version %i"), Version);
- //u_char *p = (u_char *) Data + 11;
- u_char *p = (u_char *) Data + 8;
- if (*p != 0x01) {
- LogE(0, prep("Error, Nagra first byte in table_id_extension 0x00 is not 0x01 but %02x. Format unknown, exiting."),
- *p);
- return 0; //fatal error
- }
- p++; //skip 0x01 byte
- unsigned short int l = ((*p << 8) | *(p + 1));
- u_char *p_end = p + l - 3; //this ensures a full block of 4 bytes is there to process
- p += 2; //skip length bytes
- while (p < p_end) {
- sSection0000BlockNagraGuide *S = (sSection0000BlockNagraGuide *) p;
- int TTT = ((S->TableIdExtensionHigh << 10) | (S->TableIdExtensionLow << 3) | (S->TIE200 << 9));
- LogD(4, prep("DEBUG: TableIdExtension %04x, Unknown1 %02x Version %02x Always 0xd6 %02x DayCounter %02x"),
- TTT, S->Unknown1, S->VersionNumber, S->Always0xd6, S->DayCounter);
- if ((TTT > 0x0400) && (TTT < 0x0600)) //take high byte and compare with summarie tables in 0x0400 and 0x0500 range;
- NagraTIE[NagraCounter++] = TTT; //only store TIEs of titlessummaries, all others can be derived; they are stored in the order of the 0x0000 index table,
- //lets hope first entry corresponds with today, next with tomorrow etc.
- p += 4;
- }
- buffer.clear (); //clear buffer maps
- bufsize.clear (); //clear buffer maps
- InitialTitle[0] = 0xff; //copy data into initial title
- }
- return (1);
- }
- unsigned short SectionLength = ((TBH->SectionLengthHigh & 0x0f) << 8) | TBH->SectionLengthLow;
- unsigned short TableIdExtension = HILO16 (TBH->TableIdExtension);
- if (TableIdExtension == 0x0000) {
- LastVersionNagra = Version;
- return (2); //done
- }
- /*
- Table_id_extensions:
- (0x0000)
- (0x0010) per channel, nr_of_channels entries, every entry is 8 bytes, first 4 bytes gives nr. of titles in corresponding title table
- (0x0020) per channel info day 2 of the month
- (0x01F0) per channel info day 31 of the month
- (0x0200) leeg; letop op je leest gemakkelijk door naar 0x0210!
- (0x0210) titles day 1 of the month
- (0x0220) titles day 2 of the month
- (0x03F0) titles day 31 of the month
- (0x0400) channel info
- (0x0410) summaries day 1 of the month
- (0x0420) summaries day 2 of the month
- (0x05F0) summaries day 31 of the month
- (0x0610) themes/title reference sunday, correspond to titles 0x0400 lower...
- (0x0620) themes/title reference monday
- ... this goes on until 0x07f0
- (0x0810) bouquet info; references to channels within a package, day 1 of the month
- (0x0820) same day 2 of the month
- (0x09f0) same day 31 of the month
- */
-
- if (!(TBH->TableIdExtensionHigh >= 0x02 && TBH->TableIdExtensionHigh <= 0x07)) //here we regulate which tables we are testing
- return (1);
- if (TableIdExtension == 0x0200) //table 0x0200 only contains language code, because it is for day 0 of the month, and 0x0400 is used for channels
- return 1;
- if (TBH->SectionNumber == 0) { //first section, create a table
- buffer[TableIdExtension] = NULL;
- bufsize[TableIdExtension] = 0;
- NumberOfTables++;
- }
- //store all sections in core until last section is found; processing incomplete sections is very complex and doesnt save much memory,
- //since the data has to be stored anyway; summaries do not seem to have channelid included, so storing titles and separately storing summaries will not work...
- //GetEventId only works for a specific Schedule for a specific ChannelId....
- buffer[TableIdExtension] =
- (unsigned char *) realloc (buffer[TableIdExtension], SectionLength - 9 + bufsize[TableIdExtension]);
- memcpy (buffer[TableIdExtension] + bufsize[TableIdExtension], Data + 8, SectionLength - 9); //append new section
- bufsize[TableIdExtension] += SectionLength - 9;
- if (TBH->SectionNumber >= TBH->LastSectionNumber) {
- LogI(1, prep("found %04x lastsection nr:%i."), TableIdExtension, TBH->SectionNumber);
- // if (TBH->TableIdExtensionHigh == 0x04 || TBH->TableIdExtensionHigh == 0x05) {
- if (TableIdExtension == 0x0400) {
- int Result = GetChannelsNagra (buffer[TableIdExtension] + 4, bufsize[TableIdExtension] - 4); //TODO language code terminated by 0 is ignored
- free (buffer[TableIdExtension]);
- buffer[TableIdExtension] = NULL;
- NumberOfTables--;
- if (Result == 0)
- return 0; //fatal error; TODO this exit should also free all other, non-Channel sections that are stored!
- }
- } //if lastsection read
- return (1); //return and continue, nonfatal
-}
-
-void cFilterEEPG::ProcessNagra ()
-{
- for (int i = 0; i < MAX_THEMES; i++) //clear all themes
- Themes[i][0] = '\0';
-
- for (int i = 0; i < NagraCounter; i++) { //first prcoess all themes, since they all use the same codes
- unsigned short int TableIdExtension = NagraTIE[i];
- int TIE = TableIdExtension + 0x0200; //from 0x0400 to 0x0600 -> themes
- LogI(3, prep("Processing Theme with TableIdExtension:%04x"), TIE);
- GetThemesNagra (buffer[TIE] + 4, bufsize[TIE] - 4, TableIdExtension - 0x0200); //assume theme is completed //TODO Language code terminatd by 0 is ignored
- free (buffer[TIE]);
- buffer[TIE] = NULL;
- NumberOfTables--;
- }
-
- for (int i = 0; i < NagraCounter; i++) { //first prcoess all themes, since they all use the same codes
- unsigned short int TableIdExtension = NagraTIE[i];
- int TIE = TableIdExtension - 0x0200; //from 0x0400 to 0x0200 -> titles
- LogI(0, prep("Processing TableIdExtension:%04x"), TableIdExtension);
- GetTitlesNagra (buffer[TIE] + 4, bufsize[TIE] - 4, TableIdExtension); //assume title-reading is completed //TODO Language code terminatd by 0 is ignored
- free (buffer[TIE]);
- buffer[TIE] = NULL;
- NumberOfTables--;
-
- free (buffer[TableIdExtension]); //summaries
- buffer[TableIdExtension] = NULL;
- NumberOfTables--;
- }
- if (NumberOfTables != 0)
- LogE(0, prep("ERROR, Not all tables processed and stream is already repeating. NumberOfTables = %i."),
- NumberOfTables);
-}
-
-/**
- * \brief Get MHW1 Titles
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetTitlesMHW1 (const u_char * Data, int Length)
-{
- if (Length >= 42) {
- sTitleMHW1 *Title = (sTitleMHW1 *) Data;
- if (Title->ChannelId == 0xff) { //FF is separator packet
- if (memcmp (InitialTitle, Data, 46) == 0) { //data is the same as initial title //TODO use easier notation
- LogD(1, prep("End procesing titles"));
- return 2;
- }
- if (nTitles == 0)
- memcpy (InitialTitle, Data, 46); //copy data into initial title
- int Day = Title->Day;
- int Hours = Title->Hours;
- if (Hours > 15)
- Hours -= 4;
- else if (Hours > 7)
- Hours -= 2;
- else
- Day++;
- if (Day > 6)
- Day = Day - 7;
- Day -= Yesterday;
- if (Day < 1)
- Day = 7 + Day;
- //if (Day == 1 && Hours < 6)
- if (Day == 0 && Hours < 6)
- Day = 7;
- //Day = 8;
- MHWStartTime = (Day * 86400) + (Hours * 3600) + YesterdayEpochUTC;
- LogI(3, prep("Titles: FF PACKET, seqnr:%02x."), Data[5]);
- } else if (InitialTitle[0] != 0x00) { //if initialized this should always be 0x90 = tableid!
- if (nTitles < MAX_TITLES) {
- Title_t *T;
- T = (Title_t *) malloc (sizeof (Title_t));
- Titles[nTitles] = T;
- int Minutes = Title->Minutes;
- int StartTime = MHWStartTime + (Minutes * 60);
- T->ChannelId = Title->ChannelId - 1;
- T->ThemeId = Title->ThemeId;
- T->TableId = Title->TableId;
- T->MjdTime = 0; //only used at MHW2 and SKY
- T->EventId = HILO32 (Title->ProgramId);
- T->StartTime = LocalTime2UTC (StartTime); //here also Daylight Savings correction is done
- T->Duration = HILO16 (Title->Duration) * 60;
- T->SummaryAvailable = Title->SummaryAvailable;
- T->Text = (unsigned char *) malloc (47);
- if (T->Text == NULL) {
- LogE(0, prep("Titles memory allocation error."));
- return 0;
- }
- T->Text[46] = '\0'; //end string with NULL character
- //memcpy (T->Text, &Title->Title, 23);
- decodeText2((unsigned char *)&Title->Title, 23, (char*)T->Text, 47);
- CleanString (T->Text);
- LogI(3, prep("EvId:%08x,ChanId:%x, Titlenr:%d:, StartTime(epoch):%i, SummAv:%x,Name:%s."), T->EventId,
- T->ChannelId, nTitles, T->StartTime, T->SummaryAvailable, T->Text);
- nTitles++;
- } //nTitles < MaxTitles
- else {
- LogE(0, prep("Error, %i titles found more than %i"), nTitles, MAX_TITLES);
- return 0;
- }
- } //else if InitialTitle
- } //Length==46
- else {
- LogE(0, prep("Error, length of title package < 42."));
- return 1; //non fatal
- }
-
- return 1;
-}
-
-/**
- * \brief Get MHW2 Titles
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetTitlesMHW2 (const u_char * Data, int Length)
-{
- if (Length > 18) {
- int Pos = 18;
- int Len = 0;
- /*bool Check = false;
- while (Pos < Length) {
- Check = false;
- Pos += 7;
- if (Pos < Length) {
- Pos += 3;
- if (Pos < Length)
- if (Data[Pos] > 0xc0) {
- Pos += (Data[Pos] - 0xc0);
- Pos += 4;
- if (Pos < Length) {
- if (Data[Pos] == 0xff) {
- Pos += 1;
- Check = true;
- }
- }
- }
- }
- if (Check == false){
- isyslog ("EEPGDebug: Check==false");
- return 1; // I assume nonfatal error or success
- }
- }*/
- if (memcmp (InitialTitle, Data, 16) == 0) { //data is the same as initial title
- return 2; //last item processed
- } else {
- if (nTitles == 0)
- memcpy (InitialTitle, Data, 16); //copy data into initial title
- //Pos = 18;
- while (Pos < Length) {
- Title_t *T;
- T = (Title_t *) malloc (sizeof (Title_t));
- Titles[nTitles] = T;
- T->ChannelId = Data[Pos];
- Pos+=11;//The date time starts here
- //isyslog ("EEPGDebug: ChannelID:%d", T->ChannelId);
- unsigned int MjdTime = (Data[Pos] << 8) | Data[Pos + 1];
- T->MjdTime = 0; //not used for matching MHW2
- T->StartTime = ((MjdTime - 40587) * 86400)
- + (((((Data[Pos + 2] & 0xf0) >> 4) * 10) + (Data[Pos + 2] & 0x0f)) * 3600)
- + (((((Data[Pos + 3] & 0xf0) >> 4) * 10) + (Data[Pos + 3] & 0x0f)) * 60);
- T->Duration = (((Data[Pos + 5] << 8) | Data[Pos + 6]) >> 4) * 60;
- Len = Data[Pos + 7] & 0x3f;
- //isyslog ("EEPGDebug: Len:%d", Len);
- T->Text = (unsigned char *) malloc (Len + 2);
- if (T->Text == NULL) {
- LogE(0, prep("Titles memory allocation error."));
- return 0; //fatal error
- }
- T->Text[Len] = '\0'; //end string with NULL character
- decodeText2(&Data[Pos + 8],Len,(char*)T->Text,Len+1);
- //memcpy (T->Text, &Data[Pos + 8], Len);
- CleanString (T->Text);
- Pos += Len + 8; // Sub Theme starts here
- T->ThemeId = ((Data[7] & 0x3f) << 6) | (Data[Pos] & 0x3f);
- T->EventId = (Data[Pos + 1] << 8) | Data[Pos + 2];
- T->SummaryAvailable = (T->EventId != 0xFFFF);
- LogI(3, prep("EventId %04x Titlenr %d:SummAv:%x,Name:%s."), T->EventId,
- nTitles, T->SummaryAvailable, T->Text);
- Pos += 3;
- nTitles++;
- if (nTitles > MAX_TITLES) {
- LogE(0, prep("Error, %i titles found more than %i"), nTitles, MAX_TITLES);
- return 0; //fatal error
- }
- }
- return 1; //success
- } //else memcmp
- } //if length
- return 1; //non fatal error
-}
-
-/**
- * \brief Get MHW1 Summaries
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetSummariesMHW1 (const u_char * Data, int Length)
-{
- sSummaryMHW1 *Summary = (sSummaryMHW1 *) Data;
- if (Length >= 11) {
- if (Summary->NumReplays < 10) { //Why limit this at 10?
- if (Length >= (11 + (Summary->NumReplays * 7))) {
- if (Summary->Byte7 == 0xff && Summary->Byte8 == 0xff && Summary->Byte9 == 0xff) {
- if (memcmp (InitialSummary, Data, 20) == 0) { //data is equal to initial buffer
- return 2;
- } else if (nSummaries < MAX_TITLES) {
- if (nSummaries == 0)
- memcpy (InitialSummary, Data, 20); //copy this data in initial buffer
- int SummaryOffset = 11 + (Summary->NumReplays * 7);
- int SummaryLength = Length - SummaryOffset;
- unsigned char *Text = (unsigned char *) malloc (2*SummaryLength + 1);
- if (Text == NULL) {
- LogE(0, prep("Summaries memory allocation error."));
- return 0;
- }
- Text[SummaryLength+1] = '\0'; //end string with NULL character
- //memcpy (Text, &Data[SummaryOffset], SummaryLength);
- decodeText2(&Data[SummaryOffset], SummaryLength, (char*)Text, 2*SummaryLength + 1);
-// CleanString (Text);
-// if (Summary->NumReplays != 0)
-// esyslog ("EEPG: Number of replays:%i.", Summary->NumReplays);
- //int Replays = Summary->NumReplays;
- int ReplayOffset = 11;
- Summary_t *S;
- S = (Summary_t *) malloc (sizeof (Summary_t));
- Summaries[nSummaries] = S;
- S->NumReplays = Summary->NumReplays;
- S->EventId = HILO32 (Summary->ProgramId);
- S->Text = Text;
- int i = 0;
- do {
- S->Replays[i].MjdTime = 0; //only used for SKY
- //if (Summary->NumReplays == 0) {
- //S->ChannelId = 0xFFFF; //signal that ChannelId is not known; 0 is bad signal value because it is a valid ChannelId...
- //S->StartTime = 0;
- //}
- //else {
- S->Replays[i].ChannelId = Data[ReplayOffset++] - 1;
- unsigned int Date_hi = Data[ReplayOffset++];
- unsigned int Date_lo = Data[ReplayOffset++];
- unsigned short int Hour = Data[ReplayOffset++];
- unsigned short int Minute = Data[ReplayOffset++];
- unsigned short int Sec = Data[ReplayOffset++];
- ReplayOffset++; //makes total of 7 bytes
-
- LogI(4, prep("EvId:%08x ChanId:%x, ChanName %s, Time: %02d:%02d:%02d."),
- S->EventId, S->Replays[i].ChannelId,
- sChannels[ChannelSeq[S->Replays[i].ChannelId]].Name, Hour, Minute, Sec);
-
- S->Replays[i].StartTime = MjdToEpochTime (Date) + (((((Hour & 0xf0) >> 4) * 10) + (Hour & 0x0f)) * 3600)
- + (((((Minute & 0xf0) >> 4) * 10) + (Minute & 0x0f)) * 60)
- + ((((Sec & 0xf0) >> 4) * 10) + (Sec & 0x0f));
-// summary -> time[i] = ProviderLocalTime2UTC (summary -> time[i]);
- S->Replays[i].StartTime = LocalTime2UTC (S->Replays[i].StartTime);
- //}
- i++;
- } while (i < Summary->NumReplays);
- //} while (Replays-- >= 0);
- LogI(3, prep("EvId:%08x ChanId:%x, Replays:%d, Summnr %d:%.35s."), S->EventId,
- S->Replays[0].ChannelId, S->NumReplays, nSummaries, S->Text);
- nSummaries++;
- } else {
- LogE(0, prep("Error, %i summaries found more than %i"), nSummaries, MAX_TITLES);
- return 0;
- }
- } //0xff
- else {
- LogE(0, prep("Warning, Summary bytes not as expected."));
- return 1; //it is not a success, but error is not fatal
- }
- } //numreplays length
- else {
- LogE(0, prep("Warning, number of replays is not conforming to length."));
- return 1; //nonfatal error
- }
- } //numreplays <10
- else {
- LogE(0, prep("Warning, number of replays %d > 10, cannot process."),
- Summary->NumReplays);
- return 1; //nonfatal error
- }
- } //length >11
- else {
- LogE(0, prep("Summary length too small:%s"), cs_hexdump (0, Data, Length));
- return 1; //nonfatal error
- }
- return 1; //success
-}
-
-/**
- * \brief Get MHW2 Summaries
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetSummariesMHW2 (const u_char * Data, int Length)
-{
- if (Length > (Data[14] + 17)) {
- if (memcmp (InitialSummary, Data, 16) == 0) //data is equal to initial buffer
- return 2;
- else {
- if (nSummaries == 0)
- memcpy (InitialSummary, Data, 16); //copy this data in initial buffer
- if (nSummaries < MAX_TITLES) {
- int lenText = Data[14];
- int SummaryLength = lenText;
- int Pos = 15;
- int Loop = Data[Pos + SummaryLength] & 0x0f;
- Summary_t *S;
- S = (Summary_t *) malloc (sizeof (Summary_t));
- Summaries[nSummaries] = S;
-
- S->Replays[0].ChannelId = 0xFFFF; //signal that ChannelId is not known; 0 is bad signal value because it is a valid ChannelId...
- S->Replays[0].StartTime = 0; //not used
- S->Replays[0].MjdTime = 0; //not used
- S->NumReplays = 0; //not used
- S->EventId = (Data[3] << 8) | Data[4];
- unsigned char tmp[4096]; //TODO do this smarter
- memcpy (tmp, &Data[Pos], lenText);
- tmp[SummaryLength] = '\n';
- SummaryLength += 1;
- Pos += (lenText + 1);
- if (Loop > 0) {
- while (Loop > 0) {
- lenText = Data[Pos];
- Pos += 1;
- if ((Pos + lenText) < Length) {
- memcpy (&tmp[SummaryLength], &Data[Pos], lenText);
- SummaryLength += lenText;
- if (Loop > 1) {
- tmp[SummaryLength] = '\n';
- SummaryLength += 1;
- }
- } else
- break;
- Pos += lenText;
- Loop--;
- }
- }
- S->Text = (unsigned char *) malloc (SummaryLength + 2);
- S->Text[SummaryLength] = '\0'; //end string with NULL character
- if (S->Text == NULL) {
- LogE(0, prep("Summaries memory allocation error."));
- return 0; //fatal error
- }
- //memcpy (S->Text, tmp, SummaryLength);
- decodeText2(tmp,SummaryLength,(char*)S->Text,SummaryLength + 1);
- CleanString (S->Text);
- LogI(3, prep("EventId %08x Summnr %d:%.30s."), S->EventId, nSummaries, S->Text);
- nSummaries++;
- } else {
- LogE(0, prep("Error, %i summaries found more than %i"), nSummaries, MAX_TITLES);
- return 0; //fatal error
- }
- } //else
- } //if length
- return 1; //succes or nonfatal error
-}
-
-/**
- * \brief Get SKYBOX Channels
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetChannelsSKYBOX (const u_char * Data, int Length)
-{
-
- if (memcmp (InitialChannel, Data, 8) == 0) { //data is the same as initial title
- LoadEquivalentChannels ();
- return 2;
- } else {
- if (nChannels == 0)
- memcpy (InitialChannel, Data, 8); //copy data into initial title
- if (nChannels == 0) {
- LogI(1, "| ID | %-26.26s | %-22.22s | FND | %-8.8s |\n", "Channel ID", "Channel Name", "Sky Num.");
- LogI(1, "|------|-%-26.26s-|-%-22.22s-|-----|-%-8.8s-|\n", "------------------------------",
- "-----------------------------", "--------------------");
- }
-// unsigned short int BouquetId = (Data[3] << 8) | Data[4];
- int BouquetDescriptorsLength = ((Data[8] & 0x0f) << 8) | Data[9];
- int TransportStreamLoopLength =
- ((Data[BouquetDescriptorsLength + 10] & 0x0f) << 8) | Data[BouquetDescriptorsLength + 11];
- int p1 = (BouquetDescriptorsLength + 12);
- while (TransportStreamLoopLength > 0) {
- unsigned short int Tid = (Data[p1] << 8) | Data[p1 + 1];
- unsigned short int Nid = (Data[p1 + 2] << 8) | Data[p1 + 3];
- int TransportDescriptorsLength = ((Data[p1 + 4] & 0x0f) << 8) | Data[p1 + 5];
- int p2 = (p1 + 6);
- p1 += (TransportDescriptorsLength + 6);
- TransportStreamLoopLength -= (TransportDescriptorsLength + 6);
- while (TransportDescriptorsLength > 0) {
- unsigned char DescriptorTag = Data[p2];
- int DescriptorLength = Data[p2 + 1];
- int p3 = (p2 + 2);
- p2 += (DescriptorLength + 2);
- TransportDescriptorsLength -= (DescriptorLength + 2);
- switch (DescriptorTag) { //TODO switch with only 1 case??? replace this by template
- case 0xb1:
- p3 += 2;
- DescriptorLength -= 2;
- while (DescriptorLength > 0) {
- // 0x01 = Video Channel
- // 0x02 = Audio Channel
- // 0x05 = Other Channel
- //if( Data[p3+2] == 0x01 || Data[p3+2] == 0x02 || Data[p3+2] == 0x05 )
- //{
- unsigned short int Sid = (Data[p3] << 8) | Data[p3 + 1];
- unsigned short int ChannelId = (Data[p3 + 3] << 8) | Data[p3 + 4];
- unsigned short int SkyNumber = (Data[p3 + 5] << 8) | Data[p3 + 6];
- if (SkyNumber > 100 && SkyNumber < 1000) {
- if (ChannelId > 0) {
- sChannel *C;
- if (ChannelSeq.count (ChannelId) == 0) { //not found
- C = &sChannels[nChannels];
- C->ChannelId = ChannelId;
- C->NumberOfEquivalences = 1; //there is always an original channel. every equivalence adds 1
- C->Src[0] = Source (); //assume all EPG channels are on same satellite, if not, manage this via equivalents!!!
- C->Nid[0] = Nid;
- C->Tid[0] = Tid;
- C->Sid[0] = Sid;
- C->SkyNumber = SkyNumber;
- tChannelID channelID = tChannelID (C->Src[0], C->Nid[0], C->Tid[0], C->Sid[0]);
- cChannel *VC = Channels.GetByChannelID (channelID, true);
- bool IsFound = (VC);
- if (IsFound)
- strncpy ((char *) C->Name, VC->Name (), 64);
- else
- C->Name[0] = '\0'; //empty string
-
- LogI(1, "|% 5d | %-26.26s | %-22.22s | %-3.3s | % 6d |\n", C->ChannelId
- , *channelID.ToString(), C->Name, IsFound ? "YES" : "NO", C->SkyNumber);
-
- ChannelSeq[C->ChannelId] = nChannels; //fill lookup table to go from channel-id to sequence nr in table
- nChannels++;
- if (nChannels >= MAX_CHANNELS) {
- LogE(0, prep("Error, %i channels found more than %i"), nChannels, MAX_CHANNELS);
- return 0;
- }
- }
- }
- }
- p3 += 9;
- DescriptorLength -= 9;
- }
- break;
- default:
- break;
- } //switch descriptortag
- }
- } //while
- return 1;
- } //else part of memcmp
-}
-
-/**
- * \brief Get SKYBOX Titles
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetTitlesSKYBOX (const u_char * Data, int Length)
-{
- int p;
- unsigned short int ChannelId;
- unsigned short int MjdTime;
- int Len1;
- int Len2;
-
- if (Length < 20)
- return 1; //nonfatal error
- if (memcmp (InitialTitle, Data, 20) == 0) //data is the same as initial title
- return 2;
- else {
- if (nTitles == 0)
- memcpy (InitialTitle, Data, 20); //copy data into initial title
- ChannelId = (Data[3] << 8) | Data[4];
- MjdTime = ((Data[8] << 8) | Data[9]);
- if (ChannelId > 0) {
- if (MjdTime > 0) {
- p = 10;
- do {
- Title_t *T;
- T = (Title_t *) malloc (sizeof (Title_t));
- Titles[nTitles] = T;
- T->ChannelId = ChannelId;
- T->MjdTime = MjdTime; //only date, no time. Is used to match titles and summaries, SKYBOX only
- T->EventId = (Data[p] << 8) | Data[p + 1];
- Len1 = ((Data[p + 2] & 0x0f) << 8) | Data[p + 3];
- if (Data[p + 4] != 0xb5) {
- LogD(5, prep("Data error signature for title - Data[p + 4] != 0xb5"));
- break;
- }
- if (Len1 > Length) {
- LogD(5, prep("Data error signature for title - Len1 > Length"));
- break;
- }
- p += 4;
- Len2 = Data[p + 1] - 7;
- T->StartTime = ((MjdTime - 40587) * 86400) + ((Data[p + 2] << 9) | (Data[p + 3] << 1));
- T->Duration = ((Data[p + 4] << 9) | (Data[p + 5] << 1));
- T->ThemeId = Data[p + 6];
- //TODO Data[p + 7] is Quality value add it to description
- //int quality = Data[p + 7];
- switch (Data[p + 8] & 0x0F) {
- case 0x01:
- T->Rating = 0x00; //"U"
- break;
- case 0x02:
- T->Rating = 0x08; //"PG"
- break;
- case 0x03:
- T->Rating = 0x0C; //"12"
- break;
- case 0x04:
- T->Rating = 0x0F; //"15"
- break;
- case 0x05:
- T->Rating = 0x12; //"18"
- break;
- default:
- T->Rating = 0x00; //"-"
- break;
- }
- T->Unknown1 = Data[p + 4 - 13]; //FIXME
- T->Unknown2 = Data[p + 4 - 12]; //FIXME
- T->Unknown3 = Data[p + 4 - 11]; //FIXME
- unsigned char tmp[4096]; //TODO smarter
- Len2 = DecodeHuffmanCode (&Data[p + 9], Len2, tmp);
- if (Len2 == 0) {
- LogE(0, prep("Warning, could not huffman-decode title-text, skipping title."));
- return 1; //non-fatal error
- }
- T->Text = (unsigned char *) malloc (Len2 + 1);
- if (T->Text == NULL) {
- LogE(0, prep("Titles memory allocation error."));
- return 0;
- }
- T->Text[Len2] = '\0'; //end string with NULL character
- memcpy (T->Text, tmp, Len2);
- CleanString (T->Text);
- T->SummaryAvailable = 1; //TODO I assume this is true?
-
- LogI(3, prep("EventId %08x Titlenr %d,Unknown1:%x,Unknown2:%x,Un3:%x,Name:%s."),
- T->EventId, nTitles, T->Unknown1, T->Unknown2, T->Unknown3, T->Text);
-
- p += Len1;
- nTitles++;
- if (nTitles >= MAX_TITLES) {
- LogE(0, prep("Error, %i titles found more than %i"), nTitles, MAX_TITLES);
- return 0; //fatal error
- }
- } while (p < Length);
- }
- }
- }
- return 1; //success
-}
-
-/**
- * \brief Get SKYBOX Summaries
- *
- * \return 0 = fatal error, code 1 = success, code 2 = last item processed
- */
-int cFilterEEPG::GetSummariesSKYBOX (const u_char * Data, int Length)
-{
- int p;
- unsigned short int ChannelId;
- unsigned short int MjdTime;
- int Len1;
- int Len2;
-
- if (Length < 20) {
- return 1; //non fatal error I assume
- }
- if (memcmp (InitialSummary, Data, 20) == 0) //data is equal to initial buffer
- return 2;
-// else if (nSummaries < MAX_SUMMARIES) {
- else {
- if (nSummaries == 0)
- memcpy (InitialSummary, Data, 20); //copy this data in initial buffer
- ChannelId = (Data[3] << 8) | Data[4];
- MjdTime = ((Data[8] << 8) | Data[9]);
- if (ChannelId > 0) {
- if (MjdTime > 0) {
- p = 10;
- do {
- Summary_t *S;
- S = (Summary_t *) malloc (sizeof (Summary_t));
- Summaries[nSummaries] = S;
- S->Replays[0].ChannelId = ChannelId;
- S->Replays[0].MjdTime = MjdTime;
- S->NumReplays = 0; //not used
- S->EventId = (Data[p] << 8) | Data[p + 1];
- Len1 = ((Data[p + 2] & 0x0f) << 8) | Data[p + 3];
- if (Data[p + 4] != 0xb9) {
- LogD(5, prep("Data error signature for title - Data[p + 4] != 0xb5"));
- break;
- }
- if (Len1 > Length) {
- LogD(5, prep("Data error signature for title - Len1 > Length"));
- break;
- }
- p += 4;
- Len2 = Data[p + 1];
- unsigned char tmp[4096]; //TODO can this be done better?
- Len2 = DecodeHuffmanCode (&Data[p + 2], Len2, tmp);
- if (Len2 == 0) {
- LogE(0, prep("Warning, could not huffman-decode text, skipping summary."));
- return 1; //non-fatal error
- }
- S->Text = (unsigned char *) malloc (Len2 + 1);
- if (S->Text == NULL) {
- LogE(0, prep("Summaries memory allocation error."));
- return 0;
- }
- memcpy (S->Text, tmp, Len2);
- S->Text[Len2] = '\0'; //end string with NULL character
- CleanString (S->Text);
- LogI(3, prep("EventId %08x Summnr %d:%.30s."), S->EventId, nSummaries, S->Text);
- p += Len1;
- nSummaries++;
- if (nSummaries >= MAX_TITLES) {
- LogI(0, prep("Error, %i summaries found more than %i"), nSummaries, MAX_TITLES);
- return 0;
- }
- } while (p < Length);
- }
- }
- }
- return 1;
-}
-
-void cFilterEEPG::FreeSummaries (void)
-{
- if (Format == MHW1 || Format == MHW2 || Format == SKY_IT || Format == SKY_UK) {
- Summary_t *S; //TODO do I need this?
- Summary_t *S2; //TODO do I need this?
- for (int i = 0; i < nSummaries; i++) {
- S = Summaries[i];
- if (i < nSummaries - 1) {
- S2 = Summaries[i + 1]; //look at next summary
- if (S->Text != S2->Text && S->Text != 0x00) //this is the last summary that points to this textblock; needed in case NumReplays > 1, multiple pointers to same textblock
- free (S->Text);
- } else if (S->Text != 0x00)
- free (S->Text);
- free (S);
- }
- }
- nSummaries = 0;
-}
-
-void cFilterEEPG::FreeTitles (void)
-{
- if (Format == MHW1 || Format == MHW2 || Format == SKY_IT || Format == SKY_UK) {
- Title_t *T;
- for (int i = 0; i < nTitles; i++) {
- T = Titles[i];
- free (T->Text);
- free (T);
- }
- }
- nTitles = 0;
-}
-
-void cFilterEEPG::LoadIntoSchedule (void)
-{
- int i, j, k;
- i = 0;
- j = 0;
- k = 0;
- bool foundtitle;
- foundtitle = false;
- Title_t *T;
- Summary_t *S;
- int remembersummary;
-//keep statistics
- int SummariesNotFound = 0;
- int NoSummary = 0;
- int NotMatching = 0;
- int LostSync = 0;
- remembersummary = -1;
-
- cSchedulesLock SchedulesLock (true);
- cSchedules *s = (cSchedules *) cSchedules::Schedules (SchedulesLock);
- if (s) {
-
- while (i < nTitles) {
- T = Titles[i];
- S = Summaries[j];
- foundtitle = false;
-
- while ((i < nTitles) && (!foundtitle)) { //find next title that has summary
- T = Titles[i];
- if (T->SummaryAvailable)
- foundtitle = true;
- else {
- NoSummary++;
- i++;
- }
- }
-//esyslog("foundtitle %x for next title that has a summary:%d",foundtitle,i);
-
- if (!foundtitle) //no more titles with summaries
- break;
- if ((T->EventId == S->EventId) && (T->MjdTime == S->Replays[0].MjdTime)
- && ((T->ChannelId == S->Replays[0].ChannelId) || ((Format != SKY_IT) && (Format != SKY_UK)))) { //should always be true, titles and summaries are broadcasted in order...
- LogD(3, prep("T->EventId == S->EventId"));
- //MjdTime = 0 for all but SKY
- //S->ChannelId must be equal to T->ChannelId only for SKY; in MHW1 S->ChannelId overrides T->ChannelId when NumReplays > 1
- remembersummary = -1; //reset summary searcher
- //int Replays = S->NumReplays;
-
- int index = 0;
- do {
- unsigned short int ChannelId;
- time_t StartTime;
- if (S->NumReplays == 0) {
- ChannelId = T->ChannelId;
- StartTime = T->StartTime;
- } else {
- ChannelId = S->Replays[index].ChannelId;
- StartTime = S->Replays[index].StartTime;
- }
-
- //channelids are sequentially numbered and sent in MHW1 and MHW2, but not in SKY, so we need to lookup the table index
- sChannel *C = &sChannels[ChannelSeq[ChannelId]]; //find channel
- cSchedule *p[MAX_EQUIVALENCES];
- PrepareToWriteToSchedule (C, s, p);
-
- char rating = 0x00;
- if ((Format == SKY_IT || Format == SKY_UK) && T->Rating) { //TODO only works on OTV for now
- rating = T->Rating;
- }
- unsigned short int TableId = DEFAULT_TABLE_ID;
- if (T->TableId) {
- TableId = T->TableId;
- }
-
- WriteToSchedule (p, C->NumberOfEquivalences, T->EventId, StartTime, T->Duration / 60, (char *) T->Text,
- (char *) S->Text, T->ThemeId, TableId, 0, rating);
-
- FinishWriteToSchedule (C, s, p);
- //Replays--;
- //if ((S->NumReplays != 0) && (Replays > 0)) { //when replays are used, all summaries of the replays are stored consecutively; currently only CSAT
- //j++; //move to next summary
- //if (j >= nSummaries) //do not forget to look in beginning of (ring)buffer
- //j = 0;
- //S = Summaries[j]; //next summary within replay range
- //}
- index++;
- } //while
- while (index < S->NumReplays);
-
-//TODO: why load events that have already past, and then run Cleanup
-//end of putting title and summary in schedule
- i++; //move to next title
- } //if T->EventId == S->EventId
- else {
-// esyslog("EEPG ERROR: ProgramIds not matching, title:%d,summary%d, T->EventId:%u, S->Eventid:%u.",i,j,T->EventId,S->EventId);
- NotMatching++;
- if (remembersummary == -1) { //I am not in search loop yet
- remembersummary = j;
- if (remembersummary == 0)
- remembersummary = nSummaries; //or next test will never be succesfull for remembersummary = 0
- LostSync++;
-// esyslog("EEPG Error: lost sync at title %d, summary %d.",i,j);
- } else if (j == (remembersummary - 1)) { //the last summary to be checked has failed also
- //esyslog ("EEPG Error: could not find summary for summary-available Title %d.", i);
- esyslog
- ("EEPG: Error, summary not found for EventId %08x Titlenr %d:SummAv:%x,Unknown1:%x,Unknown2:%x,Un3:%x,Name:%s.",
- T->EventId, i, T->SummaryAvailable, T->Unknown1, T->Unknown2, T->Unknown3, T->Text);
-
- /* write Title info to schedule */
- sChannel *C = &sChannels[ChannelSeq[T->ChannelId]]; //find channel
- cSchedule *p[MAX_EQUIVALENCES];
- PrepareToWriteToSchedule (C, s, p);
- char rating = 0x00;
- if ((Format == SKY_IT || Format == SKY_UK) && T->Rating) { //TODO only works on OTV for now
- rating = T->Rating;
- }
- WriteToSchedule (p, C->NumberOfEquivalences, T->EventId, T->StartTime, T->Duration / 60, (char *) T->Text,
- NULL, T->ThemeId, DEFAULT_TABLE_ID, 0, rating);
- FinishWriteToSchedule (C, s, p);
-
- SummariesNotFound++;
- i++; //move to next title, for this one no summary can be found
- }
-
-// esyslog("Trying again for this title %d, remember summary %d, but advancing one Summary to %d.",i,remembersummary,j);
- }
- j++; //move to next summary
- if (j >= nSummaries) //do not forget to look in beginning of (ring)buffer
- j = 0;
- } //while title
- } // if s
- else
- esyslog ("EEPG Error: could not lock schedules.");
-
- cSchedules::Cleanup (true); //deletes all past events
-
- isyslog ("EEPG: found %i equivalents channels", nEquivChannels);
- isyslog ("EEPG: found %i themes", nThemes);
- isyslog ("EEPG: found %i channels", nChannels);
- isyslog ("EEPG: found %i titles", nTitles);
- isyslog ("EEPG: of which %i reported to have no summary available; skipping these BIENTOT titles", NoSummary);
- isyslog ("EEPG: found %i summaries", nSummaries);
- if (SummariesNotFound != 0)
- esyslog ("EEPG: %i summaries not found", SummariesNotFound);
- if (NotMatching > nSummaries)
- LogI (0, prep("Warning: lost sync %i times, summary did not match %i times."),
- LostSync, NotMatching);
-
- FreeSummaries (); //do NOT free channels, themes and bouquets here because they will be reused in SKY!
- FreeTitles ();
- if (!((Format == SKY_IT) || (Format == SKY_UK))) { //everything but SKY; SKY is the only protocol where LoadIntoSchedule is called repeatedly
- ChannelSeq.clear ();
- }
-}
-
-void cFilterEEPG::AddFilter (u_short Pid, u_char Tid)
-{
- if (!Matches (Pid, Tid)) {
- Add (Pid, Tid);
- esyslog (prep("Filter Pid:%x,Tid:%x added."), Pid, Tid);
- }
-}
-
-void cFilterEEPG::AddFilter (u_short Pid, u_char Tid, unsigned char Mask)
-{
- if (!Matches (Pid, Tid)) {
- Add (Pid, Tid, Mask);
- esyslog (prep("Filter Pid:%x,Tid:%x,Mask:%x added."), Pid, Tid, Mask);
- }
-}
-
-namespace SI
-{
- enum DescriptorTagExt {
- DishRatingDescriptorTag = 0x89,
- DishShortEventDescriptorTag = 0x91,
- DishExtendedEventDescriptorTag = 0x92,
- DishSeriesDescriptorTag = 0x96,
- };
-
- // typedef InheritEnum< DescriptorTagExt, SI::DescriptorTag > ExtendedDescriptorTag;
-
-/*extern const char *getCharacterTable(const unsigned char *&buffer, int &length, bool *isSingleByte = NULL);
-extern bool convertCharacterTable(const char *from, size_t fromLength, char *to, size_t toLength, const char *fromCode);
-extern bool SystemCharacterTableIsSingleByte;*/
-class cEIT2:public SI::EIT
-{
-public:
- cEIT2 (cSchedules * Schedules, int Source, u_char Tid, const u_char * Data, bool OnlyRunningStatus = false);
-};
-
-cEIT2::cEIT2 (cSchedules * Schedules, int Source, u_char Tid, const u_char * Data, bool OnlyRunningStatus)
- : SI::EIT (Data, false)
-{
- //LogD(2, prep("cEIT2::cEIT2"));
- if (Tid > 0 && Format == DISH_BEV) Tid--;
-
- if (!CheckCRCAndParse ()) {
- LogD(2, prep("!CheckCRCAndParse ()"));
- return;
- }
-
- bool searchOtherSatPositions = Format == DISH_BEV;
-
- tChannelID channelID (Source, getOriginalNetworkId (), getTransportStreamId (), getServiceId ());
- cChannel *channel = GetChannelByID (channelID, searchOtherSatPositions);
- if (!channel) {
- LogD(3, prep("!channel channelID: %s"), *channelID.ToString());
- return; // only collect data for known channels
- }
-
- LogD(4, prep("channelID: %s format:%d"), *channel->GetChannelID().ToString(), Format);
-
-#ifdef USE_NOEPG
- // only use epg from channels not blocked by noEPG-patch
- tChannelID kanalID;
- kanalID = channel->GetChannelID ();
- if (!allowedEPG (kanalID))
- return;
-#endif /* NOEPG */
-
- cSchedule *pSchedule = (cSchedule *) Schedules->GetSchedule (channel, true);
-
- bool Empty = true;
- bool Modified = false;
- bool HasExternalData = false;
- time_t SegmentStart = 0;
- time_t SegmentEnd = 0;
-
- SI::EIT::Event SiEitEvent;
- for (SI::Loop::Iterator it; eventLoop.getNext (SiEitEvent, it);) {
- bool ExternalData = false;
- // Drop bogus events - but keep NVOD reference events, where all bits of the start time field are set to 1, resulting in a negative number.
- if (SiEitEvent.getStartTime () == 0 || (SiEitEvent.getStartTime () > 0 && SiEitEvent.getDuration () == 0))
- continue;
- Empty = false;
- if (!SegmentStart)
- SegmentStart = SiEitEvent.getStartTime ();
- SegmentEnd = SiEitEvent.getStartTime () + SiEitEvent.getDuration ();
- cEvent *newEvent = NULL;
- cEvent *rEvent = NULL;
- cEvent *pEvent = (cEvent *) pSchedule->GetEvent (SiEitEvent.getEventId (), SiEitEvent.getStartTime ());
- if (!pEvent) {
- if (OnlyRunningStatus)
- continue;
- // If we don't have that event yet, we create a new one.
- // Otherwise we copy the information into the existing event anyway, because the data might have changed.
- pEvent = newEvent = new cEvent (SiEitEvent.getEventId ());
- if (!pEvent)
- continue;
- } else {
- // We have found an existing event, either through its event ID or its start time.
- pEvent->SetSeen ();
- // If the existing event has a zero table ID it was defined externally and shall
- // not be overwritten.
- if (pEvent->TableID () == 0x00) {
-#ifdef USE_DDEPGENTRY
- if (pEvent->Version () == getVersionNumber ()) {
- if (Setup.MixEpgAction == 0)
- continue;
- //printf("in");
- //printf("%s", pEvent->GetTimeString());
- // to use the info of the original epg, update the extern one,
- // if it has less info
- SI::Descriptor * d;
- SI::ExtendedEventDescriptors * ExtendedEventDescriptors = NULL;
- //SI::ExtendedEventDescriptor *eed = NULL;
- SI::ShortEventDescriptor * ShortEventDescriptor = NULL;
- //SI::ShortEventDescriptor *sed = NULL;
- //SI::TimeShiftedEventDescriptor *tsed = NULL;
- //cLinkChannels *LinkChannels = NULL;
- for (SI::Loop::Iterator it2; (d = SiEitEvent.eventDescriptors.getNext (it2));) {
- if (d->getDescriptorTag () == SI::ShortEventDescriptorTag) {
- int LanguagePreferenceShort = -1;
- SI::ShortEventDescriptor * sed = (SI::ShortEventDescriptor *) d;
- if (I18nIsPreferredLanguage (Setup.EPGLanguages, sed->languageCode, LanguagePreferenceShort)
- || !ShortEventDescriptor) {
- delete ShortEventDescriptor;
- ShortEventDescriptor = sed;
- d = NULL; // so that it is not deleted
- }
- } else if (d->getDescriptorTag () == SI::ExtendedEventDescriptorTag) {
- int LanguagePreferenceExt = -1;
- bool UseExtendedEventDescriptor = false;
- SI::ExtendedEventDescriptor * eed = (SI::ExtendedEventDescriptor *) d;
- if (I18nIsPreferredLanguage (Setup.EPGLanguages, eed->languageCode, LanguagePreferenceExt)
- || !ExtendedEventDescriptors) {
- delete ExtendedEventDescriptors;
- ExtendedEventDescriptors = new SI::ExtendedEventDescriptors;
- UseExtendedEventDescriptor = true;
- }
- if (UseExtendedEventDescriptor) {
- ExtendedEventDescriptors->Add (eed);
- d = NULL; // so that it is not deleted
- }
- if (eed->getDescriptorNumber () == eed->getLastDescriptorNumber ())
- UseExtendedEventDescriptor = false;
- }
- delete d;
- }
- if (pEvent) {
- if (ShortEventDescriptor) {
- char buffer[256];
- if (ShortEventDescriptor->text.getText (buffer, sizeof (buffer)) && pEvent->ShortText ()
- && (strlen (ShortEventDescriptor->text.getText (buffer, sizeof (buffer))) >
- strlen (pEvent->ShortText ()))) {
- pEvent->SetShortText (ShortEventDescriptor->text.getText (buffer, sizeof (buffer)));
- pEvent->FixEpgBugs ();
- }
- }
- if (ExtendedEventDescriptors) {
- char buffer[ExtendedEventDescriptors->getMaximumTextLength (": ") + 1];
- //pEvent->SetDescription(ExtendedEventDescriptors->getText(buffer, sizeof(buffer), ": "));
- if (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": ")
- && pEvent->Description ()
- && (strlen (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": ")) >
- strlen (pEvent->Description ()))) {
- pEvent->SetDescription (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": "));
- pEvent->FixEpgBugs ();
- }
- }
- }
- delete ExtendedEventDescriptors;
- delete ShortEventDescriptor;
- continue;
- }
-#else
- if (pEvent->Version () == getVersionNumber ())
- continue;
-#endif /* DDEPGENTRY */
- HasExternalData = ExternalData = true;
- }
- // If the new event has a higher table ID, let's skip it.
- // The lower the table ID, the more "current" the information.
- else if (Tid > pEvent->TableID ())
- continue;
- // If the new event comes from the same table and has the same version number
- // as the existing one, let's skip it to avoid unnecessary work.
- // Unfortunately some stations (like, e.g. "Premiere") broadcast their EPG data on several transponders (like
- // the actual Premiere transponder and the Sat.1/Pro7 transponder), but use different version numbers on
- // each of them :-( So if one DVB card is tuned to the Premiere transponder, while an other one is tuned
- // to the Sat.1/Pro7 transponder, events will keep toggling because of the bogus version numbers.
- else if (Tid == pEvent->TableID() && pEvent->Version() == getVersionNumber())
- continue;
- }
- if (!ExternalData) {
- pEvent->SetEventID (SiEitEvent.getEventId ()); // unfortunately some stations use different event ids for the same event in different tables :-(
- pEvent->SetTableID (Tid);
- pEvent->SetStartTime (SiEitEvent.getStartTime ());
- pEvent->SetDuration (SiEitEvent.getDuration ());
- }
- if (newEvent)
- pSchedule->AddEvent (newEvent);
- if (Tid == 0x4E) { // we trust only the present/following info on the actual TS
-#ifdef USE_DDEPGENTRY
- if (Setup.DisableVPS == 0 && SiEitEvent.getRunningStatus () >= SI::RunningStatusNotRunning)
-#else
- if (SiEitEvent.getRunningStatus () >= SI::RunningStatusNotRunning)
-#endif /* DDEPGENTRY */
- pSchedule->SetRunningStatus (pEvent, SiEitEvent.getRunningStatus (), channel);
- }
- if (OnlyRunningStatus)
- continue; // do this before setting the version, so that the full update can be done later
- pEvent->SetVersion (getVersionNumber());
-
- int LanguagePreferenceShort = -1;
- int LanguagePreferenceExt = -1;
- bool UseExtendedEventDescriptor = false;
- SI::Descriptor * d;
- SI::ExtendedEventDescriptors * ExtendedEventDescriptors = NULL;
- SI::ShortEventDescriptor * ShortEventDescriptor = NULL;
- //SI::DishDescriptor *DishExtendedEventDescriptor = NULL;
- SI::DishDescriptor *DishEventDescriptor = NULL;
- //uchar DishTheme = 0, DishCategory = 0;
-
-
- cLinkChannels *LinkChannels = NULL;
- cComponents *Components = NULL;
- for (SI::Loop::Iterator it2; (d = SiEitEvent.eventDescriptors.getNext (it2));) {
- if (ExternalData && d->getDescriptorTag () != SI::ComponentDescriptorTag) {
- delete d;
- LogD(2, prep("continue:d->getDescriptorTAG():%x)"), d->getDescriptorTag ());
- continue;
- }
-
- //LogD(2, prep("EEPGDEBUG:d->getDescriptorTAG():%x)"), d->getDescriptorTag ());
-
- switch (d->getDescriptorTag ()) {
- case SI::ExtendedEventDescriptorTag: {
- SI::ExtendedEventDescriptor * eed = (SI::ExtendedEventDescriptor *) d;
- if (I18nIsPreferredLanguage (Setup.EPGLanguages, eed->languageCode, LanguagePreferenceExt)
- || !ExtendedEventDescriptors) {
- delete ExtendedEventDescriptors;
- ExtendedEventDescriptors = new SI::ExtendedEventDescriptors;
- UseExtendedEventDescriptor = true;
- }
- if (UseExtendedEventDescriptor) {
- ExtendedEventDescriptors->Add (eed);
- d = NULL; // so that it is not deleted
- }
- if (eed->getDescriptorNumber () == eed->getLastDescriptorNumber ())
- UseExtendedEventDescriptor = false;
- }
- break;
- case SI::ShortEventDescriptorTag: {
- SI::ShortEventDescriptor * sed = (SI::ShortEventDescriptor *) d;
- if (I18nIsPreferredLanguage (Setup.EPGLanguages, sed->languageCode, LanguagePreferenceShort)
- || !ShortEventDescriptor) {
- delete ShortEventDescriptor;
- ShortEventDescriptor = sed;
- d = NULL; // so that it is not deleted
- }
- }
- break;
-#if APIVERSNUM > 10711
- case SI::ContentDescriptorTag: {
- SI::ContentDescriptor *cd = (SI::ContentDescriptor *)d;
- SI::ContentDescriptor::Nibble Nibble;
- int NumContents = 0;
- uchar Contents[MaxEventContents] = { 0 };
- for (SI::Loop::Iterator it3; cd->nibbleLoop.getNext(Nibble, it3); ) {
- if (NumContents < MaxEventContents) {
- Contents[NumContents] = ((Nibble.getContentNibbleLevel1() & 0xF) << 4) | (Nibble.getContentNibbleLevel2() & 0xF);
- NumContents++;
- }
- if (DishEventDescriptor && NumContents == 1) {
- DishEventDescriptor->setContent(Nibble);
- }
- //LogD(2, prep("EEPGDEBUG:Nibble:%x-%x-%x-%x)"), Nibble.getContentNibbleLevel1(),Nibble.getContentNibbleLevel2()
- // , Nibble.getUserNibble1(), Nibble.getUserNibble2());
-
- }
- pEvent->SetContents(Contents);
- }
- break;
-#endif
- case SI::ParentalRatingDescriptorTag: {
- int LanguagePreferenceRating = -1;
- SI::ParentalRatingDescriptor *prd = (SI::ParentalRatingDescriptor *)d;
- SI::ParentalRatingDescriptor::Rating Rating;
- for (SI::Loop::Iterator it3; prd->ratingLoop.getNext(Rating, it3); ) {
- if (I18nIsPreferredLanguage(Setup.EPGLanguages, Rating.languageCode, LanguagePreferenceRating)) {
- int ParentalRating = (Rating.getRating() & 0xFF);
- switch (ParentalRating) {
- // values defined by the DVB standard (minimum age = rating + 3 years):
- case 0x01 ... 0x0F:
- ParentalRating += 3;
- break;
- // values defined by broadcaster CSAT (now why didn't they just use 0x07, 0x09 and 0x0D?):
- case 0x11:
- ParentalRating = 10;
- break;
- case 0x12:
- ParentalRating = 12;
- break;
- case 0x13:
- ParentalRating = 16;
- break;
- default:
- ParentalRating = 0;
- }
- pEvent->SetParentalRating(ParentalRating);
- }
- }
- }
- break;
- case SI::PDCDescriptorTag: {
- SI::PDCDescriptor * pd = (SI::PDCDescriptor *) d;
- time_t now = time (NULL);
- struct tm tm_r;
- struct tm t = *localtime_r (&now, &tm_r); // this initializes the time zone in 't'
- t.tm_isdst = -1; // makes sure mktime() will determine the correct DST setting
- int month = t.tm_mon;
- t.tm_mon = pd->getMonth () - 1;
- t.tm_mday = pd->getDay ();
- t.tm_hour = pd->getHour ();
- t.tm_min = pd->getMinute ();
- t.tm_sec = 0;
- if (month == 11 && t.tm_mon == 0) // current month is dec, but event is in jan
- t.tm_year++;
- else if (month == 0 && t.tm_mon == 11) // current month is jan, but event is in dec
- t.tm_year--;
- time_t vps = mktime (&t);
- pEvent->SetVps (vps);
- }
- break;
- case SI::TimeShiftedEventDescriptorTag: {
- SI::TimeShiftedEventDescriptor * tsed = (SI::TimeShiftedEventDescriptor *) d;
- cSchedule *rSchedule =
- (cSchedule *) Schedules->
- GetSchedule (tChannelID (Source, channel->Nid (), channel->Tid (), tsed->getReferenceServiceId ()));
- if (!rSchedule)
- break;
- rEvent = (cEvent *) rSchedule->GetEvent (tsed->getReferenceEventId ());
- if (!rEvent)
- break;
- pEvent->SetTitle (rEvent->Title ());
- pEvent->SetShortText (rEvent->ShortText ());
- pEvent->SetDescription (rEvent->Description ());
- }
- break;
- case SI::LinkageDescriptorTag: {
- SI::LinkageDescriptor * ld = (SI::LinkageDescriptor *) d;
- tChannelID linkID (Source, ld->getOriginalNetworkId (), ld->getTransportStreamId (), ld->getServiceId ());
- if (ld->getLinkageType () == 0xB0) { // Premiere World
- time_t now = time (NULL);
- bool hit = SiEitEvent.getStartTime () <= now
- && now < SiEitEvent.getStartTime () + SiEitEvent.getDuration ();
- if (hit) {
- char linkName[ld->privateData.getLength () + 1];
- strn0cpy (linkName, (const char *) ld->privateData.getData (), sizeof (linkName));
- // TODO is there a standard way to determine the character set of this string?
- cChannel *link = Channels.GetByChannelID (linkID);
- if (link != channel) { // only link to other channels, not the same one
- //fprintf(stderr, "Linkage %s %4d %4d %5d %5d %5d %5d %02X '%s'\n", hit ? "*" : "", channel->Number(), link ? link->Number() : -1, SiEitEvent.getEventId(), ld->getOriginalNetworkId(), ld->getTransportStreamId(), ld->getServiceId(), ld->getLinkageType(), linkName);//XXX
- if (link) {
- if (Setup.UpdateChannels == 1 || Setup.UpdateChannels >= 3)
- link->SetName (linkName, "", "");
- } else if (Setup.UpdateChannels >= 4) {
- cChannel *transponder = channel;
- if (channel->Tid () != ld->getTransportStreamId ())
- transponder = Channels.GetByTransponderID (linkID);
- link =
- Channels.NewChannel (transponder, linkName, "", "", ld->getOriginalNetworkId (),
- ld->getTransportStreamId (), ld->getServiceId ());
- }
- if (link) {
- if (!LinkChannels)
- LinkChannels = new cLinkChannels;
- LinkChannels->Add (new cLinkChannel (link));
- }
- } else
- channel->SetPortalName (linkName);
- }
- }
- }
- break;
- case SI::ComponentDescriptorTag: {
- SI::ComponentDescriptor * cd = (SI::ComponentDescriptor *) d;
- uchar Stream = cd->getStreamContent ();
- uchar Type = cd->getComponentType ();
- //if (1 <= Stream && Stream <= 3 && Type != 0) { // 1=video, 2=audio, 3=subtitles
- if (1 <= Stream && Stream <= 6 && Type != 0) { // 1=MPEG2-video, 2=MPEG1-audio, 3=subtitles, 4=AC3-audio, 5=H.264-video, 6=HEAAC-audio
- if (!Components)
- Components = new cComponents;
- char buffer[Utf8BufSize (256)];
- Components->SetComponent (Components->NumComponents (), Stream, Type,
- I18nNormalizeLanguageCode (cd->languageCode),
- cd->description.getText (buffer, sizeof (buffer)));
- }
- }
- break;
- case SI::DishExtendedEventDescriptorTag: {
- SI::UnimplementedDescriptor *deed = (SI::UnimplementedDescriptor *)d;
- if (!DishEventDescriptor) {
- DishEventDescriptor = new SI::DishDescriptor();
- }
- DishEventDescriptor->setExtendedtData(Tid+1, deed->getData());
- HasExternalData = true;
- }
- break;
- case SI::DishShortEventDescriptorTag: {
- SI::UnimplementedDescriptor *dsed = (SI::UnimplementedDescriptor *)d;
- if (!DishEventDescriptor) {
- DishEventDescriptor = new SI::DishDescriptor();
- }
- DishEventDescriptor->setShortData(Tid+1, dsed->getData());
- HasExternalData = true;
- }
- break;
- case SI::DishRatingDescriptorTag: {
- if (d->getLength() == 4) {
- if (!DishEventDescriptor) {
- DishEventDescriptor = new SI::DishDescriptor();
- }
- uint16_t rating = d->getData().TwoBytes(2);
- DishEventDescriptor->setRating(rating);
- }
- }
- break;
- case SI::DishSeriesDescriptorTag: {
- if (d->getLength() == 10) {
- //LogD(2, prep("DishSeriesDescriptorTag: %s)"), (const char*) d->getData().getData());
- if (!DishEventDescriptor) {
- DishEventDescriptor = new SI::DishDescriptor();
- }
- DishEventDescriptor->setEpisodeInfo(d->getData());
- }
-// else {
-// LogD(2, prep("DishSeriesDescriptorTag length: %d)"), d->getLength());
-// }
- }
- break;
- default:
- break;
- }
- delete d;
- }
-
- if (!rEvent) {
- if (ShortEventDescriptor) {
- char buffer[Utf8BufSize (256)];
- unsigned char *f;
- int l = ShortEventDescriptor->name.getLength();
- f = (unsigned char *) ShortEventDescriptor->name.getData().getData();
- decodeText2 (f, l, buffer, sizeof (buffer));
- //ShortEventDescriptor->name.getText(buffer, sizeof(buffer));
- pEvent->SetTitle (buffer);
- l = ShortEventDescriptor->text.getLength();
- f = (unsigned char *) ShortEventDescriptor->text.getData().getData();
- decodeText2 (f, l, buffer, sizeof (buffer));
- //ShortEventDescriptor->text.getText(buffer, sizeof(buffer));
- pEvent->SetShortText (buffer);
- } else if (!HasExternalData) {
- pEvent->SetTitle (NULL);
- pEvent->SetShortText (NULL);
- }
- if (ExtendedEventDescriptors) {
- char buffer[Utf8BufSize (ExtendedEventDescriptors->getMaximumTextLength (": ")) + 1];
- pEvent->SetDescription (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": "));
- } else if (!HasExternalData)
- pEvent->SetDescription (NULL);
-
- if (DishEventDescriptor) {
- if (DishEventDescriptor->getName())
- pEvent->SetTitle(DishEventDescriptor->getName());
- //LogD(2, prep("channelID: %s DishTitle: %s"), *channel->GetChannelID().ToString(), DishShortEventDescriptor->getText());
-// pEvent->SetDescription(DishExtendedEventDescriptor->getText());
- char *tmp;
- string fmt;
- fmt = "%s";
- if (0 != strcmp(DishEventDescriptor->getShortText(),"") && DishEventDescriptor->hasTheme()) {
- fmt += " - ";
- }
- fmt += "%s";
- if (DishEventDescriptor->hasTheme() && DishEventDescriptor->hasCategory()) {
- fmt += " ~ ";
- }
- fmt += "%s";
-
- Asprintf (&tmp, fmt.c_str(), DishEventDescriptor->getShortText()
- , DishEventDescriptor->getTheme()
- , DishEventDescriptor->getCategory());
- pEvent->SetShortText(tmp);
- //LogD(2, prep("EEPGDEBUG:DishTheme:%x-DishCategory:%x)"), DishTheme, DishCategory);
- free(tmp);
-
- fmt = "%s";
- if (0 != strcmp(DishEventDescriptor->getDescription(),"")
- && (0 != strcmp(DishEventDescriptor->getRating(),"")
- || 0 != strcmp(DishEventDescriptor->getStarRating(),""))) {
- fmt += "\nRating: ";
- }
- fmt += "%s %s";
- if (0 != strcmp(DishEventDescriptor->getProgramId(),"")) {
- fmt += "\n Program ID: ";
- }
- fmt += "%s %s";
- time_t orgAirDate = DishEventDescriptor->getOriginalAirDate();
- fmt += orgAirDate == 0 ? "%s" : " Original Air Date: %s";
- LogD(3, prep("DishSeriesDescriptorTag2: %s %s %d %s)"), DishEventDescriptor->getProgramId()
- , DishEventDescriptor->getSeriesId()
- , orgAirDate
- , orgAirDate == 0 ? "" : asctime(localtime(&orgAirDate)));
- Asprintf (&tmp, fmt.c_str(), DishEventDescriptor->getDescription()
- , DishEventDescriptor->getRating()
- , DishEventDescriptor->getStarRating()
- , DishEventDescriptor->getProgramId()
- , DishEventDescriptor->getSeriesId()
- , orgAirDate == 0 ? "" : asctime(localtime(&orgAirDate)) (&orgAirDate));
- pEvent->SetDescription(tmp);
- free(tmp);
-
-
- //LogD(2, prep("DishDescription: %s"), DishExtendedEventDescriptor->getText());
- //LogD(2, prep("DishShortText: %s"), DishExtendedEventDescriptor->getShortText());
- }
- }
- delete ExtendedEventDescriptors;
- delete ShortEventDescriptor;
- delete DishEventDescriptor;
-
- pEvent->SetComponents (Components);
-
-// LogD(2, prep("channelID: %s Title: %s"), *channel->GetChannelID().ToString(), pEvent->Title());
-
-// if (pEvent->ChannelID() == tChannelID::FromString("S119.0W-4100-6-110-110")) {
-// LogD(2, prep("ID: %d Title: %s Time: %d Tid: 0x%x"), pEvent->EventID(), pEvent->Title(), pEvent->StartTime(), pEvent->TableID());
-// }
-
- if (!HasExternalData)
- pEvent->FixEpgBugs ();
- if (LinkChannels)
- channel->SetLinkChannels (LinkChannels);
- Modified = true;
-#ifdef USE_DDEPGENTRY
- //to avoid double epg-entrys from ext and int epg sources :EW
- if (pEvent && pEvent->TableID () != 0x00) {
- cEvent *pPreviousEvent = (cEvent *) pSchedule->GetPreviousEvent (pEvent);
- if (pPreviousEvent) {
- if (Setup.DoubleEpgAction == 0) {
- pPreviousEvent->SetStartTime (pEvent->StartTime ());
- pPreviousEvent->SetDuration (pEvent->Duration ());
- if (Setup.DisableVPS == 0) {
- if (channel)
- pPreviousEvent->SetRunningStatus (pEvent->RunningStatus (), channel);
- else
- pPreviousEvent->SetRunningStatus (pEvent->RunningStatus ());
- }
- // to use the info of the original epg, update the extern one,
- // if it has less info
- char buffer_short_intern[256];
- char buffer_short_extern[256];
- int len_short_intern = 0;
- int len_short_extern = 0;
- if (pEvent->ShortText ())
- len_short_intern =
- snprintf (buffer_short_intern, sizeof (buffer_short_intern) - 1, "%s", pEvent->ShortText ());
- if (pPreviousEvent->ShortText ())
- len_short_extern =
- snprintf (buffer_short_extern, sizeof (buffer_short_extern) - 1, "%s", pPreviousEvent->ShortText ());
- if (len_short_intern > 0) {
- if (len_short_extern < 1)
- pPreviousEvent->SetShortText (buffer_short_intern);
- else if (len_short_intern > len_short_extern)
- pPreviousEvent->SetShortText (buffer_short_intern);
- }
- if (pEvent->Description ()) {
- char buffer_title_intern[4096];
- char buffer_title_extern[4096];
- int len_title_intern = 0;
- int len_title_extern = 0;
- if (pEvent->Description ())
- len_title_intern =
- snprintf (buffer_title_intern, sizeof (buffer_title_intern) - 1, "%s", pEvent->Description ());
- if (pPreviousEvent->Description ())
- len_title_extern =
- snprintf (buffer_title_extern, sizeof (buffer_title_extern) - 1, "%s",
- pPreviousEvent->Description ());
- if (len_title_intern > 0) {
- if (len_title_extern < 1)
- pPreviousEvent->SetDescription (buffer_title_intern);
- else if (len_title_intern > len_title_extern)
- pPreviousEvent->SetDescription (buffer_title_intern);
- }
- }
- if (pPreviousEvent->Vps () == 0 && pEvent->Vps () != 0)
- pPreviousEvent->SetVps (pEvent->Vps ());
- pSchedule->DelEvent (pEvent);
- pPreviousEvent->FixEpgBugs ();
- } else
- pSchedule->DelEvent (pPreviousEvent);
- }
- }
-#endif /* DDEPGENTRY */
- }
- if (Empty && Tid == 0x4E && getSectionNumber () == 0)
- // ETR 211: an empty entry in section 0 of table 0x4E means there is currently no event running
- pSchedule->ClrRunningStatus (channel);
- if (Tid == 0x4E)
- pSchedule->SetPresentSeen ();
- if (OnlyRunningStatus) {
- LogD(2, prep("OnlyRunningStatus"));
- return;
- }
- if (Modified) {
- pSchedule->Sort ();
- if (!HasExternalData)
- pSchedule->DropOutdated (SegmentStart, SegmentEnd, Tid, getVersionNumber ());
- Schedules->SetModified (pSchedule);
- }
- LogD(2, prep("end of cEIT2"));
-
-}
-//end of cEIT2
-
-} //end namespace SI
-
-void cFilterEEPG::ProcessNextFormat (bool FirstTime = false)
-{
- /* for (int i = 0; i <= HIGHEST_FORMAT; i++)
- esyslog ("EEPGDEBUG: Format %i on pid %x", i, UnprocessedFormat[i]); */
-
- if (!FirstTime) {
- isyslog ("EEPG: found %i equivalents channels", nEquivChannels);
- isyslog ("EEPG: found %i themes", nThemes);
- isyslog ("EEPG: found %i channels", nChannels);
- isyslog ("EEPG: found %i titles", nTitles);
- isyslog ("EEPG: found %i summaries", nSummaries);
- isyslog ("EEPG: written %i titles", TitleCounter);
- isyslog ("EEPG: written %i summaries", SummaryCounter);
- isyslog ("EEPG: rejected %i titles/summaries because of higher TableId", RejectTableId);
- //Send message when finished
- if (SetupPE.DisplayMessage) {
- char *mesg;
- Asprintf(&mesg, "EEPG: written %i summaries", SummaryCounter);
- Skins.QueueMessage(mtInfo, mesg, 2);
- free(mesg);
- }
-
- TitleCounter = 0;
- SummaryCounter = 0;
- /*if (SummariesNotFound != 0)
- esyslog ("EEPG: %i summaries not found", SummariesNotFound);
- else if (VERBOSE >= 1)
- isyslog ("EEPG: %i summaries not found", SummariesNotFound); */
- UnprocessedFormat[Format] = 0; //clear previously processed format
-
- //Next few lines prevent eepg from reading multiple eepg-systems on one transponder e.g. CDNL
- //isyslog ("EEPG: Ended all processing");
- //return;
- //If you remove these lines, multiple systems WILL be read
-
- }
- TitleCounter = 0;
- SummaryCounter = 0;
- RejectTableId = 0;
- //cleanup mess of last processing
- ChannelSeq.clear ();
- FreeTitles ();
- FreeSummaries ();
-
- //now start looking for next format to process
- int pid;
- for (int i = 0; i <= HIGHEST_FORMAT; i++){ //find first format that is detected
- if (UnprocessedFormat[i]) {
- isyslog ("EEPG: %s Extended EPG detected on pid %x.", FormatName[i], UnprocessedFormat[i]);
- Format = (EFormat)i;
- // highest format is processed first this way
- // make sure that CONT protocols like Premiere, Freesat are processed
- // AFTER ONCE protocols like MHW, SKY and NAGRA
- break;
- }
- if (i == HIGHEST_FORMAT) { //there are no formats left to process
- isyslog ("EEPG: Ended all processing");
- return;
- }
- }
-
- pid = UnprocessedFormat[Format]; //and reinstall its pid
-
- memset (&InitialChannel, 0, 8);
- memset (&InitialTitle, 0, 64);
- memset (&InitialSummary, 0, 64);
- NagraCounter = 0;
- Version = -1; //because 0 can be a valid version number...
- nEquivChannels = 0;
- nChannels = 0;
- nThemes = 0;
- EndChannels = false;
- EndThemes = false;
- switch (Format) {
- case PREMIERE:
- if (!Matches (pid, 0xA0))
- Add (pid, 0xA0);
- break;
- case MHW1:
- AddFilter (0xd3, 0x92); //ThemesMHW1//TODO: all filters are serialized, strictly speaking Themes is non-fatal...
- break;
- case MHW2:
- AddFilter (0x231, 0xc8); //MHW2 Channels & Themes
- break;
- case SKY_IT:
- case SKY_UK:
- AddFilter (0x11, 0x4a); //Sky Channels
- break;
- case FREEVIEW: //Freeview, CONT mode //TODO streamline this for other modes
- ReadFileDictionary ();
- AddFilter (pid, 0x4e, 0xfe); //event info, actual(0x4e)/other(0x4f) TS, present/following
- AddFilter (pid, 0x50, 0xf0); //event info, actual TS, schedule(0x50)/schedule for future days(0x5X)
- AddFilter (pid, 0x60, 0xf0); //event info, other TS, schedule(0x60)/schedule for future days(0x6X)
- AddFilter (0x39, 0x50, 0xf0); //event info, actual TS, Viasat
- AddFilter (0x39, 0x60, 0xf0); //event info, other TS, Viasat
- break;
- case NAGRA:
- AddFilter (pid, 0xb0); //perhaps TID is equal to first data byte?
- break;
- case DISH_BEV:
- AddFilter (0x12, 0, 0); // event info, actual(0x4e)/other(0x4f) TS, present/following
- AddFilter (0x0300, 0, 0); // Dish Network EEPG event info, actual(0x4e)/other(0x4f) TS, present/following
- AddFilter (0x0441, 0, 0); // Dish Network EEPG event info, actual(0x4e)/other(0x4f) TS, present/following
-// AddFilter (0x0441, 0x50, 0xf0); // Bell ExpressVU EEPG
-// AddFilter (0x0441, 0x60, 0xf0); // Bell ExpressVU EEPG
- break;
- default:
- break;
- }
-}
-
-void cFilterEEPG::ProccessContinuous(u_short Pid, u_char Tid, int Length, const u_char *Data)
-{
- //0x39 Viasat, 0x0300 Dish Network EEPG, 0x0441 Bell ExpressVU EEPG
- LogD(4, prep("Pid: 0x%02x Tid: %d Length: %d"), Pid, Tid, Length);
- cSchedulesLock SchedulesLock(true, 10);
- cSchedules *Schedules = (cSchedules*)(cSchedules::Schedules(SchedulesLock));
- //Look for other satelite positions only if Dish/Bell ExpressVU for the moment hardcoded pid check
- if(Schedules)
- SI::cEIT2 EIT(Schedules, Source(), Tid, Data);
-
- else//cEIT EIT (Schedules, Source (), Tid, Data);
- {
- // If we don't get a write lock, let's at least get a read lock, so
- // that we can set the running status and 'seen' timestamp (well, actually
- // with a read lock we shouldn't be doing that, but it's only integers that
- // get changed, so it should be ok)
- cSchedulesLock SchedulesLock;
- cSchedules *Schedules = (cSchedules*)(cSchedules::Schedules(SchedulesLock));
- if(Schedules)
- SI::cEIT2 EIT(Schedules, Source(), Tid, Data, true);
-
- //cEIT EIT (Schedules, Source (), Tid, Data, true);
- }
-}
-
-void cFilterEEPG::Process (u_short Pid, u_char Tid, const u_char * Data, int Length)
-{
- int now = time (0);
-// LogD(2, prep("Pid: 0x%02x Tid: %d Length: %d PMT pid: 0x%04x"), Pid, Tid, Length, pmtpid);
-// LogD(2, prep("Source: %d Transponder: %d"), Source () , Transponder ());
-
- if (Pid == 0 && Tid == SI::TableIdPAT) {
- if (!pmtnext || now > pmtnext) {
- if (pmtpid)
- NextPmt ();
- if (!pmtpid) {
- SI::PAT pat (Data, false);
- if (pat.CheckCRCAndParse ()) {
- SI::PAT::Association assoc;
- int idx = 0;
- for (SI::Loop::Iterator it; pat.associationLoop.getNext (assoc, it);) {
- if (!assoc.isNITPid ()) {
- //if (!assoc.isNITPid () && Scanning) {
- if (idx++ == pmtidx) {
- pmtpid = assoc.getPid ();
- pmtsid = assoc.getServiceId ();
- Add (pmtpid, 0x02);
- pmtnext = now + PMT_SCAN_TIMEOUT;
- LogI(3, prep("PMT pid now 0x%04x (idx=%d)\n"), pmtpid, pmtidx);
- break;
- }
- }
- }
- if (!pmtpid) {
- pmtidx = 0;
- pmtnext = now + PMT_SCAN_IDLE;
- LogI(1, prep("PMT scan idle\n"));
-
- Del (0, 0); //this effectively kills the PMT_SCAN_IDLE functionality
-
- //now after the scan is completed, start processing
- ProcessNextFormat (true); //FirstTime flag is set
- }
- }
- }
- }
- } else if (pmtpid > 0 && Pid == pmtpid && Tid == SI::TableIdPMT && Source () && Transponder ()) {
- SI::PMT pmt (Data, false);
- if (pmt.CheckCRCAndParse () && pmt.getServiceId () == pmtsid) {
- SI::PMT::Stream stream;
- for (SI::Loop::Iterator it; pmt.streamLoop.getNext (stream, it);) {
- LogD(2, prep("StreamType: 0x%02x"), stream.getStreamType ());
- if (stream.getStreamType () == 0x05 || stream.getStreamType () == 0xc1) { //0x05 = Premiere, SKY, Freeview, Nagra 0xc1 = MHW1,MHW2;
- SI::CharArray data = stream.getData ();
- if ((data[1] & 0xE0) == 0xE0 && (data[3] & 0xF0) == 0xF0) {
- bool prvData = false, usrData = false;
- bool prvOTV = false, prvFRV = false;
- int usrOTV = 0, usrFRV = 0;
- if (data[2]==0x39) {//TODO Test This
- prvFRV = true;
- usrFRV = 1;
- LogD(1, prep("if (data[2]==0x39) {//TODO Test This"));
- }
- //Format = 0; // 0 = premiere, 1 = MHW1, 2 = MHW2, 3 = Sky Italy (OpenTV), 4 = Sky UK (OpenTV), 5 = Freesat (Freeview), 6 = Nagraguide
- SI::Descriptor * d;
- for (SI::Loop::Iterator it; (d = stream.streamDescriptors.getNext (it));) {
- LogD(2, prep("EEPGDEBUG:d->getDescriptorTAG():%x,SI::PrivateTag:%x\n"), d->getDescriptorTag (), SI::PrivateDataSpecifierDescriptorTag);
- switch (d->getDescriptorTag ()) {
- case SI::PrivateDataSpecifierDescriptorTag:
- //esyslog ("prv: %d %08x\n", d->getLength (), d->getData ().FourBytes (2));
- if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x000000be)
- prvData = true;
- if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x4f545600) //OpenTV
- prvOTV = true;
- if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x46534154) //Freeview
- prvFRV = true;
- break;
- case 0x52:
- //if (d->getLength () == 3 && d->getData ().FourBytes (2) == 0xb07ea882) {
- if (d->getLength () == 3 && ((d->getData ().TwoBytes (2) & 0xff00) == 0xb000))
- UnprocessedFormat[NAGRA] = stream.getPid ();
- break;
- case 0x90:
- //esyslog ("usr: %d %08x\n", d->getLength (), d->getData ().FourBytes (2));
- if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x0000ffff)
- usrData = true;
- if (d->getLength () == 3 && ((d->getData ().TwoBytes (2) & 0xff00) == 0xb600)) //SKY IT //TODO ugly!
- //if (d->getLength () == 3 && (d->getData ().TwoBytes (2) == 0xb6a5)) //SKY IT //TODO ugly!
- usrOTV = SKY_IT;
- //Format = SKY_IT;
- if (d->getLength () == 3 && d->getData ().FourBytes (2) == 0xc004e288) //SKY UK
- usrOTV = SKY_UK;
- //Format = SKY_UK;
- break;
- case 0xc1: //MHW1, MHW2
-// esyslog("EEPGDEBUG:d->getDescriptorTAG:%d %08x\n",d->getLength(),d->getData().FourBytes(2));
- if (d->getLength () == 10 && d->getData ().FourBytes (2) == 0x50555348) //MHw1 Cyfra
- UnprocessedFormat[MHW1] = stream.getPid ();
- break;
- case 0xc2: //MHW1, MHW2
- if (d->getLength () == 10 && d->getData ().FourBytes (2) == 0x45504700) //MHw1 CanDigNL and CSat
- UnprocessedFormat[MHW1] = stream.getPid ();
- else if (d->getLength () == 10 && d->getData ().FourBytes (2) == 0x46494348) { //MHW2
- UnprocessedFormat[MHW2] = stream.getPid ();
- }
- break;
- case 0xd1: //Freeview
- LogD(1, prep("case 0xd1: //Freeview"));
- if (d->getLength () == 3 && ((d->getData ().TwoBytes (2) & 0xff00) == 0x0100))
- usrFRV = 0x01;
- //01 = EIT pid 3842
- //03 04 = SDT Service Description Table pid 3841
- //07 = still undocumented, definition of buch of transport streams pid 3840
- //02 = ATSC reserved, find out what huffman encoded text is sent here! pid 3843
- //05 06 = TOT Time Offset Table pid 3844
- break;
-
- /* case 0xfe: //SKY_IT
- if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x534b5900) { //SKY_IT
- Format = SKY_IT;
- }
- break;*/
- default:
- break;
- }
- delete d;
- }
- if ((prvOTV) && ((usrOTV == SKY_IT) || (usrOTV == SKY_UK)))
- UnprocessedFormat[usrOTV] = stream.getPid ();
- else if (prvFRV)
- if (usrFRV == 0x01)
- UnprocessedFormat[FREEVIEW] = stream.getPid ();
- if (prvData && usrData)
- UnprocessedFormat[PREMIERE] = stream.getPid ();
- //TODO DPE this is not good since the DISH/BEV filters are always on, but have to test somehow.
- //EEPG:12472:H:S119.0W:20000:0:0:0:0:36862:4100:18:36862
- if (((Source() == cSource::FromString("S119.0W")
- && Transponder() == cChannel::Transponder(12472,'H'))
- || (Source() == cSource::FromString("S91.0W")
- && Transponder() == cChannel::Transponder(12224,'R')))
- && !UnprocessedFormat[DISH_BEV]) {
- UnprocessedFormat[DISH_BEV] = stream.getPid ();
- }
- } //if data[1] && data [3]
- } //if streamtype
- /*if (Format != PREMIERE) //any format found
- break; //break out for loop */
- } //for loop that walks through streams
-// if (Format == PREMIERE) { //FIXME for Premiere you should also stop scanning when found...
- NextPmt ();
- pmtnext = 0;
- /* }
- else {
- Del (pmtpid, 0x02);
- Del (0, 0);
- pmtidx = 0;
- pmtnext = now + PMT_SCAN_IDLE;
- isyslog ("PMT scan forced idle\n");
- }*/
- } //checkCRC
- } //if pmtpid
- else if (Source ()) {
-
- if ( Pid == 0x12 || Pid == 0x0300 || Pid == 0x0441 ) {
- if (Tid >= 0x4E)
- ProccessContinuous(Pid, Tid, Length, Data);
- return;
- }
- int Result;
- switch (Tid) {
- case 0xA0: //TODO DPE test this missing break but it seems a bug
- if ((Pid < 0x30) || (Pid > 0x37)) {
- SI::PremiereCIT cit (Data, false);
- if (cit.CheckCRCAndParse ()) {
- cSchedulesLock SchedulesLock (true, 10);
- cSchedules *Schedules = (cSchedules *) cSchedules::Schedules (SchedulesLock);
- if (Schedules) {
- int nCount = 0;
- int nRating = 0;
- SI::ExtendedEventDescriptors * ExtendedEventDescriptors = 0;
- SI::ShortEventDescriptor * ShortEventDescriptor = 0;
- char *order = 0, *rating = 0;
- {
- time_t firstTime = 0;
- SI::Descriptor * d;
- bool UseExtendedEventDescriptor = false;
- int LanguagePreferenceShort = -1;
- int LanguagePreferenceExt = -1;
- for (SI::Loop::Iterator it; (d = cit.eventDescriptors.getNext (it));) {
- switch (d->getDescriptorTag ()) {
- case 0xF0: // order information
- if (SetupPE.OrderInfo) {
- static const char *text[] = {
- trNOOP ("Ordernumber"),
- trNOOP ("Price"),
- trNOOP ("Ordering"),
- trNOOP ("SMS"),
- trNOOP ("WWW")
- };
- char buff[512];
- int p = 0;
- const unsigned char *data = d->getData ().getData () + 2;
- for (int i = 0; i < 5; i++) {
- int l = data[0];
- if (l > 0)
- p += snprintf (&buff[p], sizeof (buff) - p, "\n%s: %.*s", tr (text[i]), l, &data[1]);
- data += l + 1;
- }
- if (p > 0)
- order = strdup (buff);
- }
- break;
- case 0xF1: // parental rating
- if (SetupPE.RatingInfo) {
- char buff[512];
- int p = 0;
- const unsigned char *data = d->getData ().getData () + 2;
- nRating = data[0] + 3;
- p += snprintf (&buff[p], sizeof (buff) - p, "\n%s: %d %s", tr ("Rating"), nRating, tr ("years"));
- data += 7;
- int l = data[0];
- if (l > 0)
- p += snprintf (&buff[p], sizeof (buff) - p, " (%.*s)", l, &data[1]);
- if (p > 0)
- rating = strdup (buff);
- }
- break;
- case SI::PremiereContentTransmissionDescriptorTag:
- if (nCount >= 0) {
- SI::PremiereContentTransmissionDescriptor * pct = (SI::PremiereContentTransmissionDescriptor *) d;
- nCount++;
- SI::PremiereContentTransmissionDescriptor::StartDayEntry sd;
- SI::Loop::Iterator it;
- if (pct->startDayLoop.getNext (sd, it)) {
- SI::PremiereContentTransmissionDescriptor::StartDayEntry::StartTimeEntry st;
- SI::Loop::Iterator it2;
- if (sd.startTimeLoop.getNext (st, it2)) {
- time_t StartTime = st.getStartTime (sd.getMJD ());
- if (nCount == 1)
- firstTime = StartTime;
- else if (firstTime < StartTime - 5 * 50 || firstTime > StartTime + 5 * 60)
- nCount = -1;
- }
- }
- }
- break;
- case SI::ExtendedEventDescriptorTag: {
- SI::ExtendedEventDescriptor * eed = (SI::ExtendedEventDescriptor *) d;
- if (I18nIsPreferredLanguage (Setup.EPGLanguages, eed->languageCode, LanguagePreferenceExt)
- || !ExtendedEventDescriptors) {
- delete ExtendedEventDescriptors;
- ExtendedEventDescriptors = new SI::ExtendedEventDescriptors;
- UseExtendedEventDescriptor = true;
- }
- if (UseExtendedEventDescriptor) {
- ExtendedEventDescriptors->Add (eed);
- d = NULL; // so that it is not deleted
- }
- if (eed->getDescriptorNumber () == eed->getLastDescriptorNumber ())
- UseExtendedEventDescriptor = false;
- }
- break;
- case SI::ShortEventDescriptorTag: {
- SI::ShortEventDescriptor * sed = (SI::ShortEventDescriptor *) d;
- if (I18nIsPreferredLanguage (Setup.EPGLanguages, sed->languageCode, LanguagePreferenceShort)
- || !ShortEventDescriptor) {
- delete ShortEventDescriptor;
- ShortEventDescriptor = sed;
- d = NULL; // so that it is not deleted
- }
- }
- break;
- default:
- break;
- }
- delete d;
- }
- }
-
- {
- bool Modified = false;
- int optCount = 0;
- unsigned int crc[3];
- crc[0] = cit.getContentId ();
- SI::PremiereContentTransmissionDescriptor * pct;
- for (SI::Loop::Iterator it;
- (pct =
- (SI::PremiereContentTransmissionDescriptor *) cit.eventDescriptors.getNext (it,
- SI::
- PremiereContentTransmissionDescriptorTag));) {
- int nid = pct->getOriginalNetworkId ();
- int tid = pct->getTransportStreamId ();
- int sid = pct->getServiceId ();
- if (SetupPE.FixEpg) {
- if (nid == 133) {
- if (tid == 0x03 && sid == 0xf0) {
- tid = 0x02;
- sid = 0xe0;
- } else if (tid == 0x03 && sid == 0xf1) {
- tid = 0x02;
- sid = 0xe1;
- } else if (tid == 0x03 && sid == 0xf5) {
- tid = 0x03;
- sid = 0xdc;
- } else if (tid == 0x04 && sid == 0xd2) {
- tid = 0x11;
- sid = 0xe2;
- } else if (tid == 0x11 && sid == 0xd3) {
- tid = 0x11;
- sid = 0xe3;
- }
- }
- }
- tChannelID channelID (Source (), nid, tid, sid);
- cChannel *channel = Channels.GetByChannelID (channelID, true);
-#ifdef USE_NOEPG
- // only use epg from channels not blocked by noEPG-patch
- if (!allowedEPG (channelID))
- continue;
-#endif /* NOEPG */
-
- if (!channel)
- continue;
-
- cSchedule *pSchedule = (cSchedule *) Schedules->GetSchedule (channelID);
- if (!pSchedule) {
- pSchedule = new cSchedule (channelID);
- Schedules->Add (pSchedule);
- }
-
- optCount++;
- SI::PremiereContentTransmissionDescriptor::StartDayEntry sd;
- int index = 0;
- for (SI::Loop::Iterator it; pct->startDayLoop.getNext (sd, it);) {
- int mjd = sd.getMJD ();
- SI::PremiereContentTransmissionDescriptor::StartDayEntry::StartTimeEntry st;
- for (SI::Loop::Iterator it2; sd.startTimeLoop.getNext (st, it2);) {
- time_t StartTime = st.getStartTime (mjd);
- time_t EndTime = StartTime + cit.getDuration ();
- int runningStatus = (StartTime < now
- && now < EndTime) ? SI::RunningStatusRunning : ((StartTime - 30 < now
- && now <
- StartTime) ? SI::
- RunningStatusStartsInAFewSeconds
- : SI::RunningStatusNotRunning);
- bool isOpt = false;
- if (index++ == 0 && nCount > 1)
- isOpt = true;
- crc[1] = isOpt ? optCount : 0;
- crc[2] = StartTime / STARTTIME_BIAS;
- tEventID EventId = ((('P' << 8) | 'W') << 16) | crc16 (0, (unsigned char *) crc, sizeof (crc));
- LogI(2, "%s R%d %04x/%.4x %d %d/%d %s +%d ", *channelID.ToString (), runningStatus,
- EventId & 0xFFFF, cit.getContentId (), index, isOpt, optCount,
- stripspace (ctime (&StartTime)), (int) cit.getDuration () / 60);
- if (EndTime + Setup.EPGLinger * 60 < now) {
- LogI(2, "(old)\n");
- continue;
- }
-
- bool newEvent = false;
- cEvent *pEvent = (cEvent *) pSchedule->GetEvent (EventId, -1);
- if (!pEvent) {
- LogI(2, "(new)\n");
- pEvent = new cEvent (EventId);
- if (!pEvent)
- continue;
- newEvent = true;
- } else {
- LogI(2, "(upd)\n");
- pEvent->SetSeen ();
- if (pEvent->TableID () == 0x00 || pEvent->Version () == cit.getVersionNumber ()) {
- if (pEvent->RunningStatus () != runningStatus)
- pSchedule->SetRunningStatus (pEvent, runningStatus, channel);
- continue;
- }
- }
- pEvent->SetEventID (EventId);
- pEvent->SetTableID (Tid);
- pEvent->SetVersion (cit.getVersionNumber ());
- pEvent->SetStartTime (StartTime);
- pEvent->SetDuration (cit.getDuration ());
-
- if (ShortEventDescriptor) {
- char buffer[256];
- ShortEventDescriptor->name.getText (buffer, sizeof (buffer));
- if (isOpt) {
- char buffer2[sizeof (buffer) + 32];
- snprintf (buffer2, sizeof (buffer2), optPats[SetupPE.OptPat], buffer, optCount);
- pEvent->SetTitle (buffer2);
- } else
- pEvent->SetTitle (buffer);
- LogI(2, "title: %s\n", pEvent->Title ());
- pEvent->SetShortText (ShortEventDescriptor->text.getText (buffer, sizeof (buffer)));
- }
- if (ExtendedEventDescriptors) {
- char buffer[ExtendedEventDescriptors->getMaximumTextLength (": ") + 1];
- pEvent->SetDescription (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": "));
- }
- if (order || rating) {
- int len = (pEvent->Description ()? strlen (pEvent->Description ()) : 0) +
- (order ? strlen (order) : 0) + (rating ? strlen (rating) : 0);
- char buffer[len + 32];
- buffer[0] = 0;
- if (pEvent->Description ())
- strcat (buffer, pEvent->Description ());
- if (rating) {
- strcat (buffer, rating);
- pEvent->SetParentalRating(nRating);
- }
- if (order)
- strcat (buffer, order);
- pEvent->SetDescription (buffer);
- }
-
- if (newEvent)
- pSchedule->AddEvent (pEvent);
-
- pEvent->FixEpgBugs ();
- if (pEvent->RunningStatus () != runningStatus)
- pSchedule->SetRunningStatus (pEvent, runningStatus, channel);
- pSchedule->DropOutdated (StartTime, EndTime, Tid, cit.getVersionNumber ());
- Modified = true;
- }
- }
- if (Modified) {
- pSchedule->Sort ();
- Schedules->SetModified (pSchedule);
- }
- delete pct;
- }
- }
- delete ExtendedEventDescriptors;
- delete ShortEventDescriptor;
- free (order);
- free (rating);
- }
- } //if checkcrcandpars
- break;
- } //if citpid == 0xb11 Premiere
- case 0xa1:
- case 0xa2:
- case 0xa3:
- Result = GetTitlesSKYBOX (Data, Length - 4);
- if (Result != 1) //when fatal error or finished
- Del (Pid, 0xa0, 0xfc); //kill filter
- if (Result == 0) { //fatal error
- esyslog ("EEPG: Fatal error reading titles.");
- ProcessNextFormat (); //and go process other formats
- }
- if (Result == 2)
- AddFilter (Pid + 0x10, 0xa8, 0xfc); //Set filter that processes summaries of this batch
- break;
- case 0xa8:
- case 0xa9:
- case 0xaa:
- case 0xab:
- Result = GetSummariesSKYBOX (Data, Length - 4);
- if (Result != 1) //when fatal error or finished
- Del (Pid, 0xa8, 0xfc); //kill filter
- if (Result == 0) {
- esyslog ("EEPG: Fatal error reading summaries.");
- ProcessNextFormat ();
- }
- if (Result == 2) {
- LoadIntoSchedule ();
- if (Pid < 0x47) //this is not the last batch//FIXME chaining is easy on the PIDs and the CPU, but error when Pid,Tid is not used at the moment...
- AddFilter (Pid - 0x0F, 0xa0, 0xfc); //next pid, first tid
- else //last pid was processed
- ProcessNextFormat ();
- }
- break;
- case 0x90:
- if (Pid == 0xd2) {
- Result = GetTitlesMHW1 (Data, Length);
- if (Result != 1) //fatal error or last processed
- Del (Pid, Tid);
- if (Result == 0) {
- esyslog ("EEPG: Fatal error reading titles.");
- ProcessNextFormat ();
- }
- if (Result == 2)
- AddFilter (0xd3, 0x90); //SummariesMHW1
- } else if (Pid == 0xd3) {
- Result = GetSummariesMHW1 (Data, Length);
- if (Result != 1) //fatal error or last processed
- Del (Pid, Tid);
- if (Result == 0) {
- esyslog ("EEPG: Fatal error reading summaries.");
- }
- if (Result == 2) {
- LoadIntoSchedule ();
- }
- if (Result != 1) {
- ProcessNextFormat ();
- }
- }
- break;
- case 0xc8: //GetChannelsMHW2 or GetThemesMHW2
- if (Pid == 0x231) {
- if (Data[3] == 0x01) { //Themes it will be
- Result = GetThemesMHW2 (Data, Length); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed
- //break;
- if (Result != 1)
- EndThemes = true; //also set Endthemes on true on fatal error
- } //if Data
- else if (Data[3] == 0x00) { //Channels it will be
- Result = GetChannelsMHW (Data, Length, 2); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed
- if (Result != 1)
- EndChannels = true; //always remove filter, code 1 should never be returned since MHW2 always reads all channels..
- ChannelsOk = (Result == 2);
- }
- if (EndChannels && EndThemes) { //those are only set withing MHW2
- Del (0x231, 0xc8); //stop reading MHW2 themes and channels
- if (ChannelsOk) //No channels = fatal, no themes = nonfatal
- AddFilter (0x234, 0xe6); //start reading MHW2 titles
- else {
- esyslog ("EEPG: Fatal error reading channels.");
- ProcessNextFormat ();
- }
- }
- } //if Pid == 0x231
- break;
- case 0x91:
- Result = GetChannelsMHW (Data, Length, 1); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed
- Del (Pid, Tid); //always remove filter, code 1 should never be returned since MHW1 always reads all channels...
- if (Result == 2)
- AddFilter (0xd2, 0x90); //TitlesMHW1
- else {
- esyslog ("EEPG: Fatal error reading channels.");
- ProcessNextFormat ();
- }
- break;
- case 0x92:
- Result = GetThemesMHW1 (Data, Length); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed
- if (Result != 1)
- Del (Pid, Tid);
- if (Result == 2)
- AddFilter (0xd3, 0x91); //ChannelsMHW1
- else {
- esyslog ("EEPG: Fatal error reading themes."); //doesnt have to be fatal...
- ProcessNextFormat ();
- }
- break;
- case 0xe6: //TitlesMHW2
- if (Pid == 0x234) {
- Result = GetTitlesMHW2 (Data, Length); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed
- if (Result != 1)
- Del (Pid, Tid);
- if (Result == 0) {
- esyslog ("EEPG: Fatal error reading titles.");
- ProcessNextFormat ();
- }
- if (Result == 2)
- AddFilter (0x236, 0x96); //start reading MHW2 summaries....
- }
- break;
- case 0x96: //Summaries MHW2
- if (Pid == 0x236) {
- Result = GetSummariesMHW2 (Data, Length); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed
- if (Result != 1)
- Del (Pid, Tid);
- if (Result == 0) {
- esyslog ("EEPG: Fatal error reading summaries.");
- }
- if (Result == 2)
- LoadIntoSchedule ();
- if (Result != 1) {
- ProcessNextFormat ();
- }
- } //if pid
- break;
- case 0x4a: //Sky channels
- if (Pid == 0x11) {
- Result = GetChannelsSKYBOX (Data, Length - 4);
- if (Result != 1) //only breakoff on completion or error; do NOT clean up after success, because then not all bouquets will be read
- Del (Pid, Tid); //Read all channels, clean up filter
- if (Result == 2) {
- GetThemesSKYBOX (); //Sky Themes from file; must be called AFTER first channels to have lThemes initialized FIXME
- if (ReadFileDictionary ())
- AddFilter (0x30, 0xa0, 0xfc); //SKY Titles batch 0 of 7
- else {
- esyslog ("EEPG: Fatal error reading huffman table.");
- ProcessNextFormat ();
- }
- }
-
- } //if Pid == 0x11
- break;
- case 0xb0: //NagraGuide
- if (Pid == 0xc8) {
- Result = GetNagra (Data, Length);
- if (Result != 1)
- Del (Pid, Tid);
- if (Result == 0) {
- esyslog ("EEPG: Fatal error processing NagraGuide. End of processing.");
- }
- if (Result == 2) {
- ProcessNagra ();
- cSchedules::Cleanup (true); //deletes all past events
- isyslog ("EEPG: Ended processing Nagra");
- }
- if (Result != 1) {
- ProcessNextFormat ();
- }
- }
- break;
-
- case 0x4E:
- case 0x4F:
- case 0x50:
- case 0x51:
- case 0x52:
- case 0x53:
- case 0x54:
- case 0x55:
- case 0x56:
- case 0x57:
- case 0x58:
- case 0x59:
- case 0x5A:
- case 0x5B:
- case 0x5C:
- case 0x5D:
- case 0x5E:
- case 0x5F:
- case 0x60:
- case 0x61:
- case 0x62:
- case 0x63:
- case 0x64:
- case 0x65:
- case 0x66:
- case 0x67:
- case 0x68:
- case 0x69:
- case 0x6A:
- case 0x6B:
- case 0x6C:
- case 0x6D:
- case 0x6E:
- case 0x6F:
- // Freesat:
- // Set(3842, 0x4E, 0xFE); // event info, actual(0x4E)/other(0x4F) TS, present/following
- // Set(3842, 0x50, 0xF0); // event info, actual TS, schedule(0x50)/schedule for future days(0x5X)
- // Set(3842, 0x60, 0xF0); // event info, other TS, schedule(0x60)/schedule for future days(0x6X)
- //
- // PID found: 3841 (0x0f01) [SECTION: Service Description Table (SDT) - other transport stream]
- // PID found: 3842 (0x0f02) [SECTION: Event Information Table (EIT) - other transport stream, schedule]
- // PID found: 3843 (0x0f03) [SECTION: ATSC reserved] TODO find out what compressed text info is here!
- // PID found: 3844 (0x0f04) [SECTION: Time Offset Table (TOT)]
-
- if (Pid == 3842 || Pid == 0x39) {//0x39 Viasat, 0x0300 Dish Network EEPG, 0x0441 Bell ExpressVU EEPG
- ProccessContinuous(Pid, Tid, Length, Data);
- }
- break;
-
- default:
- break;
- } //end switch
- } //closes SOURCE()
-} //end of closing
-
-// --- cPluginEEPG ------------------------------------------------------
-
-class cPluginEEPG:public cPlugin
-{
-private:
- struct {
- cFilterEEPG *filter;
- cDevice *device;
- } epg[MAXDVBDEVICES];
-
- void CheckCreateFile(const char* Name, const char *fileContent[]);
-
-public:
- cPluginEEPG (void);
- virtual const char *Version (void) {
- return VERSION;
- }
- virtual const char *Description (void) {
- return tr (DESCRIPTION);
- }
- virtual bool Start (void);
- virtual void Stop (void);
- virtual cMenuSetupPage *SetupMenu (void);
- virtual bool SetupParse (const char *Name, const char *Value);
-};
-
-cPluginEEPG::cPluginEEPG (void)
-{
- memset (epg, 0, sizeof (epg));
-}
-
-void cPluginEEPG::CheckCreateFile(const char* Name, const char *fileContent[])
-{
- FILE *File;
- string FileName = string(ConfDir) + "/" + Name;
- File = fopen(FileName.c_str(), "r");
- if (File == NULL) {
- LogE (0, prep("Error opening file '%s', %s"), FileName.c_str(), strerror (errno));
- File = fopen (FileName.c_str(), "w");
- if (File == NULL) {
- LogE (0, prep("Error creating file '%s', %s"), FileName.c_str(), strerror (errno));
- } else {
- int i = 0;
- while (fileContent[i] != NULL) {
- fprintf (File, "%s\n", fileContent[i]);
- i++;
- }
- LogI (0, prep("Success creating file '%s'"), FileName.c_str());
- fclose (File);
- }
- } else {
- fclose (File);
- }
-}
-
-bool cPluginEEPG::Start (void)
-{
-#if APIVERSNUM < 10507
- RegisterI18n (Phrases);
-#endif
- for (int i = 0; i < MAXDVBDEVICES; i++) {
- cDevice *dev = cDevice::GetDevice (i);
- if (dev) {
- epg[i].device = dev;
- dev->AttachFilter (epg[i].filter = new cFilterEEPG);
- isyslog ("Attached EEPG filter to device %d", i);
- }
- }
- ConfDir = NULL;
- // Initialize any background activities the plugin shall perform.
- DIR *ConfigDir;
- if (ConfDir == NULL) {
- Asprintf (&ConfDir, "%s/eepg", cPlugin::ConfigDirectory ());
- }
- ConfigDir = opendir (ConfDir);
- if (ConfigDir == NULL) {
- esyslog ("EEPG: Error opening directory '%s', %s", ConfDir, strerror (errno));
- if (mkdir (ConfDir, 0777) < 0) {
- esyslog ("EEPG: Error creating directory '%s', %s", ConfDir, strerror (errno));
- } else {
- isyslog ("EEPG: Success creating directory '%s'", ConfDir);
- }
- }
- CheckCreateFile(EEPG_FILE_EQUIV, FileEquivalences);
- CheckCreateFile("sky_it.dict", SkyItDictionary);
- CheckCreateFile("sky_uk.dict", SkyUkDictionary);
- CheckCreateFile("sky_it.themes", SkyItThemes);
- CheckCreateFile("sky_uk.themes", SkyUkThemes);
- CheckCreateFile("freesat.t1", FreesatT1);
- CheckCreateFile("freesat.t2", FreesatT2);
- CheckCreateFile("sky_uk.themes", SkyUkThemes);
-
- //store all available sources, so when a channel is not found on current satellite, we can look for alternate sat positions.
- //perhaps this can be done smarter through existing VDR function???
- for (cChannel * Channel = Channels.First (); Channel; Channel = Channels.Next (Channel)) {
- if (!Channel->GroupSep ()) {
- bool found = false;
- for (int i = 0; (i < NumberOfAvailableSources) && (!found); i++)
- found = (Channel->Source () == AvailableSources[i]);
- if (!found)
- AvailableSources[NumberOfAvailableSources++] = Channel->Source ();
- }
- }
- if (CheckLevel(3))
- for (int i = 0; i < NumberOfAvailableSources; i++)
- isyslog ("EEPG: Available sources:%s.", *cSource::ToString (AvailableSources[i]));
-
-
- return true;
-}
-
-void cPluginEEPG::Stop (void)
-{
- for (int i = 0; i < MAXDVBDEVICES; i++) {
- cDevice *dev = epg[i].device;
- if (dev)
- dev->Detach (epg[i].filter);
- delete epg[i].filter;
- epg[i].device = 0;
- epg[i].filter = 0;
- }
- // Clean up after yourself!
- if (ConfDir) {
- free (ConfDir);
- }
-}
-
-cMenuSetupPage *cPluginEEPG::SetupMenu (void)
-{
- return new cMenuSetupPremiereEpg;
-}
-
-bool cPluginEEPG::SetupParse (const char *Name, const char *Value)
-{
-// LogF(0, "!!!! Dime test LogF");
-// LogF(0, "!!!! Dime test LogF %d", 2);
-// LogI(0, "!!!! Dime test LogI");
-// LogI(0, "!!!! Dime test LogI %d", 2);
-// LogI(0, prep2("!!!! Dime test prep"));
-// LogI(0, prep2("!!!! Dime test prep %d"), 2);
-// LogD(0, "!!!! Dime test LogD");
-// LogD(0, "!!!! Dime test LogD %d", 2);
-// LogE(0, "!!!! Dime test LogE");
-// LogE(0, "!!!! Dime test LogE %d", 2);
-
-
- if (!strcasecmp (Name, "OptionPattern"))
- SetupPE.OptPat = atoi (Value);
- else if (!strcasecmp (Name, "OrderInfo"))
- SetupPE.OrderInfo = atoi (Value);
- else if (!strcasecmp (Name, "RatingInfo"))
- SetupPE.RatingInfo = atoi (Value);
- else if (!strcasecmp (Name, "FixEpg"))
- SetupPE.FixEpg = atoi (Value);
- else if (!strcasecmp (Name, "DisplayMessage"))
- SetupPE.DisplayMessage = atoi (Value);
-#ifdef DEBUG
- else if (!strcasecmp (Name, "LogLevel"))
- SetupPE.LogLevel = atoi (Value);
-#endif
- else
- return false;
- return true;
-}
-
-VDRPLUGINCREATOR (cPluginEEPG); // Don't touch this!
+/* + * Extended Epg plugin to VDR (C++) + * + * (C) 2008-2009 Dingo35 + * + * This code is based on: + * -Premiere plugin (C) 2005-2007 Stefan Huelswitt <s.huelswitt@gmx.de> + * -mhwepg program (C) 2002, 2003 Jean-Claude Repetto <mhwepg@repetto.org> + * -LoadEpg plugin written by Luca De Pieri <dpluca@libero.it> + * -Freesat patch written by dom /at/ suborbital.org.uk + * + * + * modify it under the terms of the GNU General Public License + * as published by the Free Software Foundation; either version 2 + * of the License, or (at your option) any later version. + * + * This code is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + * Or, point your browser to http://www.gnu.org/copyleft/gpl.html + */ + +#include <vdr/plugin.h> +#include <vdr/filter.h> +#include <vdr/epg.h> +#include <vdr/channels.h> +#include <vdr/dvbdevice.h> +#include <vdr/i18n.h> +#include <vdr/config.h> +#include <libsi/section.h> +#include <libsi/descriptor.h> +#include <libsi/si.h> +#include "eepg.h" +#include "dish.h" + +#include <map> +#include <string> +#include <stdarg.h> + +#define VERBOSE 3 +/* 0 = only print errors, 1 = print channels and themes, 2 = print channels, themes, titles, summaries 3 = debug mode */ +/* all is logged into /var/log/syslog */ + +#if APIVERSNUM < 10401 +#error You need at least VDR API version 1.4.1 for this plugin +#endif +#if APIVERSNUM < 10507 +#define trNOOP(s) (s) +#endif + +//#define DEBUG +//#define DEBUG2 + +/*#ifdef DEBUG +#define d(x) { (x); } +#else +#define d(x) ; +#endif +#ifdef DEBUG2 +#define d2(x) { (x); } +#else +#define d2(x) ; +#endif*/ + +#define PMT_SCAN_TIMEOUT 10 // seconds +#define PMT_SCAN_IDLE 3600 // seconds + +static const char *VERSION = "0.0.6pre"; +static const char *DESCRIPTION = trNOOP ("Parses Extended EPG data"); + +using namespace std; + +// --- cSetupEEPG ------------------------------------------------------- + +const char *optPats[] = { + "%s", + "%s (Option %d)", + "%s (O%d)", + "#%2$d %1$s", + "[%2$d] %1$s" +}; + +#define NUM_PATS (sizeof(optPats)/sizeof(char *)) + +char *cs_hexdump (int m, const uchar * buf, int n) +{ + int i; + static char dump[1024]; + + dump[i = 0] = '\0'; + m = (m) ? 3 : 2; + if (m * n >= (int) sizeof (dump)) + n = (sizeof (dump) / m) - 1; + while (i < n) + sprintf (dump + (m * i++), "%02X%s", *buf++, (m > 2) ? " " : ""); + return (dump); +} + +class cSetupEEPG +{ +public: + int OptPat; + int OrderInfo; + int RatingInfo; + int FixEpg; + int DisplayMessage; +#ifdef DEBUG + int LogLevel; +#endif + +public: + cSetupEEPG (void); +}; + +cSetupEEPG SetupPE; + +cSetupEEPG::cSetupEEPG (void) +{ + OptPat = 1; + OrderInfo = 1; + RatingInfo = 1; + FixEpg = 0; + DisplayMessage = 1; +#ifdef DEBUG + LogLevel = 0; +#endif + +} + +// --- cMenuSetupPremiereEpg ------------------------------------------------------------ + +class cMenuSetupPremiereEpg:public cMenuSetupPage +{ +private: + cSetupEEPG data; + const char *optDisp[NUM_PATS]; + char buff[NUM_PATS][32]; +protected: + virtual void Store (void); +public: + cMenuSetupPremiereEpg (void); +}; + +cMenuSetupPremiereEpg::cMenuSetupPremiereEpg (void) +{ + data = SetupPE; + SetSection (tr ("PremiereEPG")); + optDisp[0] = tr ("off"); + for (unsigned int i = 1; i < NUM_PATS; i++) { + snprintf (buff[i], sizeof (buff[i]), optPats[i], "Event", 1); + optDisp[i] = buff[i]; + } + Add (new cMenuEditStraItem (tr ("Tag option events"), &data.OptPat, NUM_PATS, optDisp)); + Add (new cMenuEditBoolItem (tr ("Show order information"), &data.OrderInfo)); + Add (new cMenuEditBoolItem (tr ("Show rating information"), &data.RatingInfo)); + Add (new cMenuEditBoolItem (tr ("Fix EPG data"), &data.FixEpg)); + Add (new cMenuEditBoolItem (tr ("Display summary message"), &data.DisplayMessage)); +#ifdef DEBUG + Add (new cMenuEditIntItem (tr ("Level of logging verbosity"), &data.LogLevel, 0, 5)); +#endif +} + +void cMenuSetupPremiereEpg::Store (void) +{ + SetupPE = data; + SetupStore ("OptionPattern", SetupPE.OptPat); + SetupStore ("OrderInfo", SetupPE.OrderInfo); + SetupStore ("RatingInfo", SetupPE.RatingInfo); + SetupStore ("FixEpg", SetupPE.FixEpg); + SetupStore ("DisplayMessage", SetupPE.DisplayMessage); +#ifdef DEBUG + SetupStore ("LogLevel", SetupPE.LogLevel); +#endif +} + +bool CheckLevel(int level) +{ +#ifdef DEBUG + if (SetupPE.LogLevel >= level) +#else + if (VERBOSE >= level) +#endif + { + return true; + } + return false; +} + +const char* PrepareLog(string message) +{ + message = "EEPG: " + message; + return message.c_str(); +} + +#define MAXSYSLOGBUF 256 + +//void LogVsyslog(int errLevel, const char * message, ...) +void LogVsyslog(int errLevel, int const& lineNum, const char * function, const char * message, ...) +{ + va_list ap; + char fmt[MAXSYSLOGBUF]; + if (errLevel == LOG_DEBUG) { + snprintf(fmt, sizeof(fmt), "[%d] %s:%d %s", cThread::ThreadId(), function, lineNum, message); + } else { + snprintf(fmt, sizeof(fmt), "[%d] %s", cThread::ThreadId(), message); + } + va_start(ap,message); + vsyslog ( errLevel, fmt, ap ); + va_end(ap); +} + +#define LogI(a, b...) void( CheckLevel(a) ? LogVsyslog ( LOG_INFO, __LINE__, __FUNCTION__, b ) : void() ) +#define LogE(a, b...) void( CheckLevel(a) ? LogVsyslog ( LOG_ERR, __LINE__, __FUNCTION__, b ) : void() ) +#define LogD(a, b...) void( CheckLevel(a) ? LogVsyslog ( LOG_DEBUG, __LINE__, __FUNCTION__, b ) : void() ) +//#define LogE(a, b...) void( CheckLevel(a) ? esyslog ( b ) : void() ) +//#define LogD(a, b...) void( CheckLevel(a) ? dsyslog ( b ) : void() ) +#define prep(s) PrepareLog(s) +#define prep2(s) s + +//void LogF(int level, const char * message, ...) __attribute__ ((format (printf,2,3))); + +//void LogF(int level, const char * message, ...) +//{ +// if (CheckLevel(level)) { +// va_list ap; +// va_start(ap,message); +// vsyslog (LOG_ERR, PrepareLog(message), ap ); +// va_end(ap); +// } +//} + +#define Asprintf(a, b, c...) void( asprintf(a, b, c) < 0 ? esyslog("memory allocation error - %s", b) : void() ) + +// --- CRC16 ------------------------------------------------------------------- + +#define POLY 0xA001 // CRC16 + +unsigned int crc16 (unsigned int crc, unsigned char const *p, int len) +{ + while (len--) { + crc ^= *p++; + for (int i = 0; i < 8; i++) + crc = (crc & 1) ? (crc >> 1) ^ POLY : (crc >> 1); + } + return crc & 0xFFFF; +} + +// --- cFilterEEPG ------------------------------------------------------ + +#define STARTTIME_BIAS (20*60) + +static int AvailableSources[32]; +static int NumberOfAvailableSources = 0; +static int LastVersionNagra = -1; //currently only used for Nagra, should be stored per transponder, per system + +#ifdef USE_NOEPG +bool allowedEPG (tChannelID kanalID) +{ + bool rc; + + if (Setup.noEPGMode == 1) { + rc = false; + if (strstr (::Setup.noEPGList, kanalID.ToString ()) != NULL) + rc = true; + } else { + rc = true; + if (strstr (::Setup.noEPGList, kanalID.ToString ()) != NULL) + rc = false; + } + + return rc; +} +#endif /* NOEPG */ + + +class cFilterEEPG:public cFilter +{ +private: + int pmtpid, pmtsid, pmtidx, pmtnext; + int UnprocessedFormat[HIGHEST_FORMAT + 1]; //stores the pid when a format is detected on this transponder, and that are not processed yet + int nEquivChannels, nChannels, nThemes, nTitles, nSummaries, NumberOfTables, Version; + int TitleCounter, SummaryCounter, NoSummaryCounter, RejectTableId; + bool EndChannels, EndThemes; //only used for ?? + int MHWStartTime; //only used for MHW1 + bool ChannelsOk; + //int Format; //the format that this filter currently is processing + std::map < int, int >ChannelSeq; // ChannelSeq[ChannelId] returns the recordnumber of the channel + + Summary_t *Summaries[MAX_TITLES]; + Title_t *Titles[MAX_TITLES]; + sChannel sChannels[MAX_CHANNELS]; + unsigned char Themes[MAX_THEMES][64]; + + std::map < unsigned short int, unsigned char *>buffer; //buffer[Table_Extension_Id] returns the pointer to the buffer for this TEI + std::map < unsigned short int, int >bufsize; //bufsize[Table_Extension_Id] returns the buffersize of the buffer for this TEI + unsigned short int NagraTIE[64]; //at this moment a max of 31 table_ids could be used, so 64 should be enough ....stores the Table_Extension_Id's of summaries received, so they can be processed. Processing while receiving somehow drops sections, the 0x0000 marker will be missed ... + unsigned short int NagraCounter; + + unsigned char InitialChannel[8]; + unsigned char InitialTitle[64]; + unsigned char InitialSummary[64]; + + void NextPmt (void); + void ProccessContinuous(u_short Pid, u_char Tid, int Length, const u_char *Data); +protected: + virtual void Process (u_short Pid, u_char Tid, const u_char * Data, int Length); + virtual void AddFilter (u_short Pid, u_char Tid); + virtual void AddFilter (u_short Pid, u_char Tid, unsigned char Mask); + virtual void ProcessNextFormat (bool FirstTime); + virtual int GetChannelsSKYBOX (const u_char * Data, int Length); + virtual bool GetThemesSKYBOX (void); + virtual bool ReadFileDictionary (void); //Reads Huffman tables for SKY + virtual int GetTitlesSKYBOX (const u_char * Data, int Length); + virtual int GetSummariesSKYBOX (const u_char * Data, int Length); + virtual int GetChannelsMHW (const u_char * Data, int Length, int MHW); //TODO replace MHW by Format? + virtual int GetThemesMHW1 (const u_char * Data, int Length); + virtual int GetNagra (const u_char * Data, int Length); + virtual void ProcessNagra (void); + virtual void GetTitlesNagra (const u_char * Data, int Length, unsigned short TableIdExtension); + virtual char *GetSummaryTextNagra (const u_char * DataStart, long int Offset, unsigned int EventId); + virtual int GetChannelsNagra (const u_char * Data, int Length); + virtual int GetThemesNagra (const u_char * Data, int Length, unsigned short TableIdExtension); + virtual int GetTitlesMHW1 (const u_char * Data, int Length); + virtual int GetSummariesMHW1 (const u_char * Data, int Length); + virtual int GetThemesMHW2 (const u_char * Data, int Length); + virtual int GetTitlesMHW2 (const u_char * Data, int Length); + virtual int GetSummariesMHW2 (const u_char * Data, int Length); + virtual void FreeSummaries (void); + virtual void FreeTitles (void); + virtual void PrepareToWriteToSchedule (sChannel * C, cSchedules * s, cSchedule * ps[MAX_EQUIVALENCES]); //gets a channel and returns an array of schedules that WriteToSchedule can write to. Call this routine before a batch of titles with the same ChannelId will be WriteToScheduled; batchsize can be 1 + virtual void FinishWriteToSchedule (sChannel * C, cSchedules * s, cSchedule * ps[MAX_EQUIVALENCES]); + virtual void WriteToSchedule (cSchedule * ps[MAX_EQUIVALENCES], unsigned short int NumberOfEquivalences, + unsigned int EventId, unsigned int StartTime, unsigned int Duration, char *Text, + char *SummText, unsigned short int ThemeId, unsigned short int TableId, + unsigned short int Version, char Rating = 0x00); + virtual void LoadIntoSchedule (void); + virtual void LoadEquivalentChannels (void); +public: + cFilterEEPG (void); + virtual void SetStatus (bool On); + void Trigger (void); +}; + +cFilterEEPG::cFilterEEPG (void) +{ + Trigger (); + //Set (0x00, 0x00); +} + +void cFilterEEPG::Trigger (void) +{ + LogI(3, prep("trigger\n")); + pmtpid = 0; + pmtidx = 0; + pmtnext = 0; +} + +void cFilterEEPG::SetStatus (bool On) +{ + LogI(0, prep("setstatus %d\n"), On); + if (!On) { + FreeSummaries (); + FreeTitles (); + //Format = 0; + ChannelsOk = false; + NumberOfTables = 0; + } else { + //Set(0x00,0x00); + for (int i = 0; i <= HIGHEST_FORMAT; i++) + UnprocessedFormat[i] = 0; //pid 0 is assumed to be nonvalid for EEPG transfers + AddFilter (0, 0); + } + cFilter::SetStatus (On); + Trigger (); +} + +void cFilterEEPG::NextPmt (void) +{ + Del (pmtpid, 0x02); + pmtpid = 0; + pmtidx++; + LogE(3, prep("PMT next\n")); +} + + + +// ------------------- Freesat ------------------- + +/* FreeSat Huffman decoder for VDR + * + * Insert GPL licence + */ + +/* The following features can be controlled: + * + * FREEVIEW_NO_SYSLOG - Disable use of isyslog + */ + +#ifndef FREEVIEW_NO_SYSLOG +#include <vdr/tools.h> +/* Logging via vdr */ +#ifndef isyslog +#define isyslog(a...) void( (SysLogLevel > 1) ? syslog_with_tid(LOG_INFO, a) : void() ) +#endif +void syslog_with_tid (int priority, const char *format, ...) __attribute__ ((format (printf, 2, 3))); +#else +#define isyslog(a...) fprintf(stderr,a) +#endif + + + +struct hufftab { + unsigned int value; + short bits; + char next; +}; + +#define START '\0' +#define STOP '\0' +#define ESCAPE '\1' + + +int freesat_decode_error = 0; /* If set an error has occurred during decoding */ + +static struct hufftab *tables[2][256]; +static int table_size[2][256]; + +/** \brief Convert a textual character description into a value + * + * \param str - Encoded (in someway) string + * + * \return Raw character + */ +static unsigned char resolve_char (char *str) +{ + int val; + if (strcmp (str, "ESCAPE") == 0) { + return ESCAPE; + } else if (strcmp (str, "STOP") == 0) { + return STOP; + } else if (strcmp (str, "START") == 0) { + return START; + } else if (sscanf (str, "0x%02x", &val) == 1) { + return val; + } + return str[0]; + + +} + + +/** \brief Decode a binary string into a value + * + * \param binary - Binary string to decode + * + * \return Decoded value + */ +static unsigned long decode_binary (char *binary) +{ + unsigned long mask = 0x80000000; + unsigned long maskval = 0; + unsigned long val = 0; + size_t i; + + for (i = 0; i < strlen (binary); i++) { + if (binary[i] == '1') { + val |= mask; + } + maskval |= mask; + mask >>= 1; + } + return val; +} + +/** \brief Load an individual freesat data file + * + * \param tableid - Table id that should be loaded + * \param filename - Filename to load + */ +static void load_file (int tableid, const char *filename) +{ + char buf[1024]; + char *from, *to, *binary; + FILE *fp; + + tableid--; + if ((fp = fopen (filename, "r")) != NULL) { + LogI(0, prep("Loading table %d Filename <%s>"), tableid + 1, filename); + + while (fgets (buf, sizeof (buf), fp) != NULL) { + from = binary = to = NULL; + int elems = sscanf (buf, "%a[^:]:%a[^:]:%a[^:]:", &from, &binary, &to); + if (elems == 3) { + int bin_len = strlen (binary); + int from_char = resolve_char (from); + char to_char = resolve_char (to); + unsigned long bin = decode_binary (binary); + int i = table_size[tableid][from_char]++; + + tables[tableid][from_char] = + (struct hufftab *) realloc (tables[tableid][from_char], (i + 1) * sizeof (tables[tableid][from_char][0])); + tables[tableid][from_char][i].value = bin; + tables[tableid][from_char][i].next = to_char; + tables[tableid][from_char][i].bits = bin_len; + free (from); + free (to); + free (binary); + } + } + fclose (fp); + } else { + LogE(0, prep("Cannot load <%s> for table %d"), filename, tableid + 1); + } +} + + +/** \brief Decode an EPG string as necessary + * + * \param src - Possibly encoded string + * \param size - Size of the buffer + * + * \retval NULL - Can't decode + * \return A decoded string + */ +char *freesat_huffman_decode (const unsigned char *src, size_t size) +{ + int tableid; + freesat_decode_error = 0; + + if (src[0] == 0x1f && (src[1] == 1 || src[1] == 2)) { + int uncompressed_len = 30; + char *uncompressed = (char *) calloc (1, uncompressed_len + 1); + unsigned value = 0, byte = 2, bit = 0; + int p = 0; + int lastch = START; + + tableid = src[1] - 1; + while (byte < 6 && byte < size) { + value |= src[byte] << ((5 - byte) * 8); + byte++; + } + //freesat_table_load (); /**< Load the tables as necessary */ + + do { + int found = 0; + unsigned bitShift = 0; + if (lastch == ESCAPE) { + char nextCh = (value >> 24) & 0xff; + found = 1; + // Encoded in the next 8 bits. + // Terminated by the first ASCII character. + bitShift = 8; + if ((nextCh & 0x80) == 0) + lastch = nextCh; + if (p >= uncompressed_len) { + uncompressed_len += 10; + uncompressed = (char *) realloc (uncompressed, uncompressed_len + 1); + } + uncompressed[p++] = nextCh; + uncompressed[p] = 0; + } else { + int j; + for (j = 0; j < table_size[tableid][lastch]; j++) { + unsigned mask = 0, maskbit = 0x80000000; + short kk; + for (kk = 0; kk < tables[tableid][lastch][j].bits; kk++) { + mask |= maskbit; + maskbit >>= 1; + } + if ((value & mask) == tables[tableid][lastch][j].value) { + char nextCh = tables[tableid][lastch][j].next; + bitShift = tables[tableid][lastch][j].bits; + if (nextCh != STOP && nextCh != ESCAPE) { + if (p >= uncompressed_len) { + uncompressed_len += 10; + uncompressed = (char *) realloc (uncompressed, uncompressed_len + 1); + } + uncompressed[p++] = nextCh; + uncompressed[p] = 0; + } + found = 1; + lastch = nextCh; + break; + } + } + } + if (found) { + // Shift up by the number of bits. + unsigned b; + for (b = 0; b < bitShift; b++) { + value = (value << 1) & 0xfffffffe; + if (byte < size) + value |= (src[byte] >> (7 - bit)) & 1; + if (bit == 7) { + bit = 0; + byte++; + } else + bit++; + } + } else { + LogE (0, prep("Missing table %d entry: <%s>"), tableid + 1, uncompressed); + // Entry missing in table. + return uncompressed; + } + } while (lastch != STOP && value != 0); + + return uncompressed; + } + return NULL; +} + +//here all declarations for global variables over all devices + +char *ConfDir; + +sNodeH *nH, H; + +//unsigned char DecodeErrorText[4096]; //TODO only used for debugging? + +int Yesterday; +int YesterdayEpoch; +int YesterdayEpochUTC; + +/* + * Convert local time to UTC + */ +time_t LocalTime2UTC (time_t t) +{ + struct tm *temp; + + temp = gmtime (&t); + temp->tm_isdst = -1; + return mktime (temp); +} + +/* + * Convert UTC to local time + */ +time_t UTC2LocalTime (time_t t) +{ + return 2 * t - LocalTime2UTC (t); +} + +void GetLocalTimeOffset (void) +{ + time_t timeLocal; + struct tm *tmCurrent; + + timeLocal = time (NULL); + timeLocal -= 86400; + tmCurrent = gmtime (&timeLocal); + Yesterday = tmCurrent->tm_wday; + tmCurrent->tm_hour = 0; + tmCurrent->tm_min = 0; + tmCurrent->tm_sec = 0; + tmCurrent->tm_isdst = -1; + YesterdayEpoch = mktime (tmCurrent); + YesterdayEpochUTC = UTC2LocalTime (mktime (tmCurrent)); +} + +void CleanString (unsigned char *String) +{ + +// LogD (1, prep("Unclean: %s"), String); + unsigned char *Src; + unsigned char *Dst; + int Spaces; + int pC; + Src = String; + Dst = String; + Spaces = 0; + pC = 0; + while (*Src) { + // corrections + if (*Src == 0x8c) { // iso-8859-2 LATIN CAPITAL LETTER S WITH ACUTE + *Src = 0xa6; + } + if (*Src == 0x8f) { // iso-8859-2 LATIN CAPITAL LETTER Z WITH ACUTE + *Src = 0xac; + } + + if (*Src!=0x0A && *Src < 0x20) { //don't remove newline + *Src = 0x20; + } + if (*Src == 0x20) { + Spaces++; + if (pC == 0) { + Spaces++; + } + } else { + Spaces = 0; + } + if (Spaces < 2) { + *Dst = *Src; + Dst++; + pC++; + } + Src++; + } + if (Spaces > 0) { + Dst--; + *Dst = 0; + } else { + *Dst = 0; + } +// LogD (1, prep("Clean: %s"), String); +} + +cChannel *GetChannelByID(tChannelID & channelID, bool searchOtherPos) +{ + cChannel *VC = Channels.GetByChannelID(channelID, true); + if(!VC && searchOtherPos){ + //look on other satpositions + for(int i = 0;i < NumberOfAvailableSources;i++){ + channelID = tChannelID(AvailableSources[i], channelID.Nid(), channelID.Tid(), channelID.Sid()); + VC = Channels.GetByChannelID(channelID, true); + if(VC){ + //found this actually on satellite nextdoor... + break; + } + } + } + + return VC; +} + +bool cFilterEEPG::GetThemesSKYBOX (void) //TODO can't we read this from the DVB stream? +{ + string FileName = ConfDir; + FILE *FileThemes; + char *Line; + char Buffer[256]; + if (Format == SKY_IT) + FileName += "/sky_it.themes"; + else if (Format == SKY_UK) + FileName += "/sky_uk.themes"; + else { + LogE (0, prep("Error, wrong format detected in GetThemesSKYBOX. Format = %i."), Format); + return false; + } + //asprintf( &FileName, "%s/%s", ConfDir, ( lProviders + CurrentProvider )->Parm3 ); + FileThemes = fopen (FileName.c_str(), "r"); + if (FileThemes == NULL) { + LogE (0, prep("Error opening file '%s'. %s"), FileName.c_str(), strerror (errno)); + return false; + } else { + //int id = 0; + nThemes = 0; + char string1[256]; + char string2[256]; + //sTheme *T; + while ((Line = fgets (Buffer, sizeof (Buffer), FileThemes)) != NULL) { + memset (string1, 0, sizeof (string1)); + memset (string2, 0, sizeof (string2)); + if (!isempty (Line)) { + //T = &Themes[nThemes]; + if (sscanf (Line, "%[^=] =%[^\n] ", string1, string2) == 2) { + snprintf ((char *) Themes[nThemes], 255, "%s", string2); + } else { + Themes[nThemes][0] = '\0'; + } + //id ++; + nThemes++; + } + } + fclose (FileThemes); + } + return true; +} + +bool cFilterEEPG::ReadFileDictionary (void) +{ + string FileName = ConfDir; + FILE *FileDict; + char *Line; + char Buffer[256]; + switch (Format) { + case SKY_IT: + FileName += "/sky_it.dict"; + break; + case SKY_UK: + FileName += "/sky_uk.dict"; + break; + case FREEVIEW: + FileName += "/freesat.t1"; + load_file (1, FileName.c_str()); + FileName = ConfDir; + FileName += "/freesat.t2"; + load_file (2, FileName.c_str()); + break; + default: + LogE (0 ,prep("Error, wrong format detected in ReadFileDictionary. Format = %i."), Format); + return false; + } + if ((Format == SKY_IT) || (Format == SKY_UK)) { //SKY + FileDict = fopen (FileName.c_str(), "r"); + if (FileDict == NULL) { + LogE (0, prep("Error opening file '%s'. %s"), FileName.c_str(), strerror (errno)); + return false; + } else { + int i; + int LenPrefix; + char string1[256]; + char string2[256]; + H.Value = NULL; + H.P0 = NULL; + H.P1 = NULL; + while ((Line = fgets (Buffer, sizeof (Buffer), FileDict)) != NULL) { + if (!isempty (Line)) { + memset (string1, 0, sizeof (string1)); + memset (string2, 0, sizeof (string2)); + if (sscanf (Line, "%c=%[^\n]\n", string1, string2) == 2 + || (sscanf (Line, "%[^=]=%[^\n]\n", string1, string2) == 2)) { + nH = &H; + LenPrefix = strlen (string2); + for (i = 0; i < LenPrefix; i++) { + switch (string2[i]) { + case '0': + if (nH->P0 == NULL) { + nH->P0 = new sNodeH (); + nH = nH->P0; + nH->Value = NULL; + nH->P0 = NULL; + nH->P1 = NULL; + if ((LenPrefix - 1) == i) { + Asprintf (&nH->Value, "%s", string1); + } + } else { + nH = nH->P0; + if (nH->Value != NULL || (LenPrefix - 1) == i) { + LogE (0 ,prep("Error, huffman prefix code already exists for \"%s\"=%s with '%s'"), string1, + string2, nH->Value); + } + } + break; + case '1': + if (nH->P1 == NULL) { + nH->P1 = new sNodeH (); + nH = nH->P1; + nH->Value = NULL; + nH->P0 = NULL; + nH->P1 = NULL; + if ((LenPrefix - 1) == i) { + Asprintf (&nH->Value, "%s", string1); + } + } else { + nH = nH->P1; + if (nH->Value != NULL || (LenPrefix - 1) == i) { + LogE (0, prep("Error, huffman prefix code already exists for \"%s\"=%s with '%s'"), string1, + string2, nH->Value); + } + } + break; + default: + break; + } + } + } + } + } + fclose (FileDict); + } + + // check tree huffman nodes + FileDict = fopen (FileName.c_str(), "r"); + if (FileDict) { + int i; + int LenPrefix; + char string1[256]; + char string2[256]; + while ((Line = fgets (Buffer, sizeof (Buffer), FileDict)) != NULL) { + if (!isempty (Line)) { + memset (string1, 0, sizeof (string1)); + memset (string2, 0, sizeof (string2)); + if (sscanf (Line, "%c=%[^\n]\n", string1, string2) == 2 + || (sscanf (Line, "%[^=]=%[^\n]\n", string1, string2) == 2)) { + nH = &H; + LenPrefix = strlen (string2); + for (i = 0; i < LenPrefix; i++) { + switch (string2[i]) { + case '0': + if (nH->P0 != NULL) { + nH = nH->P0; + } + break; + case '1': + if (nH->P1 != NULL) { + nH = nH->P1; + } + break; + default: + break; + } + } + if (nH->Value != NULL) { + if (memcmp (nH->Value, string1, strlen (nH->Value)) != 0) { + LogE (0, prep("Error, huffman prefix value '%s' not equal to '%s'"), nH->Value, string1); + } + } else { + LogE (0, prep("Error, huffman prefix value is not exists for \"%s\"=%s"), string1, string2); + } + } + } + } + fclose (FileDict); + } + } //if Format == 3 || Format == 4 + return true; +} + +int DecodeHuffmanCode (const u_char * Data, int Length, unsigned char *DecodeText) +{ + int i; + int p; + int q; + bool CodeError; + bool IsFound; + unsigned char Byte; + unsigned char lastByte; + unsigned char Mask; + unsigned char lastMask; + nH = &H; + p = 0; + q = 0; + DecodeText[0] = '\0'; + //DecodeErrorText[0] = '\0'; + CodeError = false; + IsFound = false; + lastByte = 0; + lastMask = 0; + for (i = 0; i < Length; i++) { + Byte = Data[i]; + Mask = 0x80; + if (i == 0) { + Mask = 0x20; + lastByte = i; + lastMask = Mask; + } +loop1: + if (IsFound) { + lastByte = i; + lastMask = Mask; + IsFound = false; + } + if ((Byte & Mask) == 0) { + if (CodeError) { + //DecodeErrorText[q] = 0x30; + q++; + goto nextloop1; + } + if (nH->P0 != NULL) { + nH = nH->P0; + if (nH->Value != NULL) { + memcpy (&DecodeText[p], nH->Value, strlen (nH->Value)); + p += strlen (nH->Value); + nH = &H; + IsFound = true; + } + } else { + memcpy (&DecodeText[p], "<...?...>", 9); + p += 9; + i = lastByte; + Byte = Data[lastByte]; + Mask = lastMask; + CodeError = true; + goto loop1; + } + } else { + if (CodeError) { + //DecodeErrorText[q] = 0x31; + q++; + goto nextloop1; + } + if (nH->P1 != NULL) { + nH = nH->P1; + if (nH->Value != NULL) { + memcpy (&DecodeText[p], nH->Value, strlen (nH->Value)); + p += strlen (nH->Value); + nH = &H; + IsFound = true; + } + } else { + memcpy (&DecodeText[p], "<...?...>", 9); + p += 9; + i = lastByte; + Byte = Data[lastByte]; + Mask = lastMask; + CodeError = true; + goto loop1; + } + } +nextloop1: + Mask = Mask >> 1; + if (Mask > 0) { + goto loop1; + } + } + DecodeText[p] = '\0'; + //DecodeErrorText[q] = '\0'; + return p; +} + +void decodeText2 (const unsigned char *from, int len, char *buffer, int buffsize) +{ + if (from[0] == 0x1f) { + char *temp = freesat_huffman_decode (from, len); + if (temp) { + len = strlen (temp); + len = len < buffsize - 1 ? len : buffsize - 1; + strncpy (buffer, temp, len); + buffer[len] = 0; + free (temp); + return; + } + } + + SI::String convStr; + SI::CharArray charArray; + charArray.assign(from, len); + convStr.setData(charArray, len); + //LogE(5, prep("decodeText2 from %s - length %d"), from, len); + convStr.getText(buffer, buffsize); + //LogE(5, prep("decodeText2 buffer %s - buffsize %d"), buffer, buffsize); +} + +void cFilterEEPG::LoadEquivalentChannels (void) +{ + char Buffer[1024]; + char *Line; + FILE *File; + string FileName = string(ConfDir) + "/" + EEPG_FILE_EQUIV; + + File = fopen (FileName.c_str(), "r"); + if (File) { + memset (Buffer, 0, sizeof (Buffer)); + char string1[256]; + char string2[256]; + char string3[256]; + int int1; + int int2; + int int3; + int int4; + while ((Line = fgets (Buffer, sizeof (Buffer), File)) != NULL) { + Line = compactspace (skipspace (stripspace (Line))); + if (!isempty (Line)) { + if (sscanf (Line, "%[^ ] %[^ ] %[^\n]\n", string1, string2, string3) == 3) { + if (string1[0] != '#' && string1[0] != ';') { + int1 = 0; //TODO: this could be made more readable + int2 = 0; + int3 = 0; + int4 = 0; + if (sscanf (string1, "%[^-]-%i -%i -%i ", string3, &int1, &int2, &int3) == 4) + if (sscanf (string2, "%[^-]-%i -%i -%i ", string3, &int1, &int2, &int3) == 4) { + if (sscanf (string1, "%[^-]-%i -%i -%i -%i ", string3, &int1, &int2, &int3, &int4) != 5) { + int4 = 0; + } + tChannelID OriginalChID = tChannelID (cSource::FromString (string3), int1, int2, int3, int4); + bool found = false; + int i = 0; + sChannel *C = NULL; + while (i < nChannels && (!found)) { + C = &sChannels[i]; + if (C->Src[0] == (unsigned int)cSource::FromString (string3) && C->Nid[0] == int1 + && C->Tid[0] == int2 && C->Sid[0] == int3) + found = true; + else + i++; + } + if (!found) { + LogI(2, prep("Warning: in equivalence file, cannot find original channel %s. Perhaps you are tuned to another transponder right now."), + string1); + } else { + cChannel *OriginalChannel = Channels.GetByChannelID (OriginalChID, false); + if (!OriginalChannel) + LogI(2, prep("Warning, not found epg channel \'%s\' in channels.conf. Equivalency is assumed to be valid, but perhaps you should check the entry in the equivalents file"), string1); //TODO: skip this ing? + if (sscanf (string2, "%[^-]-%i -%i -%i ", string3, &int1, &int2, &int3) == 4) { + if (sscanf (string2, "%[^-]-%i -%i -%i -%i ", string3, &int1, &int2, &int3, &int4) + != 5) { + int4 = 0; + } + tChannelID EquivChID = tChannelID (cSource::FromString (string3), int1, int2, int3, int4); + cChannel *EquivChannel = Channels.GetByChannelID (EquivChID, false); //TODO use valid function? + if (EquivChannel) { + if (C->NumberOfEquivalences < MAX_EQUIVALENCES) { + C->Src[C->NumberOfEquivalences] = EquivChannel->Source (); + C->Nid[C->NumberOfEquivalences] = EquivChannel->Nid (); + C->Tid[C->NumberOfEquivalences] = EquivChannel->Tid (); + C->Sid[C->NumberOfEquivalences] = EquivChannel->Sid (); + C->NumberOfEquivalences++; + nEquivChannels++; + LogI(3, prep("Added equivalent nr %i with Channel Id %s-%i-%i-%i to channel with id %i."), + C->NumberOfEquivalences, *cSource::ToString (C->Src[C->NumberOfEquivalences - 1]), + C->Nid[C->NumberOfEquivalences - 1], C->Tid[C->NumberOfEquivalences - 1], + C->Sid[C->NumberOfEquivalences - 1], i); + } else + LogE(0, prep("Error, channel with id %i has more than %i equivalences. Increase MAX_EQUIVALENCES."), + i, MAX_EQUIVALENCES); + } else + LogI(0, prep("Warning, not found equivalent channel \'%s\' in channels.conf"), string2); + } + } //else !found + } //if scanf string1 + } //if string1 + } //if scanf + } //if isempty + } //while + fclose (File); + } //if file +} //end of loadequiv + +/** + * \brief Get MHW channels + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetChannelsMHW (const u_char * Data, int Length, int MHW) +{ + if ((MHW == 1) || (nChannels == 0)) { //prevents MHW2 from reading channels twice while waiting for themes on same filter + sChannelMHW1 *Channel; + int Size, Off; + Size = sizeof (sChannelMHW1); + Off = 4; + if (MHW == 1) { + //Channel = (sChannelMHW1 *) (Data + 4); + nChannels = (Length - Off) / sizeof (sChannelMHW1); + } + if (MHW == 2) { + if (Length > 120) + nChannels = Data[120]; + else { + LogE(0, prep("Error, channels packet too short for MHW2.")); + return 0; + } + int pName = ((nChannels * 8) + 121); + if (Length > pName) { + //Channel = (sChannelMHW1 *) (Data + 120); + Size -= 14; //MHW2 is 14 bytes shorter + Off = 121; //and offset differs + } else { + LogE(0, prep("Error, channels length does not match pname.")); + return 0; + } + } + + if (nChannels > MAX_CHANNELS) { + LogE(0, prep("EEPG: Error, %i channels found more than %i"), nChannels, MAX_CHANNELS); + return 0; + } else { + LogI(1, "| ID | %-26.26s | %-22.22s | FND | %-8.8s |\n", "Channel ID", "Channel Name", "Sky Num."); + LogI(1, "|------|-%-26.26s-|-%-22.22s-|-----|-%-8.8s-|\n", "------------------------------", + "-----------------------------", "--------------------"); + int pName = ((nChannels * 8) + 121); //TODO double ... + for (int i = 0; i < nChannels; i++) { + Channel = (sChannelMHW1 *) (Data + Off); + sChannel *C = &sChannels[i]; + C->ChannelId = i; + ChannelSeq[C->ChannelId] = i; //fill lookup table to go from channel-id to sequence nr in table + C->SkyNumber = 0; + if (MHW == 1) + memcpy (C->Name, &Channel->Name, 16); //MHW1 + else { //MHW2 + int lenName = Data[pName] & 0x0f; + //LogD (1, prep("EEPGDebug: MHW2 lenName:%d"), lenName); + decodeText2(&Data[pName+1],lenName,(char*)C->Name,256); + //memcpy (C->Name, &Data[pName + 1], lenName); + //else + //memcpy (C->Name, &Data[pName + 1], 256); + pName += (lenName + 1); + } + C->NumberOfEquivalences = 1; //there is always an original channel. every equivalence adds 1 + C->Src[0] = Source (); //assume all EPG channels are on same satellite, if not, manage this via equivalents!!! + C->Nid[0] = HILO16 (Channel->NetworkId); + C->Tid[0] = HILO16 (Channel->TransportId); + C->Sid[0] = HILO16 (Channel->ServiceId); + tChannelID channelID = tChannelID (C->Src[0], C->Nid[0], C->Tid[0], C->Sid[0]); + cChannel *VC = GetChannelByID(channelID, true); + bool IsFound = (VC); + if(IsFound) { + C->Src[0] = VC->Source(); + } + CleanString (C->Name); + + LogI(1, "|% 5d | %-26.26s | %-22.22s | %-3.3s | % 6d |\n", C->ChannelId + , *tChannelID (C->Src[0], C->Nid[0], C->Tid[0], C->Sid[0]).ToString() + , C->Name, IsFound ? "YES" : "NO", C->SkyNumber); + + Off += Size; + } //for loop + } //else nChannels > MAX_CHANNELS + LoadEquivalentChannels (); + GetLocalTimeOffset (); //reread timing variables, only used for MHW + return 2; //obviously, when you get here, channels are read succesfully, but since all channels are sent at once, you can stop now + } //if nChannels == 0 + LogE (0, prep("Warning: Trying to read Channels more than once!")); +//you will only get here when GetChannelsMHW is called, and nChannels !=0, e.g. when multiple citpids cause channels to be read multiple times. Second time, do nothing, give error so that the rest of the chain is not restarted also. + return 0; +} + +/** + * \brief Get MHW1 Themes + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetThemesMHW1 (const u_char * Data, int Length) +{ //MHW1 Themes + if (Length > 19) { + sThemeMHW1 *Theme = (sThemeMHW1 *) (Data + 19); + nThemes = (Length - 19) / 15; + if (nThemes > MAX_THEMES) { + LogE(1, prep("Error, %i themes found more than %i"), nThemes, MAX_THEMES); + return 0; + } else { + LogI(1, "-------------THEMES FOUND--------------"); + int ThemeId = 0; + int Offset = 0; + const u_char *ThemesIndex = (Data + 3); + for (int i = 0; i < nThemes; i++) { + if (ThemesIndex[ThemeId] == i) { + Offset = (Offset + 15) & 0xf0; //TODO do not understand this + ThemeId++; + } + memcpy (&Themes[Offset][0], &Theme->Name, 15); + Themes[Offset][15] = '\0'; //trailing null + CleanString (Themes[Offset]); + LogI(1, prep("%.15s"), Themes[Offset]); + Offset++; + Theme++; + } + if ((nThemes * 15) + 19 != Length) { + LogE(0, "Themes error: buffer is smaller or bigger than sum of entries."); + return 0; + } else + return 2; + } + } + return 1; +} + +/** + * \brief Get MHW2 Themes + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetThemesMHW2 (const u_char * Data, int Length) +{ + if (!EndThemes) { //only process if not processed + int p1; + int p2; + int pThemeName = 0; + int pSubThemeName = 0; + int lenThemeName = 0; + int lenSubThemeName = 0; + int pThemeId = 0; + if (Length > 4) { + LogI(1, "-------------THEMES FOUND--------------"); + for (int i = 0; i < Data[4]; i++) { + p1 = ((Data[5 + i * 2] << 8) | Data[6 + i * 2]) + 3; + if (Length > p1) { + for (int ii = 0; ii <= (Data[p1] & 0x3f); ii++) { + p2 = ((Data[p1 + 1 + ii * 2] << 8) | Data[p1 + 2 + ii * 2]) + 3; + if (Length > p2) { + if (ii == 0) { + pThemeName = p2 + 1; + lenThemeName = Data[p2] & 0x1f; + lenSubThemeName = 0; + } else { + pSubThemeName = p2 + 1; + lenSubThemeName = Data[p2] & 0x1f; + } + if (Length >= (pThemeName + lenThemeName)) { + pThemeId = ((i & 0x3f) << 6) | (ii & 0x3f); + if (pThemeId > MAX_THEMES) { + LogE(1, prep("Error, something wrong with themes id calculation MaxThemes: %i pThemeID:%d"), MAX_THEMES, pThemeId); + return 0; //fatal error + } + if ((lenThemeName + 2) < 256) { + decodeText2(&Data[pThemeName],lenThemeName,(char*)Themes[pThemeId],256); + //memcpy (Themes[pThemeId], &Data[pThemeName], lenThemeName); + if (Length >= (pSubThemeName + lenSubThemeName)) + if (lenSubThemeName > 0) + if ((lenThemeName + lenSubThemeName + 2) < 256) { + Themes[pThemeId][lenThemeName] = ' '; + decodeText2(&Data[pSubThemeName],lenSubThemeName,(char*)&Themes[pThemeId][lenThemeName + 1],256); + //memcpy (&Themes[pThemeId][lenThemeName + 1], &Data[pSubThemeName], lenSubThemeName); + } + CleanString (Themes[pThemeId]); + LogI(1, prep("%.*s"), lenThemeName + 1 + lenSubThemeName, Themes[pThemeId]); + //isyslog ("%.15s", (lThemes + pThemeId)->Name); + nThemes++; + if (nThemes > MAX_THEMES) { + LogE(1, prep("Error, %i themes found more than %i"), nThemes, MAX_THEMES); + return 0; //fatal error + } + } + } else + return 1; //I assume non fatal error or success + } else + return 1; //I assume non fatal error or success + } + } else + return 1; //I assume non fatal error or success + } //for loop + //Del (Pid, Tid); + EndThemes = true; + return 2; //all themes read + } //if length + } //if !EndThemes + return 1; //non fatal or success +} + +/** + * \brief Get Nagra Summary text + * + * \param TitleEventId EventId passed from title, to check it against the eventId of the summary + * \return pointer to reserved part of memory with summary text in it, terminated by NULL + */ +char *cFilterEEPG::GetSummaryTextNagra (const u_char * DataStart, long int Offset, unsigned int TitleEventId) +//EventId is passed from title, to check it against the eventid of the summary +{ + u_char *p = (u_char *) DataStart + Offset; + sSummaryDataNagraGuide *SD = (sSummaryDataNagraGuide *) p; + + if (TitleEventId != HILO32 (SD->EventId)) { + LogI(0, prep("ERROR, Title has EventId %08x and points to Summary with EventId %08x."), TitleEventId, + HILO32 (SD->EventId)); + return 0; //return empty string + } + + if (CheckLevel(3)) { + if (SD->AlwaysZero1 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero1 is NOT ZERO:%x.", SD->AlwaysZero1); + if (SD->AlwaysZero2 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero2 is NOT ZERO:%x.", SD->AlwaysZero2); + if (SD->AlwaysZero3 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero3 is NOT ZERO:%x.", SD->AlwaysZero3); + if (SD->AlwaysZero4 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero4 is NOT ZERO:%x.", SD->AlwaysZero4); + if (SD->AlwaysZero5 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero5 is NOT ZERO:%x.", SD->AlwaysZero5); + if (SD->AlwaysZero6 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero6 is NOT ZERO:%x.", SD->AlwaysZero6); + if (SD->AlwaysZero7 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero7 is NOT ZERO:%x.", SD->AlwaysZero7); + if (SD->AlwaysZero8 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero8 is NOT ZERO:%x.", SD->AlwaysZero8); + if (SD->AlwaysZero9 != 0) + isyslog ("EEPGDEBUG: SummAlwaysZero9 is NOT ZERO:%x.", SD->AlwaysZero9); + + if (SD->Always1 != 0x31) //1970 + isyslog ("EEPGDEBUG: SummAlways1:%02x.", SD->Always1); + if (SD->Always9 != 0x39) + isyslog ("EEPGDEBUG: SummAlways9:%02x.", SD->Always9); + if (SD->Always7 != 0x37) + isyslog ("EEPGDEBUG: SummAlways7:%02x.", SD->Always7); + if (SD->Always0 != 0x30) + isyslog ("EEPGDEBUG: SummAlways0:%02x.", SD->Always0); + + if (SD->Always0x01 != 0x01) // 0x01 byte + isyslog ("EEPGDEBUG: Summ0x01 byte:%02x.", SD->Always0x01); + } + u_char *p2 = (u_char *) DataStart + HILO32 (SD->SummTxtOffset); + /* esyslog + ("EEPGDEBUG: EventId %08x NumberOfBlocks %02x BlockId %08x SummTxtOffset %08x *p2: %02x Unkn1:%02x, Unkn2:%02x.", + HILO32 (SD->EventId), SD->NumberOfBlocks, HILO32 (SD->BlockId), HILO32 (SD->SummTxtOffset), *p2, SD->Unknown1, + SD->Unknown2); + */ + unsigned char *Text = NULL; //makes first realloc work like malloc + int TotLength = 0; //and also makes empty summaries if *p2 != 0x4e + if (SD->NumberOfBlocks > 1) { + switch (*p2) { + case 0x4e: //valid summary text follows + { + bool LastTextBlock = false; + + do { //for all text parts + sSummaryTextNagraGuide *ST = (sSummaryTextNagraGuide *) p2; + p2 += 8; //skip fixed block + if (ST->AlwaysZero1 != 0) + LogD(3, prep("DEBUG: ST AlwaysZero1 is NOT ZERO:%x."), ST->AlwaysZero1); + if (ST->Always0x4e != 0x4e) { + LogI(0, prep("DEBUG: ST Always0x4e is NOT 0x4e:%x."), ST->AlwaysZero1); + return 0; //fatal error, empty text + } + LogI(5, prep("DEBUG: Textnr %i, Lasttxt %i."), ST->TextNr, ST->LastTextNr); + int SummaryLength = ST->Textlength; + + Text = (unsigned char *) realloc (Text, SummaryLength + TotLength); + if (Text == NULL) { + LogI(0, prep("Summaries memory allocation error.")); + return 0; //empty text + } + memcpy (Text + TotLength, p2, SummaryLength); //append new textpart + TotLength += SummaryLength; + p2 += ST->Textlength; //skip text + + LastTextBlock = ((ST->LastTextNr == 0) || (ST->TextNr >= ST->LastTextNr)); + } while (!LastTextBlock); + Text = (unsigned char *) realloc (Text, 1 + TotLength); //allocate 1 extra byte + Text[TotLength] = '\0'; //terminate string by NULL char + LogD(5, prep("DEBUG: Full Text:%s."), Text); + + break; + } + case 0x8c: //"Geen uitzending" "Geen informatie beschikbaar" e.d. + { + sSummaryGBRNagraGuide *GBR = (sSummaryGBRNagraGuide *) p2; + + p2 += 16; //skip fixed part, point to byte after Nextlength + if (CheckLevel(3)) { + if (GBR->AlwaysZero1 != 0) + isyslog ("EEPGDEBUG: GBR AlwaysZero1 is NOT ZERO:%x.", GBR->AlwaysZero1); + if (GBR->AlwaysZero2 != 0) + isyslog ("EEPGDEBUG: GBR AlwaysZero2 is NOT ZERO:%x.", GBR->AlwaysZero2); + if (GBR->AlwaysZero3 != 0) + isyslog ("EEPGDEBUG: GBR AlwaysZero3 is NOT ZERO:%x.", GBR->AlwaysZero3); + if (GBR->AlwaysZero4 != 0) + isyslog ("EEPGDEBUG: GBR AlwaysZero4 is NOT ZERO:%x.", GBR->AlwaysZero4); + + isyslog ("EEPGDEBUG: Blocklength: %02x Data %02x %02x %02x %02x %02x %02x %02x %02x %02x", GBR->Blocklength, + GBR->Un1, GBR->Un2, GBR->Un3, GBR->Un4, GBR->Un5, GBR->Un6, GBR->Un7, GBR->Un8, GBR->Un9); + for (int i = 0; i < GBR->Nextlength; i += 2) + isyslog ("GBR Extradata %02x %02x.", *(p2 + i), *(p2 + i + 1)); + } + } + break; + default: + LogE(0, prep("ERROR *p2 has strange value: EventId %08x NumberOfBlocks %02x BlockId %08x SummTxtOffset %08x *p2: %02x Unkn1:%02x, Unkn2:%02x."), + HILO32 (SD->EventId), SD->NumberOfBlocks, HILO32 (SD->BlockId), HILO32 (SD->SummTxtOffset), *p2, + SD->Unknown1, SD->Unknown2); + break; + } //end of switch + } //NrOfBlocks > 1 + + if (TotLength == 0) + Text = NULL; + + p += 29; //skip fixed part of block + if (SD->NumberOfBlocks == 1) + p -= 4; //in this case there is NO summarytext AND no GBR??!! + for (int i = 1; i < (SD->NumberOfBlocks - 1); i++) { + LogD(3, prep("DEBUG: Extra Blockinfo: %02x %02x %02x %02x."), *p, *(p + 1), *(p + 2), *(p + 3)); + p += 4; //skip this extra blockinfo + } + return (char *) Text; +} + +void cFilterEEPG::PrepareToWriteToSchedule (sChannel * C, cSchedules * s, cSchedule * ps[MAX_EQUIVALENCES]) //gets a channel and returns an array of schedules that WriteToSchedule can write to. Call this routine before a batch of titles with the same ChannelId will be WriteToScheduled; batchsize can be 1 +{ + for (int eq = 0; eq < C->NumberOfEquivalences; eq++) { + tChannelID channelID = tChannelID (C->Src[eq], C->Nid[eq], C->Tid[eq], C->Sid[eq]); +#ifdef USE_NOEPG + if (allowedEPG (channelID) && (channelID.Valid ())) +#else + if (channelID.Valid ()) //only add channels that are known to vdr +#endif /* NOEPG */ + ps[eq] = s->AddSchedule (channelID); //open a a schedule for each equivalent channel + else { + ps[eq] = NULL; + LogE(5, prep("ERROR: Titleblock has invalid (equivalent) channel ID: Equivalence: %i, Source:%x, C->Nid:%x,C->Tid:%x,C->Sid:%x."), + eq, C->Src[eq], C->Nid[eq], C->Tid[eq], C->Sid[eq]); + } + } +} + +void cFilterEEPG::FinishWriteToSchedule (sChannel * C, cSchedules * s, cSchedule * ps[MAX_EQUIVALENCES]) +{ + for (int eq = 0; eq < C->NumberOfEquivalences; eq++) + if (ps[eq]) { + ps[eq]->Sort (); + s->SetModified (ps[eq]); + } +} + +/** + * \brief write event to schedule + * + * \param Duration the Duration of the event in minutes + * \param ps points to array of schedules ps[eq], where eq is equivalence number of the channel. If channelId is invalid then ps[eq]=NULL + */ +void cFilterEEPG::WriteToSchedule (cSchedule * ps[MAX_EQUIVALENCES], unsigned short int NumberOfEquivalences, unsigned int EventId, unsigned int StartTime, unsigned int Duration, char *Text, char *SummText, unsigned short int ThemeId, unsigned short int TableId, unsigned short int Version, char Rating) +{ + bool WrittenTitle = false; + bool WrittenSummary = false; + for (int eq = 0; eq < NumberOfEquivalences; eq++) { + if (ps[eq]) { + cEvent *Event = NULL; + + Event = (cEvent *) ps[eq]->GetEvent (EventId); //since Nagra uses consistent EventIds, try this first + bool TableIdMatches = false; + if (Event) + TableIdMatches = (Event->TableID() == TableId); + if (!Event || !TableIdMatches || abs(Event->StartTime() - (time_t) StartTime) > Duration * 60) //if EventId does not match, or it matched with wrong TableId, then try with StartTime + Event = (cEvent *) ps[eq]->GetEvent (EventId, StartTime); + + cEvent *newEvent = NULL; + if (!Event) { //event is new + Event = newEvent = new cEvent (EventId); + Event->SetSeen (); + } else if (Event->TableID() < TableId) { //existing table may not be overwritten + RejectTableId++; + //esyslog ("EEPGDEBUG: Rejecting Event, existing TableID:%x, new TableID:%x.", Event->TableID (), + // TableId); + Event = NULL; + } + + if (Event) { + Event->SetEventID (EventId); //otherwise the summary cannot be added later + Event->SetTableID (TableId); //TableID 0 is reserved for external epg, will not be overwritten; the lower the TableID, the more actual it is + Event->SetVersion (Version); //TODO use version and tableID to decide whether to update; TODO add language code + Event->SetStartTime (StartTime); + Event->SetDuration (Duration * 60); + if (Rating) { + Event->SetParentalRating(Rating); + } + char *tmp; + if (Text != 0x00) { + WrittenTitle = true; + CleanString ((uchar *) Text); + Event->SetTitle (Text); + } + Asprintf (&tmp, "%s - %d\'", Themes[ThemeId], Duration); + Event->SetShortText (tmp); + //strreplace(t, '|', '\n'); + if (SummText != 0x00) { + WrittenSummary = true; + CleanString ((uchar *) SummText); + Event->SetDescription (SummText); + } + free (tmp); + if (newEvent) + ps[eq]->AddEvent (newEvent); + //newEvent->FixEpgBugs (); causes segfault + } + /* else + esyslog ("EEPG: ERROR, somehow not able to add/update event.");*///at this moment only reports RejectTableId events + if (CheckLevel(4)) { + isyslog ("EEPG: Title:%i, Summary:%i I would put into schedule:", TitleCounter, SummaryCounter); + //isyslog ("C %s-%i-%i-%i\n", *cSource::ToString (C->Src[eq]), C->Nid[eq], C->Tid[eq], C->Sid[eq]); + isyslog ("E %u %u %u 01 FF\n", EventId, StartTime, Duration * 60); + isyslog ("T %s\n", Text); + isyslog ("S %s - %d\'\n", Themes[ThemeId], Duration); + isyslog ("D %s\n", SummText); + isyslog ("e\nc\n.\n"); + } + } //if ps[eq] + } //for eq + if (WrittenTitle) + TitleCounter++; + if (WrittenSummary) + SummaryCounter++; +} + +/** + * \brief Get Nagra titles + * + * \param TableIdExtension the TIE from the relevant summary sections! + */ +void cFilterEEPG::GetTitlesNagra (const u_char * Data, int Length, unsigned short TableIdExtension) +{ + u_char *p = (u_char *) Data; + u_char *DataEnd = (u_char *) Data + Length; + u_char *next_p; + unsigned short int MonthdayTitles = ((TableIdExtension & 0x1ff) >> 4); //Day is coded in day of the month + time_t timeLocal; + struct tm *tmCurrent; + + timeLocal = time (NULL); + tmCurrent = gmtime (&timeLocal); //gmtime gives UTC; only used for getting current year and current day of the month... + unsigned short int CurrentMonthday = tmCurrent->tm_mday; + unsigned short int CurrentYear = tmCurrent->tm_year; + unsigned short int CurrentMonth = tmCurrent->tm_mon; + //esyslog("EEPGDEBUG: CurrentMonthday=%i, TableIdExtension:%04x, MonthdayTitles=%i.",CurrentMonthday,TableIdExtension, MonthdayTitles); + cSchedulesLock SchedulesLock (true); + cSchedules *s = (cSchedules *) cSchedules::Schedules (SchedulesLock); + do { //process each block of titles + sTitleBlockNagraGuide *TB = (sTitleBlockNagraGuide *) p; + int ChannelId = HILO16 (TB->ChannelId); + int Blocklength = HILO16 (TB->Blocklength); + long int NumberOfTitles = HILO32 (TB->NumberOfTitles); + + LogD(3, prep("DEBUG: ChannelId %04x, Blocklength %04x, NumberOfTitles %lu."), ChannelId, Blocklength, + NumberOfTitles); + p += 4; //skip ChannelId and Blocklength + next_p = p + Blocklength; + if (next_p > DataEnd) { //only process if block is complete + LogE(0, prep("ERROR, Block exceeds end of Data. p:%p, Blocklength:%x,DataEnd:%p."), p, Blocklength, DataEnd); + return; //fatal error, this should never happen + } + p += 4; //skip Titlenumber + + sChannel *C = &sChannels[ChannelSeq[ChannelId]]; //find channel + cSchedule *ps[MAX_EQUIVALENCES]; + PrepareToWriteToSchedule (C, s, ps); + + for (int i = 0; i < NumberOfTitles; i++) { //process each title within block + sTitleNagraGuide *Title = (sTitleNagraGuide *) p; + unsigned int EventId = HILO32 (Title->EventId); + + unsigned int StartTime = Title->StartTimeHigh << 5 | Title->StartTimeLow; + int Hours = (StartTime / 60); + int Minutes = StartTime % 60; + + /*StartTime */ + tmCurrent->tm_year = CurrentYear; + tmCurrent->tm_mon = CurrentMonth; + tmCurrent->tm_mday = MonthdayTitles; + tmCurrent->tm_hour = 0; + tmCurrent->tm_min = StartTime; //if starttime is bigger than 1 hour, mktime will correct this! + tmCurrent->tm_sec = 0; + tmCurrent->tm_isdst = -1; //now correct with daylight savings + if (MonthdayTitles < CurrentMonthday - 7) //the titles that are older than one week are not from the past, but from next month! + //at first this was set at -1 day (= yesterday), but sometimes providers send old data which then + //end up in next months schedule ... + tmCurrent->tm_mon++; //if a year border is passed, mktime will take care of this! + StartTime = UTC2LocalTime (mktime (tmCurrent)); //VDR stores its times in UTC, but wants its input in local time... + + char *Text = NULL; + u_char *t = (u_char *) Data + HILO32 (Title->OffsetToText); + //u_char *t2 = (u_char *) Data + HILO32 (Title->OffsetToText2); + if (t >= DataEnd) + LogE(0, prep("ERROR, Title Text out of range: t:%p, DataEnd:%p, Data:%p, Length:%i."), t, DataEnd, Data, + Length); + else { + Asprintf (&Text, "%.*s", *t, t + 1); //FIXME second text string is not processed right now + //asprintf (&Text, "%.*s %.*s", *t, t + 1, *t2, t2 + 1); + + //now get summary texts + u_char *DataStartSummaries = buffer[TableIdExtension] + 4; + unsigned int DataLengthSummaries = bufsize[TableIdExtension] - 4; + char *SummText = NULL; + if (HILO32 (Title->SumDataOffset) >= DataLengthSummaries) + LogE(0, prep("ERROR, SumDataOffset out of range: Title->SumDataOffset:%i, DataLengthSummaries:%i."), HILO32 (Title->SumDataOffset),DataLengthSummaries); + else + SummText = GetSummaryTextNagra (DataStartSummaries, HILO32 (Title->SumDataOffset), EventId); + + LogD(3, prep("DEBUG: Eventid: %08x ChannelId:%x, Starttime %02i:%02i, Duration %i, OffsetToText:%08x, OffsetToText2:%08x, SumDataOffset:%08x ThemeId:%x Title:%s \n SummaryText:%s"), + EventId, ChannelId, Hours, Minutes, Title->Duration, + HILO32 (Title->OffsetToText), HILO32 (Title->OffsetToText2), + HILO32 (Title->SumDataOffset), Title->ThemeId, Text, SummText); + + if (Themes[Title->ThemeId][0] == 0x00) //if detailed themeid is not known, get global themeid + Title->ThemeId &= 0xf0; + WriteToSchedule (ps, C->NumberOfEquivalences, EventId, StartTime, Title->Duration, Text, SummText, + Title->ThemeId, NAGRA_TABLE_ID, Version); + + if (Text != NULL) + free (Text); + Text = NULL; + if (SummText != NULL) + free (SummText); + SummText = NULL; + } + + if (CheckLevel(3)) { + if (Title->AlwaysZero16 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero16 (3bits) is NOT ZERO:%x.", Title->AlwaysZero16); + if (Title->AlwaysZero17 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero17 is NOT ZERO:%x.", Title->AlwaysZero17); + if (Title->AlwaysZero1 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero1 is NOT ZERO:%x.", Title->AlwaysZero1); + if (Title->AlwaysZero2 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero2 is NOT ZERO:%x.", Title->AlwaysZero2); + if (Title->AlwaysZero3 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero3 is NOT ZERO:%x.", Title->AlwaysZero3); + if (Title->AlwaysZero4 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero4 is NOT ZERO:%x.", Title->AlwaysZero4); + if (Title->AlwaysZero5 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero5 is NOT ZERO:%x.", Title->AlwaysZero5); + if (Title->AlwaysZero8 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero8 is NOT ZERO:%x.", Title->AlwaysZero8); + if (Title->AlwaysZero9 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero9 is NOT ZERO:%x.", Title->AlwaysZero9); + if (Title->AlwaysZero10 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero10 is NOT ZERO:%x.", Title->AlwaysZero10); + if (Title->AlwaysZero11 != 0) + isyslog ("EEPGDEBUG: TitleAlwaysZero11 is NOT ZERO:%x.", Title->AlwaysZero11); + } + p += 30; //next title + } //end for titles + + FinishWriteToSchedule (C, s, ps); + p = next_p; + } while (p < DataEnd); //end of TitleBlock +} + +int cFilterEEPG::GetThemesNagra (const u_char * Data, int Length, unsigned short TableIdExtension) //return code 0 = fatal error, code 1 = success, code 2 = last item processed +{ + u_char *DataStart = (u_char *) Data; + u_char *p = DataStart; //TODO Language code terminated by 0 is ignored + u_char *DataEnd = DataStart + Length; + u_char *DataStartTitles = buffer[TableIdExtension] + 4; + u_char *DataEndTitles = DataStartTitles + bufsize[TableIdExtension] - 4; + if (Length == 0) { + LogI(1, prep("NO THEMES FOUND")); + return 2; + } + + int NumberOfThemes = (*p << 24) | *(p + 1) << 16 | *(p + 2) << 8 | *(p + 3); + p += 4; //skip number of themes block + //isyslog ("EEPG: found %i themes.", NumberOfThemes); + + if ((nThemes == 0)) + LogI(1, "-------------THEMES FOUND--------------"); + + for (int i = 0; i < NumberOfThemes; i++) { + int Textlength = *p; + p++; //skip textlength byte + u_char *Text = p; + u_char ThemeId = 0; + p += Textlength; //skip text + int NrOfBlocks = (*p << 8) | *(p + 1); + p += 2; //skip nrofblocks + bool AnyDoubt = false; + u_char *p2 = p; + p += NrOfBlocks * 8; + for (int j = 0; j < NrOfBlocks; j++) { + sThemesTitlesNagraGuide *TT = (sThemesTitlesNagraGuide *) p2; + p2 += 8; //skip block + u_char *NewThemeId = DataStartTitles + HILO32 (TT->TitleOffset) + 28; + if (NewThemeId >= DataEndTitles) + LogE(0, prep("ERROR, ThemeId out of range: NewThemeId:%p, DataEndTitles:%p, DataStartTitles:%p."), NewThemeId, + DataEndTitles, DataStartTitles); + else { + //esyslog("EEPGDEBUG: NewThemeId:%02x, Text:%s.",*NewThemeId, Text); + if (Themes[*NewThemeId][0] != 0x00) { //theme is already filled, break off + AnyDoubt = true; + break; + } + if (j == 0) //first block + ThemeId = *NewThemeId; + else if (ThemeId != *NewThemeId) { //different theme ids in block + if ((ThemeId & 0xf0) != (*NewThemeId & 0xf0)) { //major nible of themeid does not correspond + LogE(3, prep("ERROR, Theme has multiple indices which differ in major nibble, old index = %x, new index = %x. Ignoring both indices."), + ThemeId, *NewThemeId); + AnyDoubt = true; + break; + } else if ((ThemeId & 0x0f) != 0) //ThemeId is like 1a, 2a, not like 10,20. So it is minor in tree-structure, and it should be labeled in major part of tree + ThemeId = *NewThemeId; //lets hope new themeid is major, if not, it has not worsened.... + } + } //else NewThemeId >= DataEndTitles + if (CheckLevel(3)) { + if (TT->Always1 != 1) + isyslog ("EEPGDEBUG: TT Always1 is NOT 1:%x.", TT->Always1); + if (TT->AlwaysZero1 != 0) + isyslog ("EEPGDEBUG: TT AlwaysZero1 is NOT ZERO:%x.", TT->AlwaysZero1); + if (TT->AlwaysZero2 != 0) + isyslog ("EEPGDEBUG: TT AlwaysZero2 is NOT ZERO:%x.", TT->AlwaysZero2); + } + } //for nrofblocks + // esyslog("EEPGDEBUG: AnyDoubt:%x.",AnyDoubt); + if (!AnyDoubt) { + if (Textlength > 63) + Textlength = 63; //leave room for trailing NULL + if (Themes[ThemeId][0] != 0) { + LogE(0, prep("Trying to add new theme, but Id already exists. ThemeId = %x, Old theme with this Id:%s, new theme: %s."), + ThemeId, Themes[ThemeId], Text); + continue; + } + memcpy (&Themes[ThemeId], Text, Textlength); + Themes[ThemeId][Textlength] = '\0'; //trailing NULL + CleanString (Themes[ThemeId]); + nThemes++; + LogI(1, prep("%02x %s"), ThemeId, Themes[ThemeId]); + } + } //for NumberOfThemes + if (p != DataEnd) { + LogE(0, prep("Themes error: buffer is smaller or bigger than sum of entries. p:%p,DataEnd:%p"), p, DataEnd); + return 0; + } else + return 2; +} + +/** + * \brief Get Nagra channels + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetChannelsNagra (const u_char * Data, int Length) +{ + u_char *DataStart = (u_char *) Data; + u_char *p = DataStart; + u_char *DataEnd = DataStart + Length; + + nChannels = (*p << 24) | *(p + 1) << 16 | *(p + 2) << 8 | *(p + 3); + p += 4; //skip numberofchannels + if (CheckLevel(1)) { + isyslog ("| ID | %-26.26s | %-22.22s | FND | %-8.8s |\n", "Channel ID", "Channel Name", "Sky Num."); + isyslog ("|------|-%-26.26s-|-%-22.22s-|-----|-%-8.8s-|\n", "------------------------------", + "-----------------------------", "--------------------"); + } + + for (int j = 0; j < nChannels; j++) { + sChannelsNagraGuide *Channel = (sChannelsNagraGuide *) p; + sChannel *C = &sChannels[j]; + C->ChannelId = j + 1; //Nagra starts numbering at 1 + ChannelSeq[C->ChannelId] = j; //fill lookup table to go from channel-id to sequence nr in table; lookuptable starts with 0 + C->SkyNumber = 0; + C->NumberOfEquivalences = 1; //there is always an original channel. every equivalence adds 1 + C->Src[0] = Source(); //assume all EPG channels are on same satellite, if not, manage this via equivalents!!! + C->Nid[0] = HILO16 (Channel->NetworkId); + C->Tid[0] = HILO16 (Channel->TransportId); + C->Sid[0] = HILO16 (Channel->ServiceId); + tChannelID channelID = tChannelID(C->Src[0], C->Nid[0], C->Tid[0], C->Sid[0]); + cChannel *VC = GetChannelByID(channelID, true); + bool IsFound = (VC); + if(IsFound) { + strncpy((char*)(C->Name), VC->Name (), 64); + C->Src[0] = VC->Source(); + CleanString (C->Name); + } + else + C->Name[0] = '\0'; //empty string + + LogI(1, "|% 5d | %-26.26s | %-22.22s | %-3.3s | % 6d |\n", C->ChannelId + , *channelID.ToString(), C->Name, IsFound ? "YES" : "NO", C->SkyNumber); + + LogD(4, prep("DEBUG: start : %s"), cs_hexdump (0, p, 9)); + + p += 8; //skip to first 0x8c if non-FTA, or 0x00 if FTA + for (int i = 0; i < Channel->Nr8cBlocks; i++) { + if (*p != 0x8c) { + LogD(0, prep("DEBUG: ERROR in Channel Table, expected value of 0x8c is %02x"), *p); + return 0; //fatal error + } + p++; //skip 8c byte + LogD(4, prep("DEBUG: 8c string: %s"), cs_hexdump (0, p + 1, *p)); + p += *p; //skip 8c block + p++; //forgot to skip length byte + } + //start last non 8c block here + if (*p != 0x00) { + LogE(0, prep("ERROR in Channel Table, expected value of 0x00 is %02x"), *p); + return 0; //fatal error + } + p++; //skip 0x00 byte + LogD(4, prep("DEBUG: endstring: %s"), cs_hexdump (0, p + 1, *p * 4)); + p += (*p * 4); //p points to nrofblocks, each block is 4 bytes + p++; //forgot to skip nrofblocks byte + + /* + if (Channel->AlwaysZero1 != 0) + isyslog ("EEPGDEBUG: AlwaysZero1 is NOT ZERO:%x.", Channel->AlwaysZero1); + if (Channel->AlwaysZero2 != 0) + isyslog ("EEPGDEBUG: AlwaysZero2 is NOT ZERO:%x.", Channel->AlwaysZero2); + if (Channel->Always0x8c != 0x8c) + isyslog ("EEPGDEBUG: Always0x8c is NOT 0x8c:%x.", Channel->Always0x8c); + if (Channel->Always0x08 != 0x08) + isyslog ("EEPGDEBUG: Always0x08 is NOT 0x08:%x.", Channel->Always0x08); + if (Channel->Always0x02 != 0x02) + isyslog ("EEPGDEBUG: Always0x02 is NOT 0x02:%x.", Channel->Always0x02); + if (Channel->Always0x01 != 0x01) + isyslog ("EEPGDEBUG: Always0x01 is NOT 0x01:%x.", Channel->Always0x01); + if (Channel->Always0x20 != 0x20) + isyslog ("EEPGDEBUG: Always0x20 is NOT 0x20:%x.", Channel->Always0x20); + if (Channel->Always0x0a != 0x0a) + isyslog ("EEPGDEBUG: Always0x0a is NOT 0x0a:%x.", Channel->Always0x0a); + if (Channel->Always0x81 != 0x81) + isyslog ("EEPGDEBUG: Always0x81 is NOT 0x81:%x.", Channel->Always0x81); + if (Channel->Always0x44 != 0x44) + isyslog ("EEPGDEBUG: Always0x44 is NOT 0x44:%x.", Channel->Always0x44); + */ + + } + if (p != DataEnd) + LogE(0, prep("Warning, possible problem at end of channel table; p = %p, DataEnd = %p"), p, DataEnd); + LoadEquivalentChannels (); + return 2; //obviously, when you get here, channels are read succesfully, but since all channels are sent at once, you can stop now +} + +/** + * \brief Get Nagra extended EPG + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetNagra (const u_char * Data, int Length) +{ + sTitleBlockHeaderNagraGuide *TBH = (sTitleBlockHeaderNagraGuide *) Data; + if (InitialTitle[0] == 0x00) { //InitialTitle is empty, so we are waiting for the start marker + if (TBH->TableIdExtensionHigh == 0x00 && TBH->TableIdExtensionLow == 0x00) { //this is the start of the data + if (TBH->VersionNumber == LastVersionNagra) { + LogI(0, prep("Nagra EEPG already up-to-date with version %i"), LastVersionNagra); + return 2; + } + Version = TBH->VersionNumber; + LogI(0, prep("initialized Nagraguide, version %i"), Version); + //u_char *p = (u_char *) Data + 11; + u_char *p = (u_char *) Data + 8; + if (*p != 0x01) { + LogE(0, prep("Error, Nagra first byte in table_id_extension 0x00 is not 0x01 but %02x. Format unknown, exiting."), + *p); + return 0; //fatal error + } + p++; //skip 0x01 byte + unsigned short int l = ((*p << 8) | *(p + 1)); + u_char *p_end = p + l - 3; //this ensures a full block of 4 bytes is there to process + p += 2; //skip length bytes + while (p < p_end) { + sSection0000BlockNagraGuide *S = (sSection0000BlockNagraGuide *) p; + int TTT = ((S->TableIdExtensionHigh << 10) | (S->TableIdExtensionLow << 3) | (S->TIE200 << 9)); + LogD(4, prep("DEBUG: TableIdExtension %04x, Unknown1 %02x Version %02x Always 0xd6 %02x DayCounter %02x"), + TTT, S->Unknown1, S->VersionNumber, S->Always0xd6, S->DayCounter); + if ((TTT > 0x0400) && (TTT < 0x0600)) //take high byte and compare with summarie tables in 0x0400 and 0x0500 range; + NagraTIE[NagraCounter++] = TTT; //only store TIEs of titlessummaries, all others can be derived; they are stored in the order of the 0x0000 index table, + //lets hope first entry corresponds with today, next with tomorrow etc. + p += 4; + } + buffer.clear (); //clear buffer maps + bufsize.clear (); //clear buffer maps + InitialTitle[0] = 0xff; //copy data into initial title + } + return (1); + } + unsigned short SectionLength = ((TBH->SectionLengthHigh & 0x0f) << 8) | TBH->SectionLengthLow; + unsigned short TableIdExtension = HILO16 (TBH->TableIdExtension); + if (TableIdExtension == 0x0000) { + LastVersionNagra = Version; + return (2); //done + } + /* + Table_id_extensions: + (0x0000) + (0x0010) per channel, nr_of_channels entries, every entry is 8 bytes, first 4 bytes gives nr. of titles in corresponding title table + (0x0020) per channel info day 2 of the month + (0x01F0) per channel info day 31 of the month + (0x0200) leeg; letop op je leest gemakkelijk door naar 0x0210! + (0x0210) titles day 1 of the month + (0x0220) titles day 2 of the month + (0x03F0) titles day 31 of the month + (0x0400) channel info + (0x0410) summaries day 1 of the month + (0x0420) summaries day 2 of the month + (0x05F0) summaries day 31 of the month + (0x0610) themes/title reference sunday, correspond to titles 0x0400 lower... + (0x0620) themes/title reference monday + ... this goes on until 0x07f0 + (0x0810) bouquet info; references to channels within a package, day 1 of the month + (0x0820) same day 2 of the month + (0x09f0) same day 31 of the month + */ + + if (!(TBH->TableIdExtensionHigh >= 0x02 && TBH->TableIdExtensionHigh <= 0x07)) //here we regulate which tables we are testing + return (1); + if (TableIdExtension == 0x0200) //table 0x0200 only contains language code, because it is for day 0 of the month, and 0x0400 is used for channels + return 1; + if (TBH->SectionNumber == 0) { //first section, create a table + buffer[TableIdExtension] = NULL; + bufsize[TableIdExtension] = 0; + NumberOfTables++; + } + //store all sections in core until last section is found; processing incomplete sections is very complex and doesnt save much memory, + //since the data has to be stored anyway; summaries do not seem to have channelid included, so storing titles and separately storing summaries will not work... + //GetEventId only works for a specific Schedule for a specific ChannelId.... + buffer[TableIdExtension] = + (unsigned char *) realloc (buffer[TableIdExtension], SectionLength - 9 + bufsize[TableIdExtension]); + memcpy (buffer[TableIdExtension] + bufsize[TableIdExtension], Data + 8, SectionLength - 9); //append new section + bufsize[TableIdExtension] += SectionLength - 9; + if (TBH->SectionNumber >= TBH->LastSectionNumber) { + LogI(1, prep("found %04x lastsection nr:%i."), TableIdExtension, TBH->SectionNumber); + // if (TBH->TableIdExtensionHigh == 0x04 || TBH->TableIdExtensionHigh == 0x05) { + if (TableIdExtension == 0x0400) { + int Result = GetChannelsNagra (buffer[TableIdExtension] + 4, bufsize[TableIdExtension] - 4); //TODO language code terminated by 0 is ignored + free (buffer[TableIdExtension]); + buffer[TableIdExtension] = NULL; + NumberOfTables--; + if (Result == 0) + return 0; //fatal error; TODO this exit should also free all other, non-Channel sections that are stored! + } + } //if lastsection read + return (1); //return and continue, nonfatal +} + +void cFilterEEPG::ProcessNagra () +{ + for (int i = 0; i < MAX_THEMES; i++) //clear all themes + Themes[i][0] = '\0'; + + for (int i = 0; i < NagraCounter; i++) { //first prcoess all themes, since they all use the same codes + unsigned short int TableIdExtension = NagraTIE[i]; + int TIE = TableIdExtension + 0x0200; //from 0x0400 to 0x0600 -> themes + LogI(3, prep("Processing Theme with TableIdExtension:%04x"), TIE); + GetThemesNagra (buffer[TIE] + 4, bufsize[TIE] - 4, TableIdExtension - 0x0200); //assume theme is completed //TODO Language code terminatd by 0 is ignored + free (buffer[TIE]); + buffer[TIE] = NULL; + NumberOfTables--; + } + + for (int i = 0; i < NagraCounter; i++) { //first prcoess all themes, since they all use the same codes + unsigned short int TableIdExtension = NagraTIE[i]; + int TIE = TableIdExtension - 0x0200; //from 0x0400 to 0x0200 -> titles + LogI(0, prep("Processing TableIdExtension:%04x"), TableIdExtension); + GetTitlesNagra (buffer[TIE] + 4, bufsize[TIE] - 4, TableIdExtension); //assume title-reading is completed //TODO Language code terminatd by 0 is ignored + free (buffer[TIE]); + buffer[TIE] = NULL; + NumberOfTables--; + + free (buffer[TableIdExtension]); //summaries + buffer[TableIdExtension] = NULL; + NumberOfTables--; + } + if (NumberOfTables != 0) + LogE(0, prep("ERROR, Not all tables processed and stream is already repeating. NumberOfTables = %i."), + NumberOfTables); +} + +/** + * \brief Get MHW1 Titles + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetTitlesMHW1 (const u_char * Data, int Length) +{ + if (Length >= 42) { + sTitleMHW1 *Title = (sTitleMHW1 *) Data; + if (Title->ChannelId == 0xff) { //FF is separator packet + if (memcmp (InitialTitle, Data, 46) == 0) { //data is the same as initial title //TODO use easier notation + LogD(1, prep("End procesing titles")); + return 2; + } + if (nTitles == 0) + memcpy (InitialTitle, Data, 46); //copy data into initial title + int Day = Title->Day; + int Hours = Title->Hours; + if (Hours > 15) + Hours -= 4; + else if (Hours > 7) + Hours -= 2; + else + Day++; + if (Day > 6) + Day = Day - 7; + Day -= Yesterday; + if (Day < 1) + Day = 7 + Day; + //if (Day == 1 && Hours < 6) + if (Day == 0 && Hours < 6) + Day = 7; + //Day = 8; + MHWStartTime = (Day * 86400) + (Hours * 3600) + YesterdayEpochUTC; + LogI(3, prep("Titles: FF PACKET, seqnr:%02x."), Data[5]); + } else if (InitialTitle[0] != 0x00) { //if initialized this should always be 0x90 = tableid! + if (nTitles < MAX_TITLES) { + Title_t *T; + T = (Title_t *) malloc (sizeof (Title_t)); + Titles[nTitles] = T; + int Minutes = Title->Minutes; + int StartTime = MHWStartTime + (Minutes * 60); + T->ChannelId = Title->ChannelId - 1; + T->ThemeId = Title->ThemeId; + T->TableId = Title->TableId; + T->MjdTime = 0; //only used at MHW2 and SKY + T->EventId = HILO32 (Title->ProgramId); + T->StartTime = LocalTime2UTC (StartTime); //here also Daylight Savings correction is done + T->Duration = HILO16 (Title->Duration) * 60; + T->SummaryAvailable = Title->SummaryAvailable; + T->Text = (unsigned char *) malloc (47); + if (T->Text == NULL) { + LogE(0, prep("Titles memory allocation error.")); + return 0; + } + T->Text[46] = '\0'; //end string with NULL character + //memcpy (T->Text, &Title->Title, 23); + decodeText2((unsigned char *)&Title->Title, 23, (char*)T->Text, 47); + CleanString (T->Text); + LogI(3, prep("EvId:%08x,ChanId:%x, Titlenr:%d:, StartTime(epoch):%i, SummAv:%x,Name:%s."), T->EventId, + T->ChannelId, nTitles, T->StartTime, T->SummaryAvailable, T->Text); + nTitles++; + } //nTitles < MaxTitles + else { + LogE(0, prep("Error, %i titles found more than %i"), nTitles, MAX_TITLES); + return 0; + } + } //else if InitialTitle + } //Length==46 + else { + LogE(0, prep("Error, length of title package < 42.")); + return 1; //non fatal + } + + return 1; +} + +/** + * \brief Get MHW2 Titles + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetTitlesMHW2 (const u_char * Data, int Length) +{ + if (Length > 18) { + int Pos = 18; + int Len = 0; + /*bool Check = false; + while (Pos < Length) { + Check = false; + Pos += 7; + if (Pos < Length) { + Pos += 3; + if (Pos < Length) + if (Data[Pos] > 0xc0) { + Pos += (Data[Pos] - 0xc0); + Pos += 4; + if (Pos < Length) { + if (Data[Pos] == 0xff) { + Pos += 1; + Check = true; + } + } + } + } + if (Check == false){ + isyslog ("EEPGDebug: Check==false"); + return 1; // I assume nonfatal error or success + } + }*/ + if (memcmp (InitialTitle, Data, 16) == 0) { //data is the same as initial title + return 2; //last item processed + } else { + if (nTitles == 0) + memcpy (InitialTitle, Data, 16); //copy data into initial title + //Pos = 18; + while (Pos < Length) { + Title_t *T; + T = (Title_t *) malloc (sizeof (Title_t)); + Titles[nTitles] = T; + T->ChannelId = Data[Pos]; + Pos+=11;//The date time starts here + //isyslog ("EEPGDebug: ChannelID:%d", T->ChannelId); + unsigned int MjdTime = (Data[Pos] << 8) | Data[Pos + 1]; + T->MjdTime = 0; //not used for matching MHW2 + T->StartTime = ((MjdTime - 40587) * 86400) + + (((((Data[Pos + 2] & 0xf0) >> 4) * 10) + (Data[Pos + 2] & 0x0f)) * 3600) + + (((((Data[Pos + 3] & 0xf0) >> 4) * 10) + (Data[Pos + 3] & 0x0f)) * 60); + T->Duration = (((Data[Pos + 5] << 8) | Data[Pos + 6]) >> 4) * 60; + Len = Data[Pos + 7] & 0x3f; + //isyslog ("EEPGDebug: Len:%d", Len); + T->Text = (unsigned char *) malloc (Len + 2); + if (T->Text == NULL) { + LogE(0, prep("Titles memory allocation error.")); + return 0; //fatal error + } + T->Text[Len] = '\0'; //end string with NULL character + decodeText2(&Data[Pos + 8],Len,(char*)T->Text,Len+1); + //memcpy (T->Text, &Data[Pos + 8], Len); + CleanString (T->Text); + Pos += Len + 8; // Sub Theme starts here + T->ThemeId = ((Data[7] & 0x3f) << 6) | (Data[Pos] & 0x3f); + T->EventId = (Data[Pos + 1] << 8) | Data[Pos + 2]; + T->SummaryAvailable = (T->EventId != 0xFFFF); + LogI(3, prep("EventId %04x Titlenr %d:SummAv:%x,Name:%s."), T->EventId, + nTitles, T->SummaryAvailable, T->Text); + Pos += 3; + nTitles++; + if (nTitles > MAX_TITLES) { + LogE(0, prep("Error, %i titles found more than %i"), nTitles, MAX_TITLES); + return 0; //fatal error + } + } + return 1; //success + } //else memcmp + } //if length + return 1; //non fatal error +} + +/** + * \brief Get MHW1 Summaries + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetSummariesMHW1 (const u_char * Data, int Length) +{ + sSummaryMHW1 *Summary = (sSummaryMHW1 *) Data; + if (Length >= 11) { + if (Summary->NumReplays < 10) { //Why limit this at 10? + if (Length >= (11 + (Summary->NumReplays * 7))) { + if (Summary->Byte7 == 0xff && Summary->Byte8 == 0xff && Summary->Byte9 == 0xff) { + if (memcmp (InitialSummary, Data, 20) == 0) { //data is equal to initial buffer + return 2; + } else if (nSummaries < MAX_TITLES) { + if (nSummaries == 0) + memcpy (InitialSummary, Data, 20); //copy this data in initial buffer + int SummaryOffset = 11 + (Summary->NumReplays * 7); + int SummaryLength = Length - SummaryOffset; + unsigned char *Text = (unsigned char *) malloc (2*SummaryLength + 1); + if (Text == NULL) { + LogE(0, prep("Summaries memory allocation error.")); + return 0; + } + Text[SummaryLength+1] = '\0'; //end string with NULL character + //memcpy (Text, &Data[SummaryOffset], SummaryLength); + decodeText2(&Data[SummaryOffset], SummaryLength, (char*)Text, 2*SummaryLength + 1); +// CleanString (Text); +// if (Summary->NumReplays != 0) +// esyslog ("EEPG: Number of replays:%i.", Summary->NumReplays); + //int Replays = Summary->NumReplays; + int ReplayOffset = 11; + Summary_t *S; + S = (Summary_t *) malloc (sizeof (Summary_t)); + Summaries[nSummaries] = S; + S->NumReplays = Summary->NumReplays; + S->EventId = HILO32 (Summary->ProgramId); + S->Text = Text; + int i = 0; + do { + S->Replays[i].MjdTime = 0; //only used for SKY + //if (Summary->NumReplays == 0) { + //S->ChannelId = 0xFFFF; //signal that ChannelId is not known; 0 is bad signal value because it is a valid ChannelId... + //S->StartTime = 0; + //} + //else { + S->Replays[i].ChannelId = Data[ReplayOffset++] - 1; + unsigned int Date_hi = Data[ReplayOffset++]; + unsigned int Date_lo = Data[ReplayOffset++]; + unsigned short int Hour = Data[ReplayOffset++]; + unsigned short int Minute = Data[ReplayOffset++]; + unsigned short int Sec = Data[ReplayOffset++]; + ReplayOffset++; //makes total of 7 bytes + + LogI(4, prep("EvId:%08x ChanId:%x, ChanName %s, Time: %02d:%02d:%02d."), + S->EventId, S->Replays[i].ChannelId, + sChannels[ChannelSeq[S->Replays[i].ChannelId]].Name, Hour, Minute, Sec); + + S->Replays[i].StartTime = MjdToEpochTime (Date) + (((((Hour & 0xf0) >> 4) * 10) + (Hour & 0x0f)) * 3600) + + (((((Minute & 0xf0) >> 4) * 10) + (Minute & 0x0f)) * 60) + + ((((Sec & 0xf0) >> 4) * 10) + (Sec & 0x0f)); +// summary -> time[i] = ProviderLocalTime2UTC (summary -> time[i]); + S->Replays[i].StartTime = LocalTime2UTC (S->Replays[i].StartTime); + //} + i++; + } while (i < Summary->NumReplays); + //} while (Replays-- >= 0); + LogI(3, prep("EvId:%08x ChanId:%x, Replays:%d, Summnr %d:%.35s."), S->EventId, + S->Replays[0].ChannelId, S->NumReplays, nSummaries, S->Text); + nSummaries++; + } else { + LogE(0, prep("Error, %i summaries found more than %i"), nSummaries, MAX_TITLES); + return 0; + } + } //0xff + else { + LogE(0, prep("Warning, Summary bytes not as expected.")); + return 1; //it is not a success, but error is not fatal + } + } //numreplays length + else { + LogE(0, prep("Warning, number of replays is not conforming to length.")); + return 1; //nonfatal error + } + } //numreplays <10 + else { + LogE(0, prep("Warning, number of replays %d > 10, cannot process."), + Summary->NumReplays); + return 1; //nonfatal error + } + } //length >11 + else { + LogE(0, prep("Summary length too small:%s"), cs_hexdump (0, Data, Length)); + return 1; //nonfatal error + } + return 1; //success +} + +/** + * \brief Get MHW2 Summaries + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetSummariesMHW2 (const u_char * Data, int Length) +{ + if (Length > (Data[14] + 17)) { + if (memcmp (InitialSummary, Data, 16) == 0) //data is equal to initial buffer + return 2; + else { + if (nSummaries == 0) + memcpy (InitialSummary, Data, 16); //copy this data in initial buffer + if (nSummaries < MAX_TITLES) { + int lenText = Data[14]; + int SummaryLength = lenText; + int Pos = 15; + int Loop = Data[Pos + SummaryLength] & 0x0f; + Summary_t *S; + S = (Summary_t *) malloc (sizeof (Summary_t)); + Summaries[nSummaries] = S; + + S->Replays[0].ChannelId = 0xFFFF; //signal that ChannelId is not known; 0 is bad signal value because it is a valid ChannelId... + S->Replays[0].StartTime = 0; //not used + S->Replays[0].MjdTime = 0; //not used + S->NumReplays = 0; //not used + S->EventId = (Data[3] << 8) | Data[4]; + unsigned char tmp[4096]; //TODO do this smarter + memcpy (tmp, &Data[Pos], lenText); + tmp[SummaryLength] = '\n'; + SummaryLength += 1; + Pos += (lenText + 1); + if (Loop > 0) { + while (Loop > 0) { + lenText = Data[Pos]; + Pos += 1; + if ((Pos + lenText) < Length) { + memcpy (&tmp[SummaryLength], &Data[Pos], lenText); + SummaryLength += lenText; + if (Loop > 1) { + tmp[SummaryLength] = '\n'; + SummaryLength += 1; + } + } else + break; + Pos += lenText; + Loop--; + } + } + S->Text = (unsigned char *) malloc (SummaryLength + 2); + S->Text[SummaryLength] = '\0'; //end string with NULL character + if (S->Text == NULL) { + LogE(0, prep("Summaries memory allocation error.")); + return 0; //fatal error + } + //memcpy (S->Text, tmp, SummaryLength); + decodeText2(tmp,SummaryLength,(char*)S->Text,SummaryLength + 1); + CleanString (S->Text); + LogI(3, prep("EventId %08x Summnr %d:%.30s."), S->EventId, nSummaries, S->Text); + nSummaries++; + } else { + LogE(0, prep("Error, %i summaries found more than %i"), nSummaries, MAX_TITLES); + return 0; //fatal error + } + } //else + } //if length + return 1; //succes or nonfatal error +} + +/** + * \brief Get SKYBOX Channels + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetChannelsSKYBOX (const u_char * Data, int Length) +{ + + if (memcmp (InitialChannel, Data, 8) == 0) { //data is the same as initial title + LoadEquivalentChannels (); + return 2; + } else { + if (nChannels == 0) + memcpy (InitialChannel, Data, 8); //copy data into initial title + if (nChannels == 0) { + LogI(1, "| ID | %-26.26s | %-22.22s | FND | %-8.8s |\n", "Channel ID", "Channel Name", "Sky Num."); + LogI(1, "|------|-%-26.26s-|-%-22.22s-|-----|-%-8.8s-|\n", "------------------------------", + "-----------------------------", "--------------------"); + } +// unsigned short int BouquetId = (Data[3] << 8) | Data[4]; + int BouquetDescriptorsLength = ((Data[8] & 0x0f) << 8) | Data[9]; + int TransportStreamLoopLength = + ((Data[BouquetDescriptorsLength + 10] & 0x0f) << 8) | Data[BouquetDescriptorsLength + 11]; + int p1 = (BouquetDescriptorsLength + 12); + while (TransportStreamLoopLength > 0) { + unsigned short int Tid = (Data[p1] << 8) | Data[p1 + 1]; + unsigned short int Nid = (Data[p1 + 2] << 8) | Data[p1 + 3]; + int TransportDescriptorsLength = ((Data[p1 + 4] & 0x0f) << 8) | Data[p1 + 5]; + int p2 = (p1 + 6); + p1 += (TransportDescriptorsLength + 6); + TransportStreamLoopLength -= (TransportDescriptorsLength + 6); + while (TransportDescriptorsLength > 0) { + unsigned char DescriptorTag = Data[p2]; + int DescriptorLength = Data[p2 + 1]; + int p3 = (p2 + 2); + p2 += (DescriptorLength + 2); + TransportDescriptorsLength -= (DescriptorLength + 2); + switch (DescriptorTag) { //TODO switch with only 1 case??? replace this by template + case 0xb1: + p3 += 2; + DescriptorLength -= 2; + while (DescriptorLength > 0) { + // 0x01 = Video Channel + // 0x02 = Audio Channel + // 0x05 = Other Channel + //if( Data[p3+2] == 0x01 || Data[p3+2] == 0x02 || Data[p3+2] == 0x05 ) + //{ + unsigned short int Sid = (Data[p3] << 8) | Data[p3 + 1]; + unsigned short int ChannelId = (Data[p3 + 3] << 8) | Data[p3 + 4]; + unsigned short int SkyNumber = (Data[p3 + 5] << 8) | Data[p3 + 6]; + if (SkyNumber > 100 && SkyNumber < 1000) { + if (ChannelId > 0) { + sChannel *C; + if (ChannelSeq.count (ChannelId) == 0) { //not found + C = &sChannels[nChannels]; + C->ChannelId = ChannelId; + C->NumberOfEquivalences = 1; //there is always an original channel. every equivalence adds 1 + C->Src[0] = Source (); //assume all EPG channels are on same satellite, if not, manage this via equivalents!!! + C->Nid[0] = Nid; + C->Tid[0] = Tid; + C->Sid[0] = Sid; + C->SkyNumber = SkyNumber; + tChannelID channelID = tChannelID (C->Src[0], C->Nid[0], C->Tid[0], C->Sid[0]); + cChannel *VC = Channels.GetByChannelID (channelID, true); + bool IsFound = (VC); + if (IsFound) + strncpy ((char *) C->Name, VC->Name (), 64); + else + C->Name[0] = '\0'; //empty string + + LogI(1, "|% 5d | %-26.26s | %-22.22s | %-3.3s | % 6d |\n", C->ChannelId + , *channelID.ToString(), C->Name, IsFound ? "YES" : "NO", C->SkyNumber); + + ChannelSeq[C->ChannelId] = nChannels; //fill lookup table to go from channel-id to sequence nr in table + nChannels++; + if (nChannels >= MAX_CHANNELS) { + LogE(0, prep("Error, %i channels found more than %i"), nChannels, MAX_CHANNELS); + return 0; + } + } + } + } + p3 += 9; + DescriptorLength -= 9; + } + break; + default: + break; + } //switch descriptortag + } + } //while + return 1; + } //else part of memcmp +} + +/** + * \brief Get SKYBOX Titles + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetTitlesSKYBOX (const u_char * Data, int Length) +{ + int p; + unsigned short int ChannelId; + unsigned short int MjdTime; + int Len1; + int Len2; + + if (Length < 20) + return 1; //nonfatal error + if (memcmp (InitialTitle, Data, 20) == 0) //data is the same as initial title + return 2; + else { + if (nTitles == 0) + memcpy (InitialTitle, Data, 20); //copy data into initial title + ChannelId = (Data[3] << 8) | Data[4]; + MjdTime = ((Data[8] << 8) | Data[9]); + if (ChannelId > 0) { + if (MjdTime > 0) { + p = 10; + do { + Title_t *T; + T = (Title_t *) malloc (sizeof (Title_t)); + Titles[nTitles] = T; + T->ChannelId = ChannelId; + T->MjdTime = MjdTime; //only date, no time. Is used to match titles and summaries, SKYBOX only + T->EventId = (Data[p] << 8) | Data[p + 1]; + Len1 = ((Data[p + 2] & 0x0f) << 8) | Data[p + 3]; + if (Data[p + 4] != 0xb5) { + LogD(5, prep("Data error signature for title - Data[p + 4] != 0xb5")); + break; + } + if (Len1 > Length) { + LogD(5, prep("Data error signature for title - Len1 > Length")); + break; + } + p += 4; + Len2 = Data[p + 1] - 7; + T->StartTime = ((MjdTime - 40587) * 86400) + ((Data[p + 2] << 9) | (Data[p + 3] << 1)); + T->Duration = ((Data[p + 4] << 9) | (Data[p + 5] << 1)); + T->ThemeId = Data[p + 6]; + //TODO Data[p + 7] is Quality value add it to description + //int quality = Data[p + 7]; + switch (Data[p + 8] & 0x0F) { + case 0x01: + T->Rating = 0x00; //"U" + break; + case 0x02: + T->Rating = 0x08; //"PG" + break; + case 0x03: + T->Rating = 0x0C; //"12" + break; + case 0x04: + T->Rating = 0x0F; //"15" + break; + case 0x05: + T->Rating = 0x12; //"18" + break; + default: + T->Rating = 0x00; //"-" + break; + } + T->Unknown1 = Data[p + 4 - 13]; //FIXME + T->Unknown2 = Data[p + 4 - 12]; //FIXME + T->Unknown3 = Data[p + 4 - 11]; //FIXME + unsigned char tmp[4096]; //TODO smarter + Len2 = DecodeHuffmanCode (&Data[p + 9], Len2, tmp); + if (Len2 == 0) { + LogE(0, prep("Warning, could not huffman-decode title-text, skipping title.")); + return 1; //non-fatal error + } + T->Text = (unsigned char *) malloc (Len2 + 1); + if (T->Text == NULL) { + LogE(0, prep("Titles memory allocation error.")); + return 0; + } + T->Text[Len2] = '\0'; //end string with NULL character + memcpy (T->Text, tmp, Len2); + CleanString (T->Text); + T->SummaryAvailable = 1; //TODO I assume this is true? + + LogI(3, prep("EventId %08x Titlenr %d,Unknown1:%x,Unknown2:%x,Un3:%x,Name:%s."), + T->EventId, nTitles, T->Unknown1, T->Unknown2, T->Unknown3, T->Text); + + p += Len1; + nTitles++; + if (nTitles >= MAX_TITLES) { + LogE(0, prep("Error, %i titles found more than %i"), nTitles, MAX_TITLES); + return 0; //fatal error + } + } while (p < Length); + } + } + } + return 1; //success +} + +/** + * \brief Get SKYBOX Summaries + * + * \return 0 = fatal error, code 1 = success, code 2 = last item processed + */ +int cFilterEEPG::GetSummariesSKYBOX (const u_char * Data, int Length) +{ + int p; + unsigned short int ChannelId; + unsigned short int MjdTime; + int Len1; + int Len2; + + if (Length < 20) { + return 1; //non fatal error I assume + } + if (memcmp (InitialSummary, Data, 20) == 0) //data is equal to initial buffer + return 2; +// else if (nSummaries < MAX_SUMMARIES) { + else { + if (nSummaries == 0) + memcpy (InitialSummary, Data, 20); //copy this data in initial buffer + ChannelId = (Data[3] << 8) | Data[4]; + MjdTime = ((Data[8] << 8) | Data[9]); + if (ChannelId > 0) { + if (MjdTime > 0) { + p = 10; + do { + Summary_t *S; + S = (Summary_t *) malloc (sizeof (Summary_t)); + Summaries[nSummaries] = S; + S->Replays[0].ChannelId = ChannelId; + S->Replays[0].MjdTime = MjdTime; + S->NumReplays = 0; //not used + S->EventId = (Data[p] << 8) | Data[p + 1]; + Len1 = ((Data[p + 2] & 0x0f) << 8) | Data[p + 3]; + if (Data[p + 4] != 0xb9) { + LogD(5, prep("Data error signature for title - Data[p + 4] != 0xb5")); + break; + } + if (Len1 > Length) { + LogD(5, prep("Data error signature for title - Len1 > Length")); + break; + } + p += 4; + Len2 = Data[p + 1]; + unsigned char tmp[4096]; //TODO can this be done better? + Len2 = DecodeHuffmanCode (&Data[p + 2], Len2, tmp); + if (Len2 == 0) { + LogE(0, prep("Warning, could not huffman-decode text, skipping summary.")); + return 1; //non-fatal error + } + S->Text = (unsigned char *) malloc (Len2 + 1); + if (S->Text == NULL) { + LogE(0, prep("Summaries memory allocation error.")); + return 0; + } + memcpy (S->Text, tmp, Len2); + S->Text[Len2] = '\0'; //end string with NULL character + CleanString (S->Text); + LogI(3, prep("EventId %08x Summnr %d:%.30s."), S->EventId, nSummaries, S->Text); + p += Len1; + nSummaries++; + if (nSummaries >= MAX_TITLES) { + LogI(0, prep("Error, %i summaries found more than %i"), nSummaries, MAX_TITLES); + return 0; + } + } while (p < Length); + } + } + } + return 1; +} + +void cFilterEEPG::FreeSummaries (void) +{ + if (Format == MHW1 || Format == MHW2 || Format == SKY_IT || Format == SKY_UK) { + Summary_t *S; //TODO do I need this? + Summary_t *S2; //TODO do I need this? + for (int i = 0; i < nSummaries; i++) { + S = Summaries[i]; + if (i < nSummaries - 1) { + S2 = Summaries[i + 1]; //look at next summary + if (S->Text != S2->Text && S->Text != 0x00) //this is the last summary that points to this textblock; needed in case NumReplays > 1, multiple pointers to same textblock + free (S->Text); + } else if (S->Text != 0x00) + free (S->Text); + free (S); + } + } + nSummaries = 0; +} + +void cFilterEEPG::FreeTitles (void) +{ + if (Format == MHW1 || Format == MHW2 || Format == SKY_IT || Format == SKY_UK) { + Title_t *T; + for (int i = 0; i < nTitles; i++) { + T = Titles[i]; + free (T->Text); + free (T); + } + } + nTitles = 0; +} + +void cFilterEEPG::LoadIntoSchedule (void) +{ + int i, j, k; + i = 0; + j = 0; + k = 0; + bool foundtitle; + foundtitle = false; + Title_t *T; + Summary_t *S; + int remembersummary; +//keep statistics + int SummariesNotFound = 0; + int NoSummary = 0; + int NotMatching = 0; + int LostSync = 0; + remembersummary = -1; + + cSchedulesLock SchedulesLock (true); + cSchedules *s = (cSchedules *) cSchedules::Schedules (SchedulesLock); + if (s) { + + while (i < nTitles) { + T = Titles[i]; + S = Summaries[j]; + foundtitle = false; + + while ((i < nTitles) && (!foundtitle)) { //find next title that has summary + T = Titles[i]; + if (T->SummaryAvailable) + foundtitle = true; + else { + NoSummary++; + i++; + } + } +//esyslog("foundtitle %x for next title that has a summary:%d",foundtitle,i); + + if (!foundtitle) //no more titles with summaries + break; + if ((T->EventId == S->EventId) && (T->MjdTime == S->Replays[0].MjdTime) + && ((T->ChannelId == S->Replays[0].ChannelId) || ((Format != SKY_IT) && (Format != SKY_UK)))) { //should always be true, titles and summaries are broadcasted in order... + LogD(3, prep("T->EventId == S->EventId")); + //MjdTime = 0 for all but SKY + //S->ChannelId must be equal to T->ChannelId only for SKY; in MHW1 S->ChannelId overrides T->ChannelId when NumReplays > 1 + remembersummary = -1; //reset summary searcher + //int Replays = S->NumReplays; + + int index = 0; + do { + unsigned short int ChannelId; + time_t StartTime; + if (S->NumReplays == 0) { + ChannelId = T->ChannelId; + StartTime = T->StartTime; + } else { + ChannelId = S->Replays[index].ChannelId; + StartTime = S->Replays[index].StartTime; + } + + //channelids are sequentially numbered and sent in MHW1 and MHW2, but not in SKY, so we need to lookup the table index + sChannel *C = &sChannels[ChannelSeq[ChannelId]]; //find channel + cSchedule *p[MAX_EQUIVALENCES]; + PrepareToWriteToSchedule (C, s, p); + + char rating = 0x00; + if ((Format == SKY_IT || Format == SKY_UK) && T->Rating) { //TODO only works on OTV for now + rating = T->Rating; + } + unsigned short int TableId = DEFAULT_TABLE_ID; + if (T->TableId) { + TableId = T->TableId; + } + + WriteToSchedule (p, C->NumberOfEquivalences, T->EventId, StartTime, T->Duration / 60, (char *) T->Text, + (char *) S->Text, T->ThemeId, TableId, 0, rating); + + FinishWriteToSchedule (C, s, p); + //Replays--; + //if ((S->NumReplays != 0) && (Replays > 0)) { //when replays are used, all summaries of the replays are stored consecutively; currently only CSAT + //j++; //move to next summary + //if (j >= nSummaries) //do not forget to look in beginning of (ring)buffer + //j = 0; + //S = Summaries[j]; //next summary within replay range + //} + index++; + } //while + while (index < S->NumReplays); + +//TODO: why load events that have already past, and then run Cleanup +//end of putting title and summary in schedule + i++; //move to next title + } //if T->EventId == S->EventId + else { +// esyslog("EEPG ERROR: ProgramIds not matching, title:%d,summary%d, T->EventId:%u, S->Eventid:%u.",i,j,T->EventId,S->EventId); + NotMatching++; + if (remembersummary == -1) { //I am not in search loop yet + remembersummary = j; + if (remembersummary == 0) + remembersummary = nSummaries; //or next test will never be succesfull for remembersummary = 0 + LostSync++; +// esyslog("EEPG Error: lost sync at title %d, summary %d.",i,j); + } else if (j == (remembersummary - 1)) { //the last summary to be checked has failed also + //esyslog ("EEPG Error: could not find summary for summary-available Title %d.", i); + esyslog + ("EEPG: Error, summary not found for EventId %08x Titlenr %d:SummAv:%x,Unknown1:%x,Unknown2:%x,Un3:%x,Name:%s.", + T->EventId, i, T->SummaryAvailable, T->Unknown1, T->Unknown2, T->Unknown3, T->Text); + + /* write Title info to schedule */ + sChannel *C = &sChannels[ChannelSeq[T->ChannelId]]; //find channel + cSchedule *p[MAX_EQUIVALENCES]; + PrepareToWriteToSchedule (C, s, p); + char rating = 0x00; + if ((Format == SKY_IT || Format == SKY_UK) && T->Rating) { //TODO only works on OTV for now + rating = T->Rating; + } + WriteToSchedule (p, C->NumberOfEquivalences, T->EventId, T->StartTime, T->Duration / 60, (char *) T->Text, + NULL, T->ThemeId, DEFAULT_TABLE_ID, 0, rating); + FinishWriteToSchedule (C, s, p); + + SummariesNotFound++; + i++; //move to next title, for this one no summary can be found + } + +// esyslog("Trying again for this title %d, remember summary %d, but advancing one Summary to %d.",i,remembersummary,j); + } + j++; //move to next summary + if (j >= nSummaries) //do not forget to look in beginning of (ring)buffer + j = 0; + } //while title + } // if s + else + esyslog ("EEPG Error: could not lock schedules."); + + cSchedules::Cleanup (true); //deletes all past events + + isyslog ("EEPG: found %i equivalents channels", nEquivChannels); + isyslog ("EEPG: found %i themes", nThemes); + isyslog ("EEPG: found %i channels", nChannels); + isyslog ("EEPG: found %i titles", nTitles); + isyslog ("EEPG: of which %i reported to have no summary available; skipping these BIENTOT titles", NoSummary); + isyslog ("EEPG: found %i summaries", nSummaries); + if (SummariesNotFound != 0) + esyslog ("EEPG: %i summaries not found", SummariesNotFound); + if (NotMatching > nSummaries) + LogI (0, prep("Warning: lost sync %i times, summary did not match %i times."), + LostSync, NotMatching); + + FreeSummaries (); //do NOT free channels, themes and bouquets here because they will be reused in SKY! + FreeTitles (); + if (!((Format == SKY_IT) || (Format == SKY_UK))) { //everything but SKY; SKY is the only protocol where LoadIntoSchedule is called repeatedly + ChannelSeq.clear (); + } +} + +void cFilterEEPG::AddFilter (u_short Pid, u_char Tid) +{ + if (!Matches (Pid, Tid)) { + Add (Pid, Tid); + esyslog (prep("Filter Pid:%x,Tid:%x added."), Pid, Tid); + } +} + +void cFilterEEPG::AddFilter (u_short Pid, u_char Tid, unsigned char Mask) +{ + if (!Matches (Pid, Tid)) { + Add (Pid, Tid, Mask); + esyslog (prep("Filter Pid:%x,Tid:%x,Mask:%x added."), Pid, Tid, Mask); + } +} + +namespace SI +{ + enum DescriptorTagExt { + DishRatingDescriptorTag = 0x89, + DishShortEventDescriptorTag = 0x91, + DishExtendedEventDescriptorTag = 0x92, + DishSeriesDescriptorTag = 0x96, + }; + + // typedef InheritEnum< DescriptorTagExt, SI::DescriptorTag > ExtendedDescriptorTag; + +/*extern const char *getCharacterTable(const unsigned char *&buffer, int &length, bool *isSingleByte = NULL); +extern bool convertCharacterTable(const char *from, size_t fromLength, char *to, size_t toLength, const char *fromCode); +extern bool SystemCharacterTableIsSingleByte;*/ +class cEIT2:public SI::EIT +{ +public: + cEIT2 (cSchedules * Schedules, int Source, u_char Tid, const u_char * Data, bool OnlyRunningStatus = false); +}; + +cEIT2::cEIT2 (cSchedules * Schedules, int Source, u_char Tid, const u_char * Data, bool OnlyRunningStatus) + : SI::EIT (Data, false) +{ + //LogD(2, prep("cEIT2::cEIT2")); + if (Tid > 0 && Format == DISH_BEV) Tid--; + + if (!CheckCRCAndParse ()) { + LogD(2, prep("!CheckCRCAndParse ()")); + return; + } + + bool searchOtherSatPositions = Format == DISH_BEV; + + tChannelID channelID (Source, getOriginalNetworkId (), getTransportStreamId (), getServiceId ()); + cChannel *channel = GetChannelByID (channelID, searchOtherSatPositions); + if (!channel) { + LogD(3, prep("!channel channelID: %s"), *channelID.ToString()); + return; // only collect data for known channels + } + + LogD(4, prep("channelID: %s format:%d"), *channel->GetChannelID().ToString(), Format); + +#ifdef USE_NOEPG + // only use epg from channels not blocked by noEPG-patch + tChannelID kanalID; + kanalID = channel->GetChannelID (); + if (!allowedEPG (kanalID)) + return; +#endif /* NOEPG */ + + cSchedule *pSchedule = (cSchedule *) Schedules->GetSchedule (channel, true); + + bool Empty = true; + bool Modified = false; + bool HasExternalData = false; + time_t SegmentStart = 0; + time_t SegmentEnd = 0; + + SI::EIT::Event SiEitEvent; + for (SI::Loop::Iterator it; eventLoop.getNext (SiEitEvent, it);) { + bool ExternalData = false; + // Drop bogus events - but keep NVOD reference events, where all bits of the start time field are set to 1, resulting in a negative number. + if (SiEitEvent.getStartTime () == 0 || (SiEitEvent.getStartTime () > 0 && SiEitEvent.getDuration () == 0)) + continue; + Empty = false; + if (!SegmentStart) + SegmentStart = SiEitEvent.getStartTime (); + SegmentEnd = SiEitEvent.getStartTime () + SiEitEvent.getDuration (); + cEvent *newEvent = NULL; + cEvent *rEvent = NULL; + cEvent *pEvent = (cEvent *) pSchedule->GetEvent (SiEitEvent.getEventId (), SiEitEvent.getStartTime ()); + if (!pEvent) { + if (OnlyRunningStatus) + continue; + // If we don't have that event yet, we create a new one. + // Otherwise we copy the information into the existing event anyway, because the data might have changed. + pEvent = newEvent = new cEvent (SiEitEvent.getEventId ()); + if (!pEvent) + continue; + } else { + // We have found an existing event, either through its event ID or its start time. + pEvent->SetSeen (); + // If the existing event has a zero table ID it was defined externally and shall + // not be overwritten. + if (pEvent->TableID () == 0x00) { +#ifdef USE_DDEPGENTRY + if (pEvent->Version () == getVersionNumber ()) { + if (Setup.MixEpgAction == 0) + continue; + //printf("in"); + //printf("%s", pEvent->GetTimeString()); + // to use the info of the original epg, update the extern one, + // if it has less info + SI::Descriptor * d; + SI::ExtendedEventDescriptors * ExtendedEventDescriptors = NULL; + //SI::ExtendedEventDescriptor *eed = NULL; + SI::ShortEventDescriptor * ShortEventDescriptor = NULL; + //SI::ShortEventDescriptor *sed = NULL; + //SI::TimeShiftedEventDescriptor *tsed = NULL; + //cLinkChannels *LinkChannels = NULL; + for (SI::Loop::Iterator it2; (d = SiEitEvent.eventDescriptors.getNext (it2));) { + if (d->getDescriptorTag () == SI::ShortEventDescriptorTag) { + int LanguagePreferenceShort = -1; + SI::ShortEventDescriptor * sed = (SI::ShortEventDescriptor *) d; + if (I18nIsPreferredLanguage (Setup.EPGLanguages, sed->languageCode, LanguagePreferenceShort) + || !ShortEventDescriptor) { + delete ShortEventDescriptor; + ShortEventDescriptor = sed; + d = NULL; // so that it is not deleted + } + } else if (d->getDescriptorTag () == SI::ExtendedEventDescriptorTag) { + int LanguagePreferenceExt = -1; + bool UseExtendedEventDescriptor = false; + SI::ExtendedEventDescriptor * eed = (SI::ExtendedEventDescriptor *) d; + if (I18nIsPreferredLanguage (Setup.EPGLanguages, eed->languageCode, LanguagePreferenceExt) + || !ExtendedEventDescriptors) { + delete ExtendedEventDescriptors; + ExtendedEventDescriptors = new SI::ExtendedEventDescriptors; + UseExtendedEventDescriptor = true; + } + if (UseExtendedEventDescriptor) { + ExtendedEventDescriptors->Add (eed); + d = NULL; // so that it is not deleted + } + if (eed->getDescriptorNumber () == eed->getLastDescriptorNumber ()) + UseExtendedEventDescriptor = false; + } + delete d; + } + if (pEvent) { + if (ShortEventDescriptor) { + char buffer[256]; + if (ShortEventDescriptor->text.getText (buffer, sizeof (buffer)) && pEvent->ShortText () + && (strlen (ShortEventDescriptor->text.getText (buffer, sizeof (buffer))) > + strlen (pEvent->ShortText ()))) { + pEvent->SetShortText (ShortEventDescriptor->text.getText (buffer, sizeof (buffer))); + pEvent->FixEpgBugs (); + } + } + if (ExtendedEventDescriptors) { + char buffer[ExtendedEventDescriptors->getMaximumTextLength (": ") + 1]; + //pEvent->SetDescription(ExtendedEventDescriptors->getText(buffer, sizeof(buffer), ": ")); + if (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": ") + && pEvent->Description () + && (strlen (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": ")) > + strlen (pEvent->Description ()))) { + pEvent->SetDescription (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": ")); + pEvent->FixEpgBugs (); + } + } + } + delete ExtendedEventDescriptors; + delete ShortEventDescriptor; + continue; + } +#else + if (pEvent->Version () == getVersionNumber ()) + continue; +#endif /* DDEPGENTRY */ + HasExternalData = ExternalData = true; + } + // If the new event has a higher table ID, let's skip it. + // The lower the table ID, the more "current" the information. + else if (Tid > pEvent->TableID ()) + continue; + // If the new event comes from the same table and has the same version number + // as the existing one, let's skip it to avoid unnecessary work. + // Unfortunately some stations (like, e.g. "Premiere") broadcast their EPG data on several transponders (like + // the actual Premiere transponder and the Sat.1/Pro7 transponder), but use different version numbers on + // each of them :-( So if one DVB card is tuned to the Premiere transponder, while an other one is tuned + // to the Sat.1/Pro7 transponder, events will keep toggling because of the bogus version numbers. + else if (Tid == pEvent->TableID() && pEvent->Version() == getVersionNumber()) + continue; + } + if (!ExternalData) { + pEvent->SetEventID (SiEitEvent.getEventId ()); // unfortunately some stations use different event ids for the same event in different tables :-( + pEvent->SetTableID (Tid); + pEvent->SetStartTime (SiEitEvent.getStartTime ()); + pEvent->SetDuration (SiEitEvent.getDuration ()); + } + if (newEvent) + pSchedule->AddEvent (newEvent); + if (Tid == 0x4E) { // we trust only the present/following info on the actual TS +#ifdef USE_DDEPGENTRY + if (Setup.DisableVPS == 0 && SiEitEvent.getRunningStatus () >= SI::RunningStatusNotRunning) +#else + if (SiEitEvent.getRunningStatus () >= SI::RunningStatusNotRunning) +#endif /* DDEPGENTRY */ + pSchedule->SetRunningStatus (pEvent, SiEitEvent.getRunningStatus (), channel); + } + if (OnlyRunningStatus) + continue; // do this before setting the version, so that the full update can be done later + pEvent->SetVersion (getVersionNumber()); + + int LanguagePreferenceShort = -1; + int LanguagePreferenceExt = -1; + bool UseExtendedEventDescriptor = false; + SI::Descriptor * d; + SI::ExtendedEventDescriptors * ExtendedEventDescriptors = NULL; + SI::ShortEventDescriptor * ShortEventDescriptor = NULL; + //SI::DishDescriptor *DishExtendedEventDescriptor = NULL; + SI::DishDescriptor *DishEventDescriptor = NULL; + //uchar DishTheme = 0, DishCategory = 0; + + + cLinkChannels *LinkChannels = NULL; + cComponents *Components = NULL; + for (SI::Loop::Iterator it2; (d = SiEitEvent.eventDescriptors.getNext (it2));) { + if (ExternalData && d->getDescriptorTag () != SI::ComponentDescriptorTag) { + delete d; + LogD(2, prep("continue:d->getDescriptorTAG():%x)"), d->getDescriptorTag ()); + continue; + } + + //LogD(2, prep("EEPGDEBUG:d->getDescriptorTAG():%x)"), d->getDescriptorTag ()); + + switch (d->getDescriptorTag ()) { + case SI::ExtendedEventDescriptorTag: { + SI::ExtendedEventDescriptor * eed = (SI::ExtendedEventDescriptor *) d; + if (I18nIsPreferredLanguage (Setup.EPGLanguages, eed->languageCode, LanguagePreferenceExt) + || !ExtendedEventDescriptors) { + delete ExtendedEventDescriptors; + ExtendedEventDescriptors = new SI::ExtendedEventDescriptors; + UseExtendedEventDescriptor = true; + } + if (UseExtendedEventDescriptor) { + ExtendedEventDescriptors->Add (eed); + d = NULL; // so that it is not deleted + } + if (eed->getDescriptorNumber () == eed->getLastDescriptorNumber ()) + UseExtendedEventDescriptor = false; + } + break; + case SI::ShortEventDescriptorTag: { + SI::ShortEventDescriptor * sed = (SI::ShortEventDescriptor *) d; + if (I18nIsPreferredLanguage (Setup.EPGLanguages, sed->languageCode, LanguagePreferenceShort) + || !ShortEventDescriptor) { + delete ShortEventDescriptor; + ShortEventDescriptor = sed; + d = NULL; // so that it is not deleted + } + } + break; +#if APIVERSNUM > 10711 + case SI::ContentDescriptorTag: { + SI::ContentDescriptor *cd = (SI::ContentDescriptor *)d; + SI::ContentDescriptor::Nibble Nibble; + int NumContents = 0; + uchar Contents[MaxEventContents] = { 0 }; + for (SI::Loop::Iterator it3; cd->nibbleLoop.getNext(Nibble, it3); ) { + if (NumContents < MaxEventContents) { + Contents[NumContents] = ((Nibble.getContentNibbleLevel1() & 0xF) << 4) | (Nibble.getContentNibbleLevel2() & 0xF); + NumContents++; + } + if (DishEventDescriptor && NumContents == 1) { + DishEventDescriptor->setContent(Nibble); + } + //LogD(2, prep("EEPGDEBUG:Nibble:%x-%x-%x-%x)"), Nibble.getContentNibbleLevel1(),Nibble.getContentNibbleLevel2() + // , Nibble.getUserNibble1(), Nibble.getUserNibble2()); + + } + pEvent->SetContents(Contents); + } + break; +#endif + case SI::ParentalRatingDescriptorTag: { + int LanguagePreferenceRating = -1; + SI::ParentalRatingDescriptor *prd = (SI::ParentalRatingDescriptor *)d; + SI::ParentalRatingDescriptor::Rating Rating; + for (SI::Loop::Iterator it3; prd->ratingLoop.getNext(Rating, it3); ) { + if (I18nIsPreferredLanguage(Setup.EPGLanguages, Rating.languageCode, LanguagePreferenceRating)) { + int ParentalRating = (Rating.getRating() & 0xFF); + switch (ParentalRating) { + // values defined by the DVB standard (minimum age = rating + 3 years): + case 0x01 ... 0x0F: + ParentalRating += 3; + break; + // values defined by broadcaster CSAT (now why didn't they just use 0x07, 0x09 and 0x0D?): + case 0x11: + ParentalRating = 10; + break; + case 0x12: + ParentalRating = 12; + break; + case 0x13: + ParentalRating = 16; + break; + default: + ParentalRating = 0; + } + pEvent->SetParentalRating(ParentalRating); + } + } + } + break; + case SI::PDCDescriptorTag: { + SI::PDCDescriptor * pd = (SI::PDCDescriptor *) d; + time_t now = time (NULL); + struct tm tm_r; + struct tm t = *localtime_r (&now, &tm_r); // this initializes the time zone in 't' + t.tm_isdst = -1; // makes sure mktime() will determine the correct DST setting + int month = t.tm_mon; + t.tm_mon = pd->getMonth () - 1; + t.tm_mday = pd->getDay (); + t.tm_hour = pd->getHour (); + t.tm_min = pd->getMinute (); + t.tm_sec = 0; + if (month == 11 && t.tm_mon == 0) // current month is dec, but event is in jan + t.tm_year++; + else if (month == 0 && t.tm_mon == 11) // current month is jan, but event is in dec + t.tm_year--; + time_t vps = mktime (&t); + pEvent->SetVps (vps); + } + break; + case SI::TimeShiftedEventDescriptorTag: { + SI::TimeShiftedEventDescriptor * tsed = (SI::TimeShiftedEventDescriptor *) d; + cSchedule *rSchedule = + (cSchedule *) Schedules-> + GetSchedule (tChannelID (Source, channel->Nid (), channel->Tid (), tsed->getReferenceServiceId ())); + if (!rSchedule) + break; + rEvent = (cEvent *) rSchedule->GetEvent (tsed->getReferenceEventId ()); + if (!rEvent) + break; + pEvent->SetTitle (rEvent->Title ()); + pEvent->SetShortText (rEvent->ShortText ()); + pEvent->SetDescription (rEvent->Description ()); + } + break; + case SI::LinkageDescriptorTag: { + SI::LinkageDescriptor * ld = (SI::LinkageDescriptor *) d; + tChannelID linkID (Source, ld->getOriginalNetworkId (), ld->getTransportStreamId (), ld->getServiceId ()); + if (ld->getLinkageType () == 0xB0) { // Premiere World + time_t now = time (NULL); + bool hit = SiEitEvent.getStartTime () <= now + && now < SiEitEvent.getStartTime () + SiEitEvent.getDuration (); + if (hit) { + char linkName[ld->privateData.getLength () + 1]; + strn0cpy (linkName, (const char *) ld->privateData.getData (), sizeof (linkName)); + // TODO is there a standard way to determine the character set of this string? + cChannel *link = Channels.GetByChannelID (linkID); + if (link != channel) { // only link to other channels, not the same one + //fprintf(stderr, "Linkage %s %4d %4d %5d %5d %5d %5d %02X '%s'\n", hit ? "*" : "", channel->Number(), link ? link->Number() : -1, SiEitEvent.getEventId(), ld->getOriginalNetworkId(), ld->getTransportStreamId(), ld->getServiceId(), ld->getLinkageType(), linkName);//XXX + if (link) { + if (Setup.UpdateChannels == 1 || Setup.UpdateChannels >= 3) + link->SetName (linkName, "", ""); + } else if (Setup.UpdateChannels >= 4) { + cChannel *transponder = channel; + if (channel->Tid () != ld->getTransportStreamId ()) + transponder = Channels.GetByTransponderID (linkID); + link = + Channels.NewChannel (transponder, linkName, "", "", ld->getOriginalNetworkId (), + ld->getTransportStreamId (), ld->getServiceId ()); + } + if (link) { + if (!LinkChannels) + LinkChannels = new cLinkChannels; + LinkChannels->Add (new cLinkChannel (link)); + } + } else + channel->SetPortalName (linkName); + } + } + } + break; + case SI::ComponentDescriptorTag: { + SI::ComponentDescriptor * cd = (SI::ComponentDescriptor *) d; + uchar Stream = cd->getStreamContent (); + uchar Type = cd->getComponentType (); + //if (1 <= Stream && Stream <= 3 && Type != 0) { // 1=video, 2=audio, 3=subtitles + if (1 <= Stream && Stream <= 6 && Type != 0) { // 1=MPEG2-video, 2=MPEG1-audio, 3=subtitles, 4=AC3-audio, 5=H.264-video, 6=HEAAC-audio + if (!Components) + Components = new cComponents; + char buffer[Utf8BufSize (256)]; + Components->SetComponent (Components->NumComponents (), Stream, Type, + I18nNormalizeLanguageCode (cd->languageCode), + cd->description.getText (buffer, sizeof (buffer))); + } + } + break; + case SI::DishExtendedEventDescriptorTag: { + SI::UnimplementedDescriptor *deed = (SI::UnimplementedDescriptor *)d; + if (!DishEventDescriptor) { + DishEventDescriptor = new SI::DishDescriptor(); + } + DishEventDescriptor->setExtendedtData(Tid+1, deed->getData()); + HasExternalData = true; + } + break; + case SI::DishShortEventDescriptorTag: { + SI::UnimplementedDescriptor *dsed = (SI::UnimplementedDescriptor *)d; + if (!DishEventDescriptor) { + DishEventDescriptor = new SI::DishDescriptor(); + } + DishEventDescriptor->setShortData(Tid+1, dsed->getData()); + HasExternalData = true; + } + break; + case SI::DishRatingDescriptorTag: { + if (d->getLength() == 4) { + if (!DishEventDescriptor) { + DishEventDescriptor = new SI::DishDescriptor(); + } + uint16_t rating = d->getData().TwoBytes(2); + DishEventDescriptor->setRating(rating); + } + } + break; + case SI::DishSeriesDescriptorTag: { + if (d->getLength() == 10) { + //LogD(2, prep("DishSeriesDescriptorTag: %s)"), (const char*) d->getData().getData()); + if (!DishEventDescriptor) { + DishEventDescriptor = new SI::DishDescriptor(); + } + DishEventDescriptor->setEpisodeInfo(d->getData()); + } +// else { +// LogD(2, prep("DishSeriesDescriptorTag length: %d)"), d->getLength()); +// } + } + break; + default: + break; + } + delete d; + } + + if (!rEvent) { + if (ShortEventDescriptor) { + char buffer[Utf8BufSize (256)]; + unsigned char *f; + int l = ShortEventDescriptor->name.getLength(); + f = (unsigned char *) ShortEventDescriptor->name.getData().getData(); + decodeText2 (f, l, buffer, sizeof (buffer)); + //ShortEventDescriptor->name.getText(buffer, sizeof(buffer)); + pEvent->SetTitle (buffer); + l = ShortEventDescriptor->text.getLength(); + f = (unsigned char *) ShortEventDescriptor->text.getData().getData(); + decodeText2 (f, l, buffer, sizeof (buffer)); + //ShortEventDescriptor->text.getText(buffer, sizeof(buffer)); + pEvent->SetShortText (buffer); + } else if (!HasExternalData) { + pEvent->SetTitle (NULL); + pEvent->SetShortText (NULL); + } + if (ExtendedEventDescriptors) { + char buffer[Utf8BufSize (ExtendedEventDescriptors->getMaximumTextLength (": ")) + 1]; + pEvent->SetDescription (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": ")); + } else if (!HasExternalData) + pEvent->SetDescription (NULL); + + if (DishEventDescriptor) { + if (DishEventDescriptor->getName()) + pEvent->SetTitle(DishEventDescriptor->getName()); + //LogD(2, prep("channelID: %s DishTitle: %s"), *channel->GetChannelID().ToString(), DishShortEventDescriptor->getText()); +// pEvent->SetDescription(DishExtendedEventDescriptor->getText()); + char *tmp; + string fmt; + fmt = "%s"; + if (0 != strcmp(DishEventDescriptor->getShortText(),"") && DishEventDescriptor->hasTheme()) { + fmt += " - "; + } + fmt += "%s"; + if (DishEventDescriptor->hasTheme() && DishEventDescriptor->hasCategory()) { + fmt += " ~ "; + } + fmt += "%s"; + + Asprintf (&tmp, fmt.c_str(), DishEventDescriptor->getShortText() + , DishEventDescriptor->getTheme() + , DishEventDescriptor->getCategory()); + pEvent->SetShortText(tmp); + //LogD(2, prep("EEPGDEBUG:DishTheme:%x-DishCategory:%x)"), DishTheme, DishCategory); + free(tmp); + + fmt = "%s"; + if (0 != strcmp(DishEventDescriptor->getDescription(),"") + && (0 != strcmp(DishEventDescriptor->getRating(),"") + || 0 != strcmp(DishEventDescriptor->getStarRating(),""))) { + fmt += "\nRating: "; + } + fmt += "%s %s"; + if (0 != strcmp(DishEventDescriptor->getProgramId(),"")) { + fmt += "\n Program ID: "; + } + fmt += "%s %s"; + time_t orgAirDate = DishEventDescriptor->getOriginalAirDate(); + fmt += orgAirDate == 0 ? "%s" : " Original Air Date: %s"; + LogD(3, prep("DishSeriesDescriptorTag2: %s %s %d %s)"), DishEventDescriptor->getProgramId() + , DishEventDescriptor->getSeriesId() + , orgAirDate + , orgAirDate == 0 ? "" : asctime(localtime(&orgAirDate))); + Asprintf (&tmp, fmt.c_str(), DishEventDescriptor->getDescription() + , DishEventDescriptor->getRating() + , DishEventDescriptor->getStarRating() + , DishEventDescriptor->getProgramId() + , DishEventDescriptor->getSeriesId() +<<<<<<< .mine , orgAirDate == 0 ? "" : asctime(localtime(&orgAirDate))); +======= , orgAirDate == 0 ? "" : asctime(localtime(&orgAirDate)) (&orgAirDate)); +>>>>>>> .theirs pEvent->SetDescription(tmp); + free(tmp); + + + //LogD(2, prep("DishDescription: %s"), DishExtendedEventDescriptor->getText()); + //LogD(2, prep("DishShortText: %s"), DishExtendedEventDescriptor->getShortText()); + } + } + delete ExtendedEventDescriptors; + delete ShortEventDescriptor; + delete DishEventDescriptor; + + pEvent->SetComponents (Components); + +// LogD(2, prep("channelID: %s Title: %s"), *channel->GetChannelID().ToString(), pEvent->Title()); + +// if (pEvent->ChannelID() == tChannelID::FromString("S119.0W-4100-6-110-110")) { +// LogD(2, prep("ID: %d Title: %s Time: %d Tid: 0x%x"), pEvent->EventID(), pEvent->Title(), pEvent->StartTime(), pEvent->TableID()); +// } + + if (!HasExternalData) + pEvent->FixEpgBugs (); + if (LinkChannels) + channel->SetLinkChannels (LinkChannels); + Modified = true; +#ifdef USE_DDEPGENTRY + //to avoid double epg-entrys from ext and int epg sources :EW + if (pEvent && pEvent->TableID () != 0x00) { + cEvent *pPreviousEvent = (cEvent *) pSchedule->GetPreviousEvent (pEvent); + if (pPreviousEvent) { + if (Setup.DoubleEpgAction == 0) { + pPreviousEvent->SetStartTime (pEvent->StartTime ()); + pPreviousEvent->SetDuration (pEvent->Duration ()); + if (Setup.DisableVPS == 0) { + if (channel) + pPreviousEvent->SetRunningStatus (pEvent->RunningStatus (), channel); + else + pPreviousEvent->SetRunningStatus (pEvent->RunningStatus ()); + } + // to use the info of the original epg, update the extern one, + // if it has less info + char buffer_short_intern[256]; + char buffer_short_extern[256]; + int len_short_intern = 0; + int len_short_extern = 0; + if (pEvent->ShortText ()) + len_short_intern = + snprintf (buffer_short_intern, sizeof (buffer_short_intern) - 1, "%s", pEvent->ShortText ()); + if (pPreviousEvent->ShortText ()) + len_short_extern = + snprintf (buffer_short_extern, sizeof (buffer_short_extern) - 1, "%s", pPreviousEvent->ShortText ()); + if (len_short_intern > 0) { + if (len_short_extern < 1) + pPreviousEvent->SetShortText (buffer_short_intern); + else if (len_short_intern > len_short_extern) + pPreviousEvent->SetShortText (buffer_short_intern); + } + if (pEvent->Description ()) { + char buffer_title_intern[4096]; + char buffer_title_extern[4096]; + int len_title_intern = 0; + int len_title_extern = 0; + if (pEvent->Description ()) + len_title_intern = + snprintf (buffer_title_intern, sizeof (buffer_title_intern) - 1, "%s", pEvent->Description ()); + if (pPreviousEvent->Description ()) + len_title_extern = + snprintf (buffer_title_extern, sizeof (buffer_title_extern) - 1, "%s", + pPreviousEvent->Description ()); + if (len_title_intern > 0) { + if (len_title_extern < 1) + pPreviousEvent->SetDescription (buffer_title_intern); + else if (len_title_intern > len_title_extern) + pPreviousEvent->SetDescription (buffer_title_intern); + } + } + if (pPreviousEvent->Vps () == 0 && pEvent->Vps () != 0) + pPreviousEvent->SetVps (pEvent->Vps ()); + pSchedule->DelEvent (pEvent); + pPreviousEvent->FixEpgBugs (); + } else + pSchedule->DelEvent (pPreviousEvent); + } + } +#endif /* DDEPGENTRY */ + } + if (Empty && Tid == 0x4E && getSectionNumber () == 0) + // ETR 211: an empty entry in section 0 of table 0x4E means there is currently no event running + pSchedule->ClrRunningStatus (channel); + if (Tid == 0x4E) + pSchedule->SetPresentSeen (); + if (OnlyRunningStatus) { + LogD(2, prep("OnlyRunningStatus")); + return; + } + if (Modified) { + pSchedule->Sort (); + if (!HasExternalData) + pSchedule->DropOutdated (SegmentStart, SegmentEnd, Tid, getVersionNumber ()); + Schedules->SetModified (pSchedule); + } + LogD(2, prep("end of cEIT2")); + +} +//end of cEIT2 + +} //end namespace SI + +void cFilterEEPG::ProcessNextFormat (bool FirstTime = false) +{ + /* for (int i = 0; i <= HIGHEST_FORMAT; i++) + esyslog ("EEPGDEBUG: Format %i on pid %x", i, UnprocessedFormat[i]); */ + + if (!FirstTime) { + isyslog ("EEPG: found %i equivalents channels", nEquivChannels); + isyslog ("EEPG: found %i themes", nThemes); + isyslog ("EEPG: found %i channels", nChannels); + isyslog ("EEPG: found %i titles", nTitles); + isyslog ("EEPG: found %i summaries", nSummaries); + isyslog ("EEPG: written %i titles", TitleCounter); + isyslog ("EEPG: written %i summaries", SummaryCounter); + isyslog ("EEPG: rejected %i titles/summaries because of higher TableId", RejectTableId); + //Send message when finished + if (SetupPE.DisplayMessage) { + char *mesg; + Asprintf(&mesg, "EEPG: written %i summaries", SummaryCounter); + Skins.QueueMessage(mtInfo, mesg, 2); + free(mesg); + } + + TitleCounter = 0; + SummaryCounter = 0; + /*if (SummariesNotFound != 0) + esyslog ("EEPG: %i summaries not found", SummariesNotFound); + else if (VERBOSE >= 1) + isyslog ("EEPG: %i summaries not found", SummariesNotFound); */ + UnprocessedFormat[Format] = 0; //clear previously processed format + + //Next few lines prevent eepg from reading multiple eepg-systems on one transponder e.g. CDNL + //isyslog ("EEPG: Ended all processing"); + //return; + //If you remove these lines, multiple systems WILL be read + + } + TitleCounter = 0; + SummaryCounter = 0; + RejectTableId = 0; + //cleanup mess of last processing + ChannelSeq.clear (); + FreeTitles (); + FreeSummaries (); + + //now start looking for next format to process + int pid; + for (int i = 0; i <= HIGHEST_FORMAT; i++){ //find first format that is detected + if (UnprocessedFormat[i]) { + isyslog ("EEPG: %s Extended EPG detected on pid %x.", FormatName[i], UnprocessedFormat[i]); + Format = (EFormat)i; + // highest format is processed first this way + // make sure that CONT protocols like Premiere, Freesat are processed + // AFTER ONCE protocols like MHW, SKY and NAGRA + break; + } + if (i == HIGHEST_FORMAT) { //there are no formats left to process + isyslog ("EEPG: Ended all processing"); + return; + } + } + + pid = UnprocessedFormat[Format]; //and reinstall its pid + + memset (&InitialChannel, 0, 8); + memset (&InitialTitle, 0, 64); + memset (&InitialSummary, 0, 64); + NagraCounter = 0; + Version = -1; //because 0 can be a valid version number... + nEquivChannels = 0; + nChannels = 0; + nThemes = 0; + EndChannels = false; + EndThemes = false; + switch (Format) { + case PREMIERE: + if (!Matches (pid, 0xA0)) + Add (pid, 0xA0); + break; + case MHW1: + AddFilter (0xd3, 0x92); //ThemesMHW1//TODO: all filters are serialized, strictly speaking Themes is non-fatal... + break; + case MHW2: + AddFilter (0x231, 0xc8); //MHW2 Channels & Themes + break; + case SKY_IT: + case SKY_UK: + AddFilter (0x11, 0x4a); //Sky Channels + break; + case FREEVIEW: //Freeview, CONT mode //TODO streamline this for other modes + ReadFileDictionary (); + AddFilter (pid, 0x4e, 0xfe); //event info, actual(0x4e)/other(0x4f) TS, present/following + AddFilter (pid, 0x50, 0xf0); //event info, actual TS, schedule(0x50)/schedule for future days(0x5X) + AddFilter (pid, 0x60, 0xf0); //event info, other TS, schedule(0x60)/schedule for future days(0x6X) + AddFilter (0x39, 0x50, 0xf0); //event info, actual TS, Viasat + AddFilter (0x39, 0x60, 0xf0); //event info, other TS, Viasat + break; + case NAGRA: + AddFilter (pid, 0xb0); //perhaps TID is equal to first data byte? + break; + case DISH_BEV: + AddFilter (0x12, 0, 0); // event info, actual(0x4e)/other(0x4f) TS, present/following + AddFilter (0x0300, 0, 0); // Dish Network EEPG event info, actual(0x4e)/other(0x4f) TS, present/following + AddFilter (0x0441, 0, 0); // Dish Network EEPG event info, actual(0x4e)/other(0x4f) TS, present/following +// AddFilter (0x0441, 0x50, 0xf0); // Bell ExpressVU EEPG +// AddFilter (0x0441, 0x60, 0xf0); // Bell ExpressVU EEPG + break; + default: + break; + } +} + +void cFilterEEPG::ProccessContinuous(u_short Pid, u_char Tid, int Length, const u_char *Data) +{ + //0x39 Viasat, 0x0300 Dish Network EEPG, 0x0441 Bell ExpressVU EEPG + LogD(4, prep("Pid: 0x%02x Tid: %d Length: %d"), Pid, Tid, Length); + cSchedulesLock SchedulesLock(true, 10); + cSchedules *Schedules = (cSchedules*)(cSchedules::Schedules(SchedulesLock)); + //Look for other satelite positions only if Dish/Bell ExpressVU for the moment hardcoded pid check + if(Schedules) + SI::cEIT2 EIT(Schedules, Source(), Tid, Data); + + else//cEIT EIT (Schedules, Source (), Tid, Data); + { + // If we don't get a write lock, let's at least get a read lock, so + // that we can set the running status and 'seen' timestamp (well, actually + // with a read lock we shouldn't be doing that, but it's only integers that + // get changed, so it should be ok) + cSchedulesLock SchedulesLock; + cSchedules *Schedules = (cSchedules*)(cSchedules::Schedules(SchedulesLock)); + if(Schedules) + SI::cEIT2 EIT(Schedules, Source(), Tid, Data, true); + + //cEIT EIT (Schedules, Source (), Tid, Data, true); + } +} + +void cFilterEEPG::Process (u_short Pid, u_char Tid, const u_char * Data, int Length) +{ + int now = time (0); +// LogD(2, prep("Pid: 0x%02x Tid: %d Length: %d PMT pid: 0x%04x"), Pid, Tid, Length, pmtpid); +// LogD(2, prep("Source: %d Transponder: %d"), Source () , Transponder ()); + + if (Pid == 0 && Tid == SI::TableIdPAT) { + if (!pmtnext || now > pmtnext) { + if (pmtpid) + NextPmt (); + if (!pmtpid) { + SI::PAT pat (Data, false); + if (pat.CheckCRCAndParse ()) { + SI::PAT::Association assoc; + int idx = 0; + for (SI::Loop::Iterator it; pat.associationLoop.getNext (assoc, it);) { + if (!assoc.isNITPid ()) { + //if (!assoc.isNITPid () && Scanning) { + if (idx++ == pmtidx) { + pmtpid = assoc.getPid (); + pmtsid = assoc.getServiceId (); + Add (pmtpid, 0x02); + pmtnext = now + PMT_SCAN_TIMEOUT; + LogI(3, prep("PMT pid now 0x%04x (idx=%d)\n"), pmtpid, pmtidx); + break; + } + } + } + if (!pmtpid) { + pmtidx = 0; + pmtnext = now + PMT_SCAN_IDLE; + LogI(1, prep("PMT scan idle\n")); + + Del (0, 0); //this effectively kills the PMT_SCAN_IDLE functionality + + //now after the scan is completed, start processing + ProcessNextFormat (true); //FirstTime flag is set + } + } + } + } + } else if (pmtpid > 0 && Pid == pmtpid && Tid == SI::TableIdPMT && Source () && Transponder ()) { + SI::PMT pmt (Data, false); + if (pmt.CheckCRCAndParse () && pmt.getServiceId () == pmtsid) { + SI::PMT::Stream stream; + for (SI::Loop::Iterator it; pmt.streamLoop.getNext (stream, it);) { + LogD(2, prep("StreamType: 0x%02x"), stream.getStreamType ()); + if (stream.getStreamType () == 0x05 || stream.getStreamType () == 0xc1) { //0x05 = Premiere, SKY, Freeview, Nagra 0xc1 = MHW1,MHW2; + SI::CharArray data = stream.getData (); + if ((data[1] & 0xE0) == 0xE0 && (data[3] & 0xF0) == 0xF0) { + bool prvData = false, usrData = false; + bool prvOTV = false, prvFRV = false; + int usrOTV = 0, usrFRV = 0; + if (data[2]==0x39) {//TODO Test This + prvFRV = true; + usrFRV = 1; + LogD(1, prep("if (data[2]==0x39) {//TODO Test This")); + } + //Format = 0; // 0 = premiere, 1 = MHW1, 2 = MHW2, 3 = Sky Italy (OpenTV), 4 = Sky UK (OpenTV), 5 = Freesat (Freeview), 6 = Nagraguide + SI::Descriptor * d; + for (SI::Loop::Iterator it; (d = stream.streamDescriptors.getNext (it));) { + LogD(2, prep("EEPGDEBUG:d->getDescriptorTAG():%x,SI::PrivateTag:%x\n"), d->getDescriptorTag (), SI::PrivateDataSpecifierDescriptorTag); + switch (d->getDescriptorTag ()) { + case SI::PrivateDataSpecifierDescriptorTag: + //esyslog ("prv: %d %08x\n", d->getLength (), d->getData ().FourBytes (2)); + if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x000000be) + prvData = true; + if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x4f545600) //OpenTV + prvOTV = true; + if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x46534154) //Freeview + prvFRV = true; + break; + case 0x52: + //if (d->getLength () == 3 && d->getData ().FourBytes (2) == 0xb07ea882) { + if (d->getLength () == 3 && ((d->getData ().TwoBytes (2) & 0xff00) == 0xb000)) + UnprocessedFormat[NAGRA] = stream.getPid (); + break; + case 0x90: + //esyslog ("usr: %d %08x\n", d->getLength (), d->getData ().FourBytes (2)); + if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x0000ffff) + usrData = true; + if (d->getLength () == 3 && ((d->getData ().TwoBytes (2) & 0xff00) == 0xb600)) //SKY IT //TODO ugly! + //if (d->getLength () == 3 && (d->getData ().TwoBytes (2) == 0xb6a5)) //SKY IT //TODO ugly! + usrOTV = SKY_IT; + //Format = SKY_IT; + if (d->getLength () == 3 && d->getData ().FourBytes (2) == 0xc004e288) //SKY UK + usrOTV = SKY_UK; + //Format = SKY_UK; + break; + case 0xc1: //MHW1, MHW2 +// esyslog("EEPGDEBUG:d->getDescriptorTAG:%d %08x\n",d->getLength(),d->getData().FourBytes(2)); + if (d->getLength () == 10 && d->getData ().FourBytes (2) == 0x50555348) //MHw1 Cyfra + UnprocessedFormat[MHW1] = stream.getPid (); + break; + case 0xc2: //MHW1, MHW2 + if (d->getLength () == 10 && d->getData ().FourBytes (2) == 0x45504700) //MHw1 CanDigNL and CSat + UnprocessedFormat[MHW1] = stream.getPid (); + else if (d->getLength () == 10 && d->getData ().FourBytes (2) == 0x46494348) { //MHW2 + UnprocessedFormat[MHW2] = stream.getPid (); + } + break; + case 0xd1: //Freeview + LogD(1, prep("case 0xd1: //Freeview")); + if (d->getLength () == 3 && ((d->getData ().TwoBytes (2) & 0xff00) == 0x0100)) + usrFRV = 0x01; + //01 = EIT pid 3842 + //03 04 = SDT Service Description Table pid 3841 + //07 = still undocumented, definition of buch of transport streams pid 3840 + //02 = ATSC reserved, find out what huffman encoded text is sent here! pid 3843 + //05 06 = TOT Time Offset Table pid 3844 + break; + + /* case 0xfe: //SKY_IT + if (d->getLength () == 6 && d->getData ().FourBytes (2) == 0x534b5900) { //SKY_IT + Format = SKY_IT; + } + break;*/ + default: + break; + } + delete d; + } + if ((prvOTV) && ((usrOTV == SKY_IT) || (usrOTV == SKY_UK))) + UnprocessedFormat[usrOTV] = stream.getPid (); + else if (prvFRV) + if (usrFRV == 0x01) + UnprocessedFormat[FREEVIEW] = stream.getPid (); + if (prvData && usrData) + UnprocessedFormat[PREMIERE] = stream.getPid (); + //TODO DPE this is not good since the DISH/BEV filters are always on, but have to test somehow. + //EEPG:12472:H:S119.0W:20000:0:0:0:0:36862:4100:18:36862 + if (((Source() == cSource::FromString("S119.0W") + && Transponder() == cChannel::Transponder(12472,'H')) + || (Source() == cSource::FromString("S91.0W") + && Transponder() == cChannel::Transponder(12224,'R'))) + && !UnprocessedFormat[DISH_BEV]) { + UnprocessedFormat[DISH_BEV] = stream.getPid (); + } + } //if data[1] && data [3] + } //if streamtype + /*if (Format != PREMIERE) //any format found + break; //break out for loop */ + } //for loop that walks through streams +// if (Format == PREMIERE) { //FIXME for Premiere you should also stop scanning when found... + NextPmt (); + pmtnext = 0; + /* } + else { + Del (pmtpid, 0x02); + Del (0, 0); + pmtidx = 0; + pmtnext = now + PMT_SCAN_IDLE; + isyslog ("PMT scan forced idle\n"); + }*/ + } //checkCRC + } //if pmtpid + else if (Source ()) { + + if ( Pid == 0x12 || Pid == 0x0300 || Pid == 0x0441 ) { + if (Tid >= 0x4E) + ProccessContinuous(Pid, Tid, Length, Data); + return; + } + int Result; + switch (Tid) { + case 0xA0: //TODO DPE test this missing break but it seems a bug + if ((Pid < 0x30) || (Pid > 0x37)) { + SI::PremiereCIT cit (Data, false); + if (cit.CheckCRCAndParse ()) { + cSchedulesLock SchedulesLock (true, 10); + cSchedules *Schedules = (cSchedules *) cSchedules::Schedules (SchedulesLock); + if (Schedules) { + int nCount = 0; + int nRating = 0; + SI::ExtendedEventDescriptors * ExtendedEventDescriptors = 0; + SI::ShortEventDescriptor * ShortEventDescriptor = 0; + char *order = 0, *rating = 0; + { + time_t firstTime = 0; + SI::Descriptor * d; + bool UseExtendedEventDescriptor = false; + int LanguagePreferenceShort = -1; + int LanguagePreferenceExt = -1; + for (SI::Loop::Iterator it; (d = cit.eventDescriptors.getNext (it));) { + switch (d->getDescriptorTag ()) { + case 0xF0: // order information + if (SetupPE.OrderInfo) { + static const char *text[] = { + trNOOP ("Ordernumber"), + trNOOP ("Price"), + trNOOP ("Ordering"), + trNOOP ("SMS"), + trNOOP ("WWW") + }; + char buff[512]; + int p = 0; + const unsigned char *data = d->getData ().getData () + 2; + for (int i = 0; i < 5; i++) { + int l = data[0]; + if (l > 0) + p += snprintf (&buff[p], sizeof (buff) - p, "\n%s: %.*s", tr (text[i]), l, &data[1]); + data += l + 1; + } + if (p > 0) + order = strdup (buff); + } + break; + case 0xF1: // parental rating + if (SetupPE.RatingInfo) { + char buff[512]; + int p = 0; + const unsigned char *data = d->getData ().getData () + 2; + nRating = data[0] + 3; + p += snprintf (&buff[p], sizeof (buff) - p, "\n%s: %d %s", tr ("Rating"), nRating, tr ("years")); + data += 7; + int l = data[0]; + if (l > 0) + p += snprintf (&buff[p], sizeof (buff) - p, " (%.*s)", l, &data[1]); + if (p > 0) + rating = strdup (buff); + } + break; + case SI::PremiereContentTransmissionDescriptorTag: + if (nCount >= 0) { + SI::PremiereContentTransmissionDescriptor * pct = (SI::PremiereContentTransmissionDescriptor *) d; + nCount++; + SI::PremiereContentTransmissionDescriptor::StartDayEntry sd; + SI::Loop::Iterator it; + if (pct->startDayLoop.getNext (sd, it)) { + SI::PremiereContentTransmissionDescriptor::StartDayEntry::StartTimeEntry st; + SI::Loop::Iterator it2; + if (sd.startTimeLoop.getNext (st, it2)) { + time_t StartTime = st.getStartTime (sd.getMJD ()); + if (nCount == 1) + firstTime = StartTime; + else if (firstTime < StartTime - 5 * 50 || firstTime > StartTime + 5 * 60) + nCount = -1; + } + } + } + break; + case SI::ExtendedEventDescriptorTag: { + SI::ExtendedEventDescriptor * eed = (SI::ExtendedEventDescriptor *) d; + if (I18nIsPreferredLanguage (Setup.EPGLanguages, eed->languageCode, LanguagePreferenceExt) + || !ExtendedEventDescriptors) { + delete ExtendedEventDescriptors; + ExtendedEventDescriptors = new SI::ExtendedEventDescriptors; + UseExtendedEventDescriptor = true; + } + if (UseExtendedEventDescriptor) { + ExtendedEventDescriptors->Add (eed); + d = NULL; // so that it is not deleted + } + if (eed->getDescriptorNumber () == eed->getLastDescriptorNumber ()) + UseExtendedEventDescriptor = false; + } + break; + case SI::ShortEventDescriptorTag: { + SI::ShortEventDescriptor * sed = (SI::ShortEventDescriptor *) d; + if (I18nIsPreferredLanguage (Setup.EPGLanguages, sed->languageCode, LanguagePreferenceShort) + || !ShortEventDescriptor) { + delete ShortEventDescriptor; + ShortEventDescriptor = sed; + d = NULL; // so that it is not deleted + } + } + break; + default: + break; + } + delete d; + } + } + + { + bool Modified = false; + int optCount = 0; + unsigned int crc[3]; + crc[0] = cit.getContentId (); + SI::PremiereContentTransmissionDescriptor * pct; + for (SI::Loop::Iterator it; + (pct = + (SI::PremiereContentTransmissionDescriptor *) cit.eventDescriptors.getNext (it, + SI:: + PremiereContentTransmissionDescriptorTag));) { + int nid = pct->getOriginalNetworkId (); + int tid = pct->getTransportStreamId (); + int sid = pct->getServiceId (); + if (SetupPE.FixEpg) { + if (nid == 133) { + if (tid == 0x03 && sid == 0xf0) { + tid = 0x02; + sid = 0xe0; + } else if (tid == 0x03 && sid == 0xf1) { + tid = 0x02; + sid = 0xe1; + } else if (tid == 0x03 && sid == 0xf5) { + tid = 0x03; + sid = 0xdc; + } else if (tid == 0x04 && sid == 0xd2) { + tid = 0x11; + sid = 0xe2; + } else if (tid == 0x11 && sid == 0xd3) { + tid = 0x11; + sid = 0xe3; + } + } + } + tChannelID channelID (Source (), nid, tid, sid); + cChannel *channel = Channels.GetByChannelID (channelID, true); +#ifdef USE_NOEPG + // only use epg from channels not blocked by noEPG-patch + if (!allowedEPG (channelID)) + continue; +#endif /* NOEPG */ + + if (!channel) + continue; + + cSchedule *pSchedule = (cSchedule *) Schedules->GetSchedule (channelID); + if (!pSchedule) { + pSchedule = new cSchedule (channelID); + Schedules->Add (pSchedule); + } + + optCount++; + SI::PremiereContentTransmissionDescriptor::StartDayEntry sd; + int index = 0; + for (SI::Loop::Iterator it; pct->startDayLoop.getNext (sd, it);) { + int mjd = sd.getMJD (); + SI::PremiereContentTransmissionDescriptor::StartDayEntry::StartTimeEntry st; + for (SI::Loop::Iterator it2; sd.startTimeLoop.getNext (st, it2);) { + time_t StartTime = st.getStartTime (mjd); + time_t EndTime = StartTime + cit.getDuration (); + int runningStatus = (StartTime < now + && now < EndTime) ? SI::RunningStatusRunning : ((StartTime - 30 < now + && now < + StartTime) ? SI:: + RunningStatusStartsInAFewSeconds + : SI::RunningStatusNotRunning); + bool isOpt = false; + if (index++ == 0 && nCount > 1) + isOpt = true; + crc[1] = isOpt ? optCount : 0; + crc[2] = StartTime / STARTTIME_BIAS; + tEventID EventId = ((('P' << 8) | 'W') << 16) | crc16 (0, (unsigned char *) crc, sizeof (crc)); + LogI(2, "%s R%d %04x/%.4x %d %d/%d %s +%d ", *channelID.ToString (), runningStatus, + EventId & 0xFFFF, cit.getContentId (), index, isOpt, optCount, + stripspace (ctime (&StartTime)), (int) cit.getDuration () / 60); + if (EndTime + Setup.EPGLinger * 60 < now) { + LogI(2, "(old)\n"); + continue; + } + + bool newEvent = false; + cEvent *pEvent = (cEvent *) pSchedule->GetEvent (EventId, -1); + if (!pEvent) { + LogI(2, "(new)\n"); + pEvent = new cEvent (EventId); + if (!pEvent) + continue; + newEvent = true; + } else { + LogI(2, "(upd)\n"); + pEvent->SetSeen (); + if (pEvent->TableID () == 0x00 || pEvent->Version () == cit.getVersionNumber ()) { + if (pEvent->RunningStatus () != runningStatus) + pSchedule->SetRunningStatus (pEvent, runningStatus, channel); + continue; + } + } + pEvent->SetEventID (EventId); + pEvent->SetTableID (Tid); + pEvent->SetVersion (cit.getVersionNumber ()); + pEvent->SetStartTime (StartTime); + pEvent->SetDuration (cit.getDuration ()); + + if (ShortEventDescriptor) { + char buffer[256]; + ShortEventDescriptor->name.getText (buffer, sizeof (buffer)); + if (isOpt) { + char buffer2[sizeof (buffer) + 32]; + snprintf (buffer2, sizeof (buffer2), optPats[SetupPE.OptPat], buffer, optCount); + pEvent->SetTitle (buffer2); + } else + pEvent->SetTitle (buffer); + LogI(2, "title: %s\n", pEvent->Title ()); + pEvent->SetShortText (ShortEventDescriptor->text.getText (buffer, sizeof (buffer))); + } + if (ExtendedEventDescriptors) { + char buffer[ExtendedEventDescriptors->getMaximumTextLength (": ") + 1]; + pEvent->SetDescription (ExtendedEventDescriptors->getText (buffer, sizeof (buffer), ": ")); + } + if (order || rating) { + int len = (pEvent->Description ()? strlen (pEvent->Description ()) : 0) + + (order ? strlen (order) : 0) + (rating ? strlen (rating) : 0); + char buffer[len + 32]; + buffer[0] = 0; + if (pEvent->Description ()) + strcat (buffer, pEvent->Description ()); + if (rating) { + strcat (buffer, rating); + pEvent->SetParentalRating(nRating); + } + if (order) + strcat (buffer, order); + pEvent->SetDescription (buffer); + } + + if (newEvent) + pSchedule->AddEvent (pEvent); + + pEvent->FixEpgBugs (); + if (pEvent->RunningStatus () != runningStatus) + pSchedule->SetRunningStatus (pEvent, runningStatus, channel); + pSchedule->DropOutdated (StartTime, EndTime, Tid, cit.getVersionNumber ()); + Modified = true; + } + } + if (Modified) { + pSchedule->Sort (); + Schedules->SetModified (pSchedule); + } + delete pct; + } + } + delete ExtendedEventDescriptors; + delete ShortEventDescriptor; + free (order); + free (rating); + } + } //if checkcrcandpars + break; + } //if citpid == 0xb11 Premiere + case 0xa1: + case 0xa2: + case 0xa3: + Result = GetTitlesSKYBOX (Data, Length - 4); + if (Result != 1) //when fatal error or finished + Del (Pid, 0xa0, 0xfc); //kill filter + if (Result == 0) { //fatal error + esyslog ("EEPG: Fatal error reading titles."); + ProcessNextFormat (); //and go process other formats + } + if (Result == 2) + AddFilter (Pid + 0x10, 0xa8, 0xfc); //Set filter that processes summaries of this batch + break; + case 0xa8: + case 0xa9: + case 0xaa: + case 0xab: + Result = GetSummariesSKYBOX (Data, Length - 4); + if (Result != 1) //when fatal error or finished + Del (Pid, 0xa8, 0xfc); //kill filter + if (Result == 0) { + esyslog ("EEPG: Fatal error reading summaries."); + ProcessNextFormat (); + } + if (Result == 2) { + LoadIntoSchedule (); + if (Pid < 0x47) //this is not the last batch//FIXME chaining is easy on the PIDs and the CPU, but error when Pid,Tid is not used at the moment... + AddFilter (Pid - 0x0F, 0xa0, 0xfc); //next pid, first tid + else //last pid was processed + ProcessNextFormat (); + } + break; + case 0x90: + if (Pid == 0xd2) { + Result = GetTitlesMHW1 (Data, Length); + if (Result != 1) //fatal error or last processed + Del (Pid, Tid); + if (Result == 0) { + esyslog ("EEPG: Fatal error reading titles."); + ProcessNextFormat (); + } + if (Result == 2) + AddFilter (0xd3, 0x90); //SummariesMHW1 + } else if (Pid == 0xd3) { + Result = GetSummariesMHW1 (Data, Length); + if (Result != 1) //fatal error or last processed + Del (Pid, Tid); + if (Result == 0) { + esyslog ("EEPG: Fatal error reading summaries."); + } + if (Result == 2) { + LoadIntoSchedule (); + } + if (Result != 1) { + ProcessNextFormat (); + } + } + break; + case 0xc8: //GetChannelsMHW2 or GetThemesMHW2 + if (Pid == 0x231) { + if (Data[3] == 0x01) { //Themes it will be + Result = GetThemesMHW2 (Data, Length); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed + //break; + if (Result != 1) + EndThemes = true; //also set Endthemes on true on fatal error + } //if Data + else if (Data[3] == 0x00) { //Channels it will be + Result = GetChannelsMHW (Data, Length, 2); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed + if (Result != 1) + EndChannels = true; //always remove filter, code 1 should never be returned since MHW2 always reads all channels.. + ChannelsOk = (Result == 2); + } + if (EndChannels && EndThemes) { //those are only set withing MHW2 + Del (0x231, 0xc8); //stop reading MHW2 themes and channels + if (ChannelsOk) //No channels = fatal, no themes = nonfatal + AddFilter (0x234, 0xe6); //start reading MHW2 titles + else { + esyslog ("EEPG: Fatal error reading channels."); + ProcessNextFormat (); + } + } + } //if Pid == 0x231 + break; + case 0x91: + Result = GetChannelsMHW (Data, Length, 1); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed + Del (Pid, Tid); //always remove filter, code 1 should never be returned since MHW1 always reads all channels... + if (Result == 2) + AddFilter (0xd2, 0x90); //TitlesMHW1 + else { + esyslog ("EEPG: Fatal error reading channels."); + ProcessNextFormat (); + } + break; + case 0x92: + Result = GetThemesMHW1 (Data, Length); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed + if (Result != 1) + Del (Pid, Tid); + if (Result == 2) + AddFilter (0xd3, 0x91); //ChannelsMHW1 + else { + esyslog ("EEPG: Fatal error reading themes."); //doesnt have to be fatal... + ProcessNextFormat (); + } + break; + case 0xe6: //TitlesMHW2 + if (Pid == 0x234) { + Result = GetTitlesMHW2 (Data, Length); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed + if (Result != 1) + Del (Pid, Tid); + if (Result == 0) { + esyslog ("EEPG: Fatal error reading titles."); + ProcessNextFormat (); + } + if (Result == 2) + AddFilter (0x236, 0x96); //start reading MHW2 summaries.... + } + break; + case 0x96: //Summaries MHW2 + if (Pid == 0x236) { + Result = GetSummariesMHW2 (Data, Length); //return code 0 = fatal error, code 1 = sucess, code 2 = last item processed + if (Result != 1) + Del (Pid, Tid); + if (Result == 0) { + esyslog ("EEPG: Fatal error reading summaries."); + } + if (Result == 2) + LoadIntoSchedule (); + if (Result != 1) { + ProcessNextFormat (); + } + } //if pid + break; + case 0x4a: //Sky channels + if (Pid == 0x11) { + Result = GetChannelsSKYBOX (Data, Length - 4); + if (Result != 1) //only breakoff on completion or error; do NOT clean up after success, because then not all bouquets will be read + Del (Pid, Tid); //Read all channels, clean up filter + if (Result == 2) { + GetThemesSKYBOX (); //Sky Themes from file; must be called AFTER first channels to have lThemes initialized FIXME + if (ReadFileDictionary ()) + AddFilter (0x30, 0xa0, 0xfc); //SKY Titles batch 0 of 7 + else { + esyslog ("EEPG: Fatal error reading huffman table."); + ProcessNextFormat (); + } + } + + } //if Pid == 0x11 + break; + case 0xb0: //NagraGuide + if (Pid == 0xc8) { + Result = GetNagra (Data, Length); + if (Result != 1) + Del (Pid, Tid); + if (Result == 0) { + esyslog ("EEPG: Fatal error processing NagraGuide. End of processing."); + } + if (Result == 2) { + ProcessNagra (); + cSchedules::Cleanup (true); //deletes all past events + isyslog ("EEPG: Ended processing Nagra"); + } + if (Result != 1) { + ProcessNextFormat (); + } + } + break; + + case 0x4E: + case 0x4F: + case 0x50: + case 0x51: + case 0x52: + case 0x53: + case 0x54: + case 0x55: + case 0x56: + case 0x57: + case 0x58: + case 0x59: + case 0x5A: + case 0x5B: + case 0x5C: + case 0x5D: + case 0x5E: + case 0x5F: + case 0x60: + case 0x61: + case 0x62: + case 0x63: + case 0x64: + case 0x65: + case 0x66: + case 0x67: + case 0x68: + case 0x69: + case 0x6A: + case 0x6B: + case 0x6C: + case 0x6D: + case 0x6E: + case 0x6F: + // Freesat: + // Set(3842, 0x4E, 0xFE); // event info, actual(0x4E)/other(0x4F) TS, present/following + // Set(3842, 0x50, 0xF0); // event info, actual TS, schedule(0x50)/schedule for future days(0x5X) + // Set(3842, 0x60, 0xF0); // event info, other TS, schedule(0x60)/schedule for future days(0x6X) + // + // PID found: 3841 (0x0f01) [SECTION: Service Description Table (SDT) - other transport stream] + // PID found: 3842 (0x0f02) [SECTION: Event Information Table (EIT) - other transport stream, schedule] + // PID found: 3843 (0x0f03) [SECTION: ATSC reserved] TODO find out what compressed text info is here! + // PID found: 3844 (0x0f04) [SECTION: Time Offset Table (TOT)] + + if (Pid == 3842 || Pid == 0x39) {//0x39 Viasat, 0x0300 Dish Network EEPG, 0x0441 Bell ExpressVU EEPG + ProccessContinuous(Pid, Tid, Length, Data); + } + break; + + default: + break; + } //end switch + } //closes SOURCE() +} //end of closing + +// --- cPluginEEPG ------------------------------------------------------ + +class cPluginEEPG:public cPlugin +{ +private: + struct { + cFilterEEPG *filter; + cDevice *device; + } epg[MAXDVBDEVICES]; + + void CheckCreateFile(const char* Name, const char *fileContent[]); + +public: + cPluginEEPG (void); + virtual const char *Version (void) { + return VERSION; + } + virtual const char *Description (void) { + return tr (DESCRIPTION); + } + virtual bool Start (void); + virtual void Stop (void); + virtual cMenuSetupPage *SetupMenu (void); + virtual bool SetupParse (const char *Name, const char *Value); +}; + +cPluginEEPG::cPluginEEPG (void) +{ + memset (epg, 0, sizeof (epg)); +} + +void cPluginEEPG::CheckCreateFile(const char* Name, const char *fileContent[]) +{ + FILE *File; + string FileName = string(ConfDir) + "/" + Name; + File = fopen(FileName.c_str(), "r"); + if (File == NULL) { + LogE (0, prep("Error opening file '%s', %s"), FileName.c_str(), strerror (errno)); + File = fopen (FileName.c_str(), "w"); + if (File == NULL) { + LogE (0, prep("Error creating file '%s', %s"), FileName.c_str(), strerror (errno)); + } else { + int i = 0; + while (fileContent[i] != NULL) { + fprintf (File, "%s\n", fileContent[i]); + i++; + } + LogI (0, prep("Success creating file '%s'"), FileName.c_str()); + fclose (File); + } + } else { + fclose (File); + } +} + +bool cPluginEEPG::Start (void) +{ +#if APIVERSNUM < 10507 + RegisterI18n (Phrases); +#endif + for (int i = 0; i < MAXDVBDEVICES; i++) { + cDevice *dev = cDevice::GetDevice (i); + if (dev) { + epg[i].device = dev; + dev->AttachFilter (epg[i].filter = new cFilterEEPG); + isyslog ("Attached EEPG filter to device %d", i); + } + } + ConfDir = NULL; + // Initialize any background activities the plugin shall perform. + DIR *ConfigDir; + if (ConfDir == NULL) { + Asprintf (&ConfDir, "%s/eepg", cPlugin::ConfigDirectory ()); + } + ConfigDir = opendir (ConfDir); + if (ConfigDir == NULL) { + esyslog ("EEPG: Error opening directory '%s', %s", ConfDir, strerror (errno)); + if (mkdir (ConfDir, 0777) < 0) { + esyslog ("EEPG: Error creating directory '%s', %s", ConfDir, strerror (errno)); + } else { + isyslog ("EEPG: Success creating directory '%s'", ConfDir); + } + } + CheckCreateFile(EEPG_FILE_EQUIV, FileEquivalences); + CheckCreateFile("sky_it.dict", SkyItDictionary); + CheckCreateFile("sky_uk.dict", SkyUkDictionary); + CheckCreateFile("sky_it.themes", SkyItThemes); + CheckCreateFile("sky_uk.themes", SkyUkThemes); + CheckCreateFile("freesat.t1", FreesatT1); + CheckCreateFile("freesat.t2", FreesatT2); + CheckCreateFile("sky_uk.themes", SkyUkThemes); + + //store all available sources, so when a channel is not found on current satellite, we can look for alternate sat positions. + //perhaps this can be done smarter through existing VDR function??? + for (cChannel * Channel = Channels.First (); Channel; Channel = Channels.Next (Channel)) { + if (!Channel->GroupSep ()) { + bool found = false; + for (int i = 0; (i < NumberOfAvailableSources) && (!found); i++) + found = (Channel->Source () == AvailableSources[i]); + if (!found) + AvailableSources[NumberOfAvailableSources++] = Channel->Source (); + } + } + if (CheckLevel(3)) + for (int i = 0; i < NumberOfAvailableSources; i++) + isyslog ("EEPG: Available sources:%s.", *cSource::ToString (AvailableSources[i])); + + + return true; +} + +void cPluginEEPG::Stop (void) +{ + for (int i = 0; i < MAXDVBDEVICES; i++) { + cDevice *dev = epg[i].device; + if (dev) + dev->Detach (epg[i].filter); + delete epg[i].filter; + epg[i].device = 0; + epg[i].filter = 0; + } + // Clean up after yourself! + if (ConfDir) { + free (ConfDir); + } +} + +cMenuSetupPage *cPluginEEPG::SetupMenu (void) +{ + return new cMenuSetupPremiereEpg; +} + +bool cPluginEEPG::SetupParse (const char *Name, const char *Value) +{ +// LogF(0, "!!!! Dime test LogF"); +// LogF(0, "!!!! Dime test LogF %d", 2); +// LogI(0, "!!!! Dime test LogI"); +// LogI(0, "!!!! Dime test LogI %d", 2); +// LogI(0, prep2("!!!! Dime test prep")); +// LogI(0, prep2("!!!! Dime test prep %d"), 2); +// LogD(0, "!!!! Dime test LogD"); +// LogD(0, "!!!! Dime test LogD %d", 2); +// LogE(0, "!!!! Dime test LogE"); +// LogE(0, "!!!! Dime test LogE %d", 2); + + + if (!strcasecmp (Name, "OptionPattern")) + SetupPE.OptPat = atoi (Value); + else if (!strcasecmp (Name, "OrderInfo")) + SetupPE.OrderInfo = atoi (Value); + else if (!strcasecmp (Name, "RatingInfo")) + SetupPE.RatingInfo = atoi (Value); + else if (!strcasecmp (Name, "FixEpg")) + SetupPE.FixEpg = atoi (Value); + else if (!strcasecmp (Name, "DisplayMessage")) + SetupPE.DisplayMessage = atoi (Value); +#ifdef DEBUG + else if (!strcasecmp (Name, "LogLevel")) + SetupPE.LogLevel = atoi (Value); +#endif + else + return false; + return true; +} + +VDRPLUGINCREATOR (cPluginEEPG); // Don't touch this!
\ No newline at end of file |