6e3207e07b6b8373e90b7ed2bdf67b3419c67739
[enigma2.git] / lib / dvb / db.cpp
1 #include <errno.h>
2 #include <lib/dvb/db.h>
3 #include <lib/dvb/frontend.h>
4 #include <lib/base/eerror.h>
5 #include <lib/base/estring.h>
6 #include <lib/dvb_si/sdt.h>
7 #include <lib/dvb_si/descriptor_tag.h>
8 #include <lib/dvb_si/service_descriptor.h>
9 #include <lib/dvb_si/satellite_delivery_system_descriptor.h>
10
11 DEFINE_REF(eDVBService);
12
13 eDVBService::eDVBService()
14 {
15 }
16
17 eDVBService::~eDVBService()
18 {
19 }
20
21 eDVBService &eDVBService::operator=(const eDVBService &s)
22 {
23         m_service_name = s.m_service_name;
24         m_provider_name = s.m_provider_name;
25         m_flags = s.m_flags;
26         m_ca = s.m_ca;
27         m_cache = s.m_cache;
28         return *this;
29 }
30
31 RESULT eDVBService::getName(const eServiceReference &ref, std::string &name)
32 {
33         name = convertDVBUTF8(m_service_name);
34         return 0;
35 }
36
37 int eDVBService::getLength(const eServiceReference &ref)
38 {
39         return -1;
40 }
41
42 int eDVBService::checkFilter(const eServiceReferenceDVB &ref, const eDVBChannelQuery &query)
43 {
44         int res = 0;
45         switch (query.m_type)
46         {
47         case eDVBChannelQuery::tName:
48                 res = m_service_name.find(query.m_string) != std::string::npos;
49                 break;
50         case eDVBChannelQuery::tProvider:
51                 res = m_provider_name.find(query.m_string) != std::string::npos;
52                 break;
53         case eDVBChannelQuery::tType:
54                 res = ref.getServiceType() == query.m_int;
55                 break;
56         case eDVBChannelQuery::tBouquet:
57                 res = 0;
58                 break;
59         case eDVBChannelQuery::tSatellitePosition:
60                 res = (ref.getDVBNamespace().get() >> 16) == query.m_int;
61                 break;
62         case eDVBChannelQuery::tChannelID:
63         {
64                 eDVBChannelID chid;
65                 ref.getChannelID(chid);
66                 res = chid == query.m_channelid;
67                 break;
68         }
69         case eDVBChannelQuery::tAND:
70                 res = checkFilter(ref, *query.m_p1) && checkFilter(ref, *query.m_p2);
71                 break;
72         case eDVBChannelQuery::tOR:
73                 res = checkFilter(ref, *query.m_p1) || checkFilter(ref, *query.m_p2);
74                 break;
75         }
76
77         if (query.m_inverse)
78                 return !res;
79         else
80                 return res;
81 }
82
83 int eDVBService::getCachePID(cacheID id)
84 {
85         std::map<int, int>::iterator it = m_cache.find(id);
86         if ( it != m_cache.end() )
87                 return it->second;
88         return -1;
89 }
90
91 void eDVBService::setCachePID(cacheID id, int pid)
92 {
93         m_cache[id] = pid;
94 }
95
96 DEFINE_REF(eDVBDB);
97
98 eDVBDB::eDVBDB()
99 {
100         eDebug("---- opening lame channel db");
101         FILE *f=fopen("lamedb", "rt");
102         if (!f)
103                 return;
104         char line[256];
105         if ((!fgets(line, 256, f)) || strncmp(line, "eDVB services", 13))
106         {
107                 eDebug("not a servicefile");
108                 fclose(f);
109                 return;
110         }
111         eDebug("reading services");
112         if ((!fgets(line, 256, f)) || strcmp(line, "transponders\n"))
113         {
114                 eDebug("services invalid, no transponders");
115                 fclose(f);
116                 return;
117         }
118         
119         // clear all transponders
120
121         while (!feof(f))
122         {
123                 if (!fgets(line, 256, f))
124                         break;
125                 if (!strcmp(line, "end\n"))
126                         break;
127                 int dvb_namespace=-1, transport_stream_id=-1, original_network_id=-1;
128                 sscanf(line, "%x:%x:%x", &dvb_namespace, &transport_stream_id, &original_network_id);
129                 if (original_network_id == -1)
130                         continue;
131                 eDVBChannelID channelid = eDVBChannelID(
132                         eDVBNamespace(dvb_namespace), 
133                         eTransportStreamID(transport_stream_id), 
134                         eOriginalNetworkID(original_network_id));
135                 
136                 ePtr<eDVBFrontendParameters> feparm = new eDVBFrontendParameters;
137                 while (!feof(f))
138                 {
139                         fgets(line, 256, f);
140                         if (!strcmp(line, "/\n"))
141                                 break;
142                         if (line[1]=='s')
143                         {
144                                 eDVBFrontendParametersSatellite sat;
145                                 int frequency, symbol_rate, polarisation, fec, orbital_position, inversion;
146                                 sscanf(line+2, "%d:%d:%d:%d:%d:%d", &frequency, &symbol_rate, &polarisation, &fec, &inversion, &orbital_position);
147                                 sat.frequency = frequency;
148                                 sat.symbol_rate = symbol_rate;
149                                 sat.polarisation = polarisation;
150                                 sat.fec = fec;
151                                 sat.orbital_position = orbital_position;
152                                 sat.inversion = inversion;
153                                 // ...
154 //                              t.setSatellite(frequency, symbol_rate, polarisation, fec, sat, inversion);
155                                 feparm->setDVBS(sat);
156                         }
157                         if (line[1]=='c')
158                         {
159                                 int frequency, symbol_rate, inversion=0, modulation=3;
160                                 sscanf(line+2, "%d:%d:%d:%d", &frequency, &symbol_rate, &inversion, &modulation);
161 //                              t.setCable(frequency, symbol_rate, inversion, modulation);
162                         }
163                 }
164                 addChannelToList(channelid, feparm);
165         }
166
167         if ((!fgets(line, 256, f)) || strcmp(line, "services\n"))
168         {
169                 eDebug("services invalid, no services");
170                 return;
171         }
172         
173         // clear all services
174         
175         int count=0;
176
177         while (!feof(f))
178         {
179                 if (!fgets(line, 256, f))
180                         break;
181                 if (!strcmp(line, "end\n"))
182                         break;
183
184                 int service_id=-1, dvb_namespace, transport_stream_id=-1, original_network_id=-1, service_type=-1, service_number=-1;
185                 sscanf(line, "%x:%x:%x:%x:%d:%d", &service_id, &dvb_namespace, &transport_stream_id, &original_network_id, &service_type, &service_number);
186                 if (service_number == -1)
187                         continue;
188                 ePtr<eDVBService> s = new eDVBService;
189                 eServiceReferenceDVB ref = 
190                                                 eServiceReferenceDVB(
191                                                 eDVBNamespace(dvb_namespace),
192                                                 eTransportStreamID(transport_stream_id),
193                                                 eOriginalNetworkID(original_network_id),
194                                                 eServiceID(service_id),
195                                                 service_type);
196                 count++;
197                 fgets(line, 256, f);
198                 if (strlen(line))
199                         line[strlen(line)-1]=0;
200                 s->m_service_name=line;
201                 fgets(line, 256, f);
202                 if (strlen(line))
203                         line[strlen(line)-1]=0;
204
205                 std::string str=line;
206
207                 if (str[1]!=':')        // old ... (only service_provider)
208                 {
209                         s->m_provider_name=line;
210                 } else
211                         while ((!str.empty()) && str[1]==':') // new: p:, f:, c:%02d...
212                         {
213                                 unsigned int c=str.find(',');
214                                 char p=str[0];
215                                 std::string v;
216                                 if (c == std::string::npos)
217                                 {
218                                         v=str.substr(2);
219                                         str="";
220                                 } else
221                                 {
222                                         v=str.substr(2, c-2);
223                                         str=str.substr(c+1);
224                                 }
225 //                              eDebug("%c ... %s", p, v.c_str());
226                                 if (p == 'p')
227                                         s->m_provider_name=v;
228                                 else if (p == 'f')
229                                 {
230                                         sscanf(v.c_str(), "%x", &s->m_flags);
231                                 } else if (p == 'c')
232                                 {
233                                         int cid, val;
234                                         sscanf(v.c_str(), "%02d%04x", &cid, &val);
235                                         s->m_cache[cid]=val;
236                                 } else if (p == 'C')
237                                 {
238                                         int val;
239                                         sscanf(v.c_str(), "%04x", &val);
240                                         s->m_ca.insert(val);
241                                 }
242                         }
243                 addService(ref, s);
244         }
245
246         eDebug("loaded %d services", count);
247         
248         fclose(f);
249         
250 }
251
252 eDVBDB::~eDVBDB()
253 {
254         eDebug("---- saving lame channel db");
255         FILE *f=fopen("lamedb", "wt");
256         int channels=0, services=0;
257         if (!f)
258                 eFatal("couldn't save lame channel db!"); 
259         fprintf(f, "eDVB services /3/\n");
260         fprintf(f, "transponders\n");
261         for (std::map<eDVBChannelID, channel>::const_iterator i(m_channels.begin());
262                         i != m_channels.end(); ++i)
263         {
264                 const eDVBChannelID &chid = i->first;
265                 const channel &ch = i->second;
266                 
267                 fprintf(f, "%08x:%04x:%04x\n", chid.dvbnamespace.get(),
268                                 chid.transport_stream_id.get(), chid.original_network_id.get());
269                 eDVBFrontendParametersSatellite sat;
270                 if (!ch.m_frontendParameters->getDVBS(sat))
271                 {
272                         fprintf(f, "\ts %d:%d:%d:%d:%d:%d\n", 
273                                 sat.frequency, sat.symbol_rate,
274                                 sat.polarisation, sat.fec, sat.inversion,
275                                 sat.orbital_position);
276                 }
277                 fprintf(f, "/\n");
278                 channels++;
279         }
280         fprintf(f, "end\nservices\n");
281         
282         for (std::map<eServiceReferenceDVB, ePtr<eDVBService> >::iterator i(m_services.begin());
283                 i != m_services.end(); ++i)
284         {
285                 const eServiceReferenceDVB &s = i->first;
286                 fprintf(f, "%04x:%08x:%04x:%04x:%d:%d\n", 
287                                 s.getServiceID().get(), s.getDVBNamespace().get(), 
288                                 s.getTransportStreamID().get(),s.getOriginalNetworkID().get(), 
289                                 s.getServiceType(),
290                                 0);
291                 
292                 fprintf(f, "%s\n", i->second->m_service_name.c_str());
293                 fprintf(f, "p:%s", i->second->m_provider_name.c_str());
294                 for (std::set<int>::const_iterator ca(i->second->m_ca.begin());
295                         ca != i->second->m_ca.end(); ++ca)
296                         fprintf(f, ",C:%04x", *ca);
297                 fprintf(f, "\n");
298                 services++;
299         }
300         fprintf(f, "end\nHave a lot of bugs!\n");
301         eDebug("saved %d channels and %d services!", channels, services);
302         fclose(f);
303 }
304
305 RESULT eDVBDB::addChannelToList(const eDVBChannelID &id, iDVBFrontendParameters *feparm)
306 {
307         channel ch;
308         assert(feparm);
309         ch.m_frontendParameters = feparm;
310         m_channels.insert(std::pair<eDVBChannelID, channel>(id, ch));
311         return 0;
312 }
313
314 RESULT eDVBDB::removeChannel(const eDVBChannelID &id)
315 {
316         m_channels.erase(id);
317         return 0;
318 }
319
320 RESULT eDVBDB::getChannelFrontendData(const eDVBChannelID &id, ePtr<iDVBFrontendParameters> &parm)
321 {
322         std::map<eDVBChannelID, channel>::iterator i = m_channels.find(id);
323         if (i == m_channels.end())
324         {
325                 parm = 0;
326                 return -ENOENT;
327         }
328         parm = i->second.m_frontendParameters;
329         return 0;
330 }
331
332 RESULT eDVBDB::addService(const eServiceReferenceDVB &serviceref, eDVBService *service)
333 {
334         m_services.insert(std::pair<eServiceReferenceDVB, ePtr<eDVBService> >(serviceref, service));
335         return 0;
336 }
337
338 RESULT eDVBDB::getService(const eServiceReferenceDVB &reference, ePtr<eDVBService> &service)
339 {
340         std::map<eServiceReferenceDVB, ePtr<eDVBService> >::iterator i;
341         i = m_services.find(reference);
342         if (i == m_services.end())
343         {
344                 service = 0;
345                 return -ENOENT;
346         }
347         service = i->second;
348         return 0;
349 }
350
351 RESULT eDVBDB::startQuery(ePtr<iDVBChannelListQuery> &query, eDVBChannelQuery *q)
352 {
353         query = new eDVBDBQuery(this, eServiceReference(), q);
354         return 0;
355 }
356
357 DEFINE_REF(eDVBDBQuery);
358
359 eDVBDBQuery::eDVBDBQuery(eDVBDB *db, const eServiceReference &source, eDVBChannelQuery *query): m_db(db), m_query(query)
360 {
361                 // TODO: use SOURCE ...
362         m_cursor = m_db->m_services.begin();
363 }
364
365 RESULT eDVBDBQuery::getNextResult(eServiceReferenceDVB &ref)
366 {
367         while (m_cursor != m_db->m_services.end())
368         {
369                 ref = m_cursor->first;
370                 
371                 int res = (!m_query) || m_cursor->second->checkFilter(ref, *m_query);
372
373                 ++m_cursor;
374                 
375                 if (res)
376                         return 0;
377         }
378         return 1;
379 }
380
381 /* (<name|provider|type|bouquet|satpos|chid> <==|...> <"string"|int>)[AND (..)] */
382
383         /* never, NEVER write a parser in C++! */
384 RESULT parseExpression(ePtr<eDVBChannelQuery> &res, std::list<std::string>::const_iterator begin, std::list<std::string>::const_iterator end)
385 {
386         std::list<std::string>::const_iterator end_of_exp;
387         if (*begin == "(")
388         {
389                 end_of_exp = begin;
390                 while (end_of_exp != end)
391                         if (*end_of_exp == ")")
392                                 break;
393                         else
394                                 ++end_of_exp;
395         
396                 if (end_of_exp == end)
397                 {
398                         eDebug("expression parse: end of expression while searching for closing brace");
399                         return -1;
400                 }
401                 
402                 ++begin;
403                 // begin..end_of_exp
404                 int r = parseExpression(res, begin, end_of_exp);
405                 if (r)
406                         return r;
407                 ++end_of_exp;
408                 
409                         /* we had only one sub expression */
410                 if (end_of_exp == end)
411                         return 1;
412                 
413                         /* otherwise we have an operator here.. */
414                 
415                 ePtr<eDVBChannelQuery> r2 = res;
416                 res = new eDVBChannelQuery();
417                 res->m_p1 = r2;
418                 res->m_inverse = 0;
419                 r2 = 0;
420                 
421                 if (*end_of_exp == "||")
422                         res->m_type = eDVBChannelQuery::tOR;
423                 else if (*end_of_exp == "&&")
424                         res->m_type = eDVBChannelQuery::tAND;
425                 else
426                 {
427                         eDebug("found operator %s, but only && and || are allowed!", end_of_exp->c_str());
428                         res = 0;
429                         return 1;
430                 }
431                 
432                 ++end_of_exp;
433                 
434                 return parseExpression(res->m_p2, end_of_exp, end);
435         }
436         
437         // "begin" <op> "end"
438         std::string type, op, val;
439         
440         res = new eDVBChannelQuery();
441         
442         int cnt = 0;
443         while (begin != end)
444         {
445                 switch (cnt)
446                 {
447                 case 0:
448                         type = *begin;
449                         break;
450                 case 1:
451                         op = *begin;
452                         break;
453                 case 2:
454                         val = *begin;
455                         break;
456                 case 3:
457                         eDebug("malformed query: got '%s', but expected only <type> <op> <val>", begin->c_str());
458                         return 1;
459                 }
460                 ++begin;
461                 ++cnt;
462         }
463         
464         if (cnt != 3)
465         {
466                 eDebug("malformed query: missing stuff");
467                 res = 0;
468                 return 1;
469         }
470         
471         if (type == "name")
472                 res->m_type = eDVBChannelQuery::tName;
473         else if (type == "provider")
474                 res->m_type = eDVBChannelQuery::tProvider;
475         else if (type == "type")
476                 res->m_type = eDVBChannelQuery::tType;
477         else if (type == "bouquet")
478                 res->m_type = eDVBChannelQuery::tBouquet;
479         else if (type == "satellitePosition")
480                 res->m_type = eDVBChannelQuery::tSatellitePosition;
481         else if (type == "channelID")
482                 res->m_type = eDVBChannelQuery::tChannelID;
483         else
484         {
485                 eDebug("malformed query: invalid type %s", type.c_str());
486                 res = 0;
487                 return 1;
488         }
489         
490         eDebug("type is %d, nice!", res->m_type);
491         
492         if (op == "==")
493                 res->m_inverse = 0;
494         else if (op == "!=")
495                 res->m_inverse = 1;
496         else
497         {
498                 eDebug("invalid operator %s", op.c_str());
499                 res = 0;
500                 return 1;
501         }
502         
503         res->m_string = val;
504         res->m_int = atoi(val.c_str());
505 //      res->m_channelid = eDVBChannelID(val);
506         
507         return 0;
508 }
509
510 RESULT eDVBChannelQuery::compile(ePtr<eDVBChannelQuery> &res, std::string query)
511 {
512         std::list<std::string> tokens;
513         
514         std::string current_token;
515         
516 //      eDebug("splitting %s....", query.c_str());
517         unsigned int i = 0;
518         const char *splitchars="()";
519         int quotemode = 0, lastsplit = 0, lastalnum = 0;
520         while (i <= query.size())
521         {
522                 int c = (i < query.size()) ? query[i] : ' ';
523                 ++i;
524                 
525                 int issplit = !!strchr(splitchars, c);
526                 int isaln = isalnum(c);
527                 int iswhite = c == ' ';
528                 int isquot = c == '\"';
529                 
530                 if (quotemode)
531                 {
532                         iswhite = issplit = 0;
533                         isaln = lastalnum;
534                 }
535                 
536                 if (issplit || iswhite || isquot || lastsplit || (lastalnum != isaln))
537                 {
538                         if (current_token.size())
539                                 tokens.push_back(current_token);
540                         current_token.clear();
541                 }
542                 
543                 if (!(iswhite || isquot))
544                         current_token += c;
545                 
546                 if (isquot)
547                         quotemode = !quotemode;
548                 lastsplit = issplit;
549                 lastalnum = isaln;
550         }
551         
552 //      for (std::list<std::string>::const_iterator a(tokens.begin()); a != tokens.end(); ++a)
553 //      {
554 //              printf("%s\n", a->c_str());
555 //      }
556         
557                 /* now we recursivly parse that. */
558         return  parseExpression(res, tokens.begin(), tokens.end());
559 /*      
560         res = new eDVBChannelQuery();
561         res->m_type = eDVBChannelQuery::tName;
562         res->m_inverse = 0;
563         res->m_string = query;
564         return 0; */
565 }
566
567 DEFINE_REF(eDVBChannelQuery);