add support http ts stream.(client)
[vuplus_dvbapp] / lib / service / servicedvbrecord.cpp
1 #include <lib/service/servicedvbrecord.h>
2 #include <lib/base/eerror.h>
3 #include <lib/dvb/epgcache.h>
4 #include <lib/dvb/metaparser.h>
5 #include <lib/base/httpstream.h>
6 #include <fcntl.h>
7
8         /* for cutlist */
9 #include <byteswap.h>
10 #include <netinet/in.h>
11
12 #ifndef BYTE_ORDER
13 #error no byte order defined!
14 #endif
15
16 DEFINE_REF(eDVBServiceRecord);
17
18 eDVBServiceRecord::eDVBServiceRecord(const eServiceReferenceDVB &ref, bool isstreamclient = false):
19         m_ref(ref),m_is_stream_client(isstreamclient)
20 {
21         CONNECT(m_service_handler.serviceEvent, eDVBServiceRecord::serviceEvent);
22         CONNECT(m_event_handler.m_eit_changed, eDVBServiceRecord::gotNewEvent);
23         m_state = stateIdle;
24         m_want_record = 0;
25         m_tuned = 0;
26         m_target_fd = -1;
27         m_error = 0;
28         m_streaming = 0;
29         m_simulate = false;
30         m_last_event_id = -1;
31 }
32
33 void eDVBServiceRecord::serviceEvent(int event)
34 {
35         eDebug("RECORD service event %d", event);
36         switch (event)
37         {
38         case eDVBServicePMTHandler::eventTuned:
39         {
40                 eDebug("tuned..");
41                 m_tuned = 1;
42
43                         /* start feeding EIT updates */
44                 ePtr<iDVBDemux> m_demux;
45                 if (!m_service_handler.getDataDemux(m_demux))
46                 {
47                         eServiceReferenceDVB &ref = (eServiceReferenceDVB&) m_ref;
48                         int sid = ref.getParentServiceID().get();
49                         if (!sid)
50                                 sid = ref.getServiceID().get();
51                         if ( ref.getParentTransportStreamID().get() &&
52                                 ref.getParentTransportStreamID() != ref.getTransportStreamID() )
53                                 m_event_handler.startOther(m_demux, sid);
54                         else
55                                 m_event_handler.start(m_demux, sid);
56                 }
57
58                 if (m_state == stateRecording && m_want_record)
59                         doRecord();
60                 m_event((iRecordableService*)this, evTunedIn);
61                 break;
62         }
63         case eDVBServicePMTHandler::eventTuneFailed:
64         {
65                 eDebug("record failed to tune");
66                 m_event((iRecordableService*)this, evTuneFailed);
67                 break;
68         }
69         case eDVBServicePMTHandler::eventNewProgramInfo:
70         {
71                 if (m_state == stateIdle)
72                         doPrepare();
73                 else if (m_want_record) /* doRecord can be called from Prepared and Recording state */
74                         doRecord();
75                 m_event((iRecordableService*)this, evNewProgramInfo);
76                 break;
77         }
78         case eDVBServicePMTHandler::eventMisconfiguration:
79                 m_error = errMisconfiguration;
80                 m_event((iRecordableService*)this, evTuneFailed);
81                 break;
82         case eDVBServicePMTHandler::eventNoResources:
83                 m_error = errNoResources;
84                 m_event((iRecordableService*)this, evTuneFailed);
85                 break;
86         }
87 }
88
89 RESULT eDVBServiceRecord::prepare(const char *filename, time_t begTime, time_t endTime, int eit_event_id, const char *name, const char *descr, const char *tags)
90 {
91         m_filename = filename;
92         m_streaming = 0;
93         
94         if (m_state == stateIdle)
95         {
96                 int ret = doPrepare();
97                 if (!ret)
98                 {
99                         eServiceReferenceDVB ref = m_ref.getParentServiceReference();
100                         ePtr<eDVBResourceManager> res_mgr;
101                         eDVBMetaParser meta;
102                         std::string service_data;
103                         if (!ref.valid())
104                                 ref = m_ref;
105                         if (!eDVBResourceManager::getInstance(res_mgr))
106                         {
107                                 ePtr<iDVBChannelList> db;
108                                 if (!res_mgr->getChannelList(db))
109                                 {
110                                         ePtr<eDVBService> service;
111                                         if (!db->getService(ref, service))
112                                         {
113                                                 char tmp[255];
114                                                 sprintf(tmp, "f:%x", service->m_flags);
115                                                 service_data += tmp;
116                                                 // cached pids
117                                                 for (int x=0; x < eDVBService::cacheMax; ++x)
118                                                 {
119                                                         int entry = service->getCacheEntry((eDVBService::cacheID)x);
120                                                         if (entry != -1)
121                                                         {
122                                                                 sprintf(tmp, ",c:%02d%04x", x, entry);
123                                                                 service_data += tmp;
124                                                         }
125                                                 }
126                                         }
127                                 }
128                         }
129                         meta.m_time_create = begTime;
130                         meta.m_ref = m_ref;
131                         meta.m_data_ok = 1;
132                         meta.m_service_data = service_data;
133                         if (name)
134                                 meta.m_name = name;
135                         if (descr)
136                                 meta.m_description = descr;
137                         if (tags)
138                                 meta.m_tags = tags;
139                         ret = meta.updateMeta(filename) ? -255 : 0;
140                         if (!ret)
141                         {
142                                 const eit_event_struct *event = 0;
143                                 eEPGCache::getInstance()->Lock();
144                                 if ( eit_event_id != -1 )
145                                 {
146                                         eDebug("query epg event id %d", eit_event_id);
147                                         eEPGCache::getInstance()->lookupEventId(ref, eit_event_id, event);
148                                 }
149                                 if ( !event && (begTime != -1 && endTime != -1) )
150                                 {
151                                         time_t queryTime = begTime + ((endTime-begTime)/2);
152                                         tm beg, end, query;
153                                         localtime_r(&begTime, &beg);
154                                         localtime_r(&endTime, &end);
155                                         localtime_r(&queryTime, &query);
156                                         eDebug("query stime %d:%d:%d, etime %d:%d:%d, qtime %d:%d:%d",
157                                                 beg.tm_hour, beg.tm_min, beg.tm_sec,
158                                                 end.tm_hour, end.tm_min, end.tm_sec,
159                                                 query.tm_hour, query.tm_min, query.tm_sec);
160                                         eEPGCache::getInstance()->lookupEventTime(ref, queryTime, event);
161                                 }
162                                 if ( event )
163                                 {
164                                         eDebug("found event.. store to disc");
165                                         std::string fname = filename;
166                                         fname.erase(fname.length()-2, 2);
167                                         fname+="eit";
168                                         int fd = open(fname.c_str(), O_CREAT|O_WRONLY, 0777);
169                                         if (fd>-1)
170                                         {
171                                                 int evLen=HILO(event->descriptors_loop_length)+12/*EIT_LOOP_SIZE*/;
172                                                 int wr = ::write( fd, (unsigned char*)event, evLen );
173                                                 if ( wr != evLen )
174                                                         eDebug("eit write error (%m)");
175                                                 ::close(fd);
176                                         }
177                                 }
178                                 eEPGCache::getInstance()->Unlock();
179                         }
180                 }
181                 return ret;
182         }
183         return -1;
184 }
185
186 RESULT eDVBServiceRecord::prepareStreaming()
187 {
188         m_filename = "";
189         m_streaming = 1;
190         if (m_state == stateIdle)
191                 return doPrepare();
192         return -1;
193 }
194
195 RESULT eDVBServiceRecord::start(bool simulate)
196 {
197         m_simulate = simulate;
198         m_want_record = 1;
199                 /* when tune wasn't yet successfully, doRecord stays in "prepared"-state which is fine. */
200         m_event((iRecordableService*)this, evStart);
201         return doRecord();
202 }
203
204 RESULT eDVBServiceRecord::stop()
205 {
206         if (!m_simulate)
207                 eDebug("stop recording!");
208         if (m_state == stateRecording)
209         {
210                 if (m_record)
211                         m_record->stop();
212                 if (m_target_fd >= 0)
213                 {
214                         ::close(m_target_fd);
215                         m_target_fd = -1;
216                 }
217                 
218                 saveCutlist();
219                 
220                 m_state = statePrepared;
221         } else if (!m_simulate)
222                 eDebug("(was not recording)");
223         if (m_state == statePrepared)
224         {
225                 m_record = 0;
226                 m_state = stateIdle;
227         }
228         m_event((iRecordableService*)this, evRecordStopped);
229         return 0;
230 }
231
232 int eDVBServiceRecord::doPrepare()
233 {
234                 /* allocate a ts recorder if we don't already have one. */
235         if (m_state == stateIdle)
236         {
237                 bool isstreamclient = false;
238                 m_pids_active.clear();
239                 m_state = statePrepared;
240                 ePtr<iTsSource> source;
241                 if (!m_ref.path.empty())
242                 {
243                         if (m_is_stream_client)
244                         {
245                                 isstreamclient = true;
246                                 eHttpStream *f = new eHttpStream();
247                                 f->open(m_ref.path.c_str());
248                                 source = ePtr<iTsSource>(f);
249                         }
250                         else
251                         {
252                                 /* re-record a recording */
253                                 eRawFile *f = new eRawFile();
254                                 f->open(m_ref.path.c_str());
255                                 source = ePtr<iTsSource>(f);
256                         }
257                 }
258                 return m_service_handler.tuneExt(m_ref, 0, source, m_ref.path.c_str(), 0, m_simulate, 0, isstreamclient);
259         }
260         return 0;
261 }
262
263 int eDVBServiceRecord::doRecord()
264 {
265         int err = doPrepare();
266         if (err)
267         {
268                 m_error = errTuneFailed;
269                 m_event((iRecordableService*)this, evRecordFailed);
270                 return err;
271         }
272         
273         if (!m_tuned)
274                 return 0; /* try it again when we are tuned in */
275         
276         if (!m_record && m_tuned && !m_streaming && !m_simulate)
277         {
278                 eDebug("Recording to %s...", m_filename.c_str());
279                 ::remove(m_filename.c_str());
280                 int fd = ::open(m_filename.c_str(), O_WRONLY|O_CREAT|O_LARGEFILE, 0644);
281                 if (fd == -1)
282                 {
283                         eDebug("eDVBServiceRecord - can't open recording file!");
284                         m_error = errOpenRecordFile;
285                         m_event((iRecordableService*)this, evRecordFailed);
286                         return errOpenRecordFile;
287                 }
288
289                         /* turn off kernel caching strategies */
290                 posix_fadvise(fd, 0, 0, POSIX_FADV_RANDOM);
291
292                 ePtr<iDVBDemux> demux;
293                 if (m_service_handler.getDataDemux(demux))
294                 {
295                         eDebug("eDVBServiceRecord - NO DEMUX available!");
296                         m_error = errNoDemuxAvailable;
297                         m_event((iRecordableService*)this, evRecordFailed);
298                         return errNoDemuxAvailable;
299                 }
300                 demux->createTSRecorder(m_record);
301                 if (!m_record)
302                 {
303                         eDebug("eDVBServiceRecord - no ts recorder available.");
304                         m_error = errNoTsRecorderAvailable;
305                         m_event((iRecordableService*)this, evRecordFailed);
306                         return errNoTsRecorderAvailable;
307                 }
308                 m_record->setTargetFD(fd);
309                 m_record->setTargetFilename(m_filename.c_str());
310                 m_record->connectEvent(slot(*this, &eDVBServiceRecord::recordEvent), m_con_record_event);
311
312                 m_target_fd = fd;
313         }
314         
315         if (m_streaming)
316         {
317                 m_state = stateRecording;
318                 eDebug("start streaming...");
319         } else
320         {
321                 eDebug("start recording...");
322
323                 eDVBServicePMTHandler::program program;
324                 if (m_service_handler.getProgramInfo(program))
325                         eDebug("getting program info failed.");
326                 else
327                 {
328                         std::set<int> pids_to_record;
329
330                         pids_to_record.insert(0); // PAT
331
332                         if (program.pmtPid != -1)
333                                 pids_to_record.insert(program.pmtPid); // PMT
334
335                         int timing_pid = -1, timing_pid_type = -1;
336
337                         eDebugNoNewLine("RECORD: have %zd video stream(s)", program.videoStreams.size());
338                         if (!program.videoStreams.empty())
339                         {
340                                 eDebugNoNewLine(" (");
341                                 for (std::vector<eDVBServicePMTHandler::videoStream>::const_iterator
342                                         i(program.videoStreams.begin()); 
343                                         i != program.videoStreams.end(); ++i)
344                                 {
345                                         pids_to_record.insert(i->pid);
346                                         
347                                         if (timing_pid == -1)
348                                         {
349                                                 timing_pid = i->pid;
350                                                 timing_pid_type = i->type;
351                                         }
352                                         
353                                         if (i != program.videoStreams.begin())
354                                                         eDebugNoNewLine(", ");
355                                         eDebugNoNewLine("%04x", i->pid);
356                                 }
357                                 eDebugNoNewLine(")");
358                         }
359                         eDebugNoNewLine(", and %zd audio stream(s)", program.audioStreams.size());
360                         if (!program.audioStreams.empty())
361                         {
362                                 eDebugNoNewLine(" (");
363                                 for (std::vector<eDVBServicePMTHandler::audioStream>::const_iterator
364                                         i(program.audioStreams.begin()); 
365                                         i != program.audioStreams.end(); ++i)
366                                 {
367                                         pids_to_record.insert(i->pid);
368         
369                                         if (timing_pid == -1)
370                                         {
371                                                 timing_pid = i->pid;
372                                                 timing_pid_type = -1;
373                                         }
374                                 
375                                         if (i != program.audioStreams.begin())
376                                                 eDebugNoNewLine(", ");
377                                         eDebugNoNewLine("%04x", i->pid);
378                                 }
379                                 eDebugNoNewLine(")");
380                         }
381                         if (!program.subtitleStreams.empty())
382                         {
383                                 eDebugNoNewLine(" (");
384                                 for (std::vector<eDVBServicePMTHandler::subtitleStream>::const_iterator
385                                         i(program.subtitleStreams.begin());
386                                         i != program.subtitleStreams.end(); ++i)
387                                 {
388                                         pids_to_record.insert(i->pid);
389         
390                                         if (i != program.subtitleStreams.begin())
391                                                 eDebugNoNewLine(", ");
392                                         eDebugNoNewLine("%04x", i->pid);
393                                 }
394                                 eDebugNoNewLine(")");
395                         }
396                         eDebugNoNewLine(", and the pcr pid is %04x", program.pcrPid);
397                         if (program.pcrPid != 0x1fff)
398                                 pids_to_record.insert(program.pcrPid);
399                         eDebug(", and the text pid is %04x", program.textPid);
400                         if (program.textPid != -1)
401                                 pids_to_record.insert(program.textPid); // Videotext
402
403                                 /* find out which pids are NEW and which pids are obsolete.. */
404                         std::set<int> new_pids, obsolete_pids;
405
406                         std::set_difference(pids_to_record.begin(), pids_to_record.end(), 
407                                         m_pids_active.begin(), m_pids_active.end(),
408                                         std::inserter(new_pids, new_pids.begin()));
409
410                         std::set_difference(
411                                         m_pids_active.begin(), m_pids_active.end(),
412                                         pids_to_record.begin(), pids_to_record.end(), 
413                                         std::inserter(obsolete_pids, obsolete_pids.begin())
414                                         );
415                         
416                         for (std::set<int>::iterator i(new_pids.begin()); i != new_pids.end(); ++i)
417                         {
418                                 eDebug("ADD PID: %04x", *i);
419                                 m_record->addPID(*i);
420                         }
421
422                         for (std::set<int>::iterator i(obsolete_pids.begin()); i != obsolete_pids.end(); ++i)
423                         {
424                                 eDebug("REMOVED PID: %04x", *i);
425                                 m_record->removePID(*i);
426                         }
427
428                         if (timing_pid != -1)
429                                 m_record->setTimingPID(timing_pid, timing_pid_type);
430
431                         m_pids_active = pids_to_record;
432
433                         if (m_state != stateRecording)
434                         {
435                                 m_record->start();
436                                 m_state = stateRecording;
437                         }
438                 }
439         }
440         m_error = 0;
441         m_event((iRecordableService*)this, evRecordRunning);
442         return 0;
443 }
444
445 RESULT eDVBServiceRecord::frontendInfo(ePtr<iFrontendInformation> &ptr)
446 {
447         ptr = this;
448         return 0;
449 }
450
451 RESULT eDVBServiceRecord::connectEvent(const Slot2<void,iRecordableService*,int> &event, ePtr<eConnection> &connection)
452 {
453         connection = new eConnection((iRecordableService*)this, m_event.connect(event));
454         return 0;
455 }
456
457 RESULT eDVBServiceRecord::stream(ePtr<iStreamableService> &ptr)
458 {
459         ptr = this;
460         return 0;
461 }
462
463 extern void PutToDict(ePyObject &dict, const char*key, long val);  // defined in dvb/frontend.cpp
464
465 PyObject *eDVBServiceRecord::getStreamingData()
466 {
467         eDVBServicePMTHandler::program program;
468         if (!m_tuned || m_service_handler.getProgramInfo(program))
469         {
470                 Py_RETURN_NONE;
471         }
472
473         ePyObject r = program.createPythonObject();
474         ePtr<iDVBDemux> demux;
475         if (!m_service_handler.getDataDemux(demux))
476         {
477                 uint8_t demux_id;
478                 if (!demux->getCADemuxID(demux_id))
479                         PutToDict(r, "demux", demux_id);
480         }
481
482         return r;
483 }
484
485 void eDVBServiceRecord::recordEvent(int event)
486 {
487         switch (event)
488         {
489         case iDVBTSRecorder::eventWriteError:
490                 eWarning("[eDVBServiceRecord] record write error");
491                 stop();
492                 m_event((iRecordableService*)this, evRecordWriteError);
493                 return;
494         default:
495                 eDebug("unhandled record event %d", event);
496         }
497 }
498
499 void eDVBServiceRecord::gotNewEvent()
500 {
501         ePtr<eServiceEvent> event_now;
502         m_event_handler.getEvent(event_now, 0);
503
504         if (!event_now)
505                 return;
506
507         int event_id = event_now->getEventId();
508
509         pts_t p;
510         
511         if (m_record)
512         {
513                 if (m_record->getCurrentPCR(p))
514                         eDebug("getting PCR failed!");
515                 else
516                 {
517                         m_event_timestamps[event_id] = p;
518                         eDebug("pcr of eit change: %llx", p);
519                 }
520         }
521
522         if (event_id != m_last_event_id)
523                 eDebug("[eDVBServiceRecord] now running: %s (%d seconds)", event_now->getEventName().c_str(), event_now->getDuration());
524         
525         m_last_event_id = event_id;
526
527         m_event((iRecordableService*)this, evNewEventInfo);
528 }
529
530 void eDVBServiceRecord::saveCutlist()
531 {
532                         /* XXX: dupe of eDVBServicePlay::saveCuesheet, refactor plz */
533         std::string filename = m_filename + ".cuts";
534
535         eDVBTSTools tstools;
536         
537         if (tstools.openFile(m_filename.c_str()))
538         {
539                 eDebug("[eDVBServiceRecord] saving cutlist failed because tstools failed");
540                 return;
541         }
542         
543         FILE *f = fopen(filename.c_str(), "wb");
544
545         if (f)
546         {
547                 unsigned long long where;
548                 int what;
549
550                 for (std::map<int,pts_t>::iterator i(m_event_timestamps.begin()); i != m_event_timestamps.end(); ++i)
551                 {
552                         pts_t p = i->second;
553                         off_t offset = 0; // fixme, we need to note down both
554                         if (tstools.fixupPTS(offset, p))
555                         {
556                                 eDebug("[eDVBServiceRecord] fixing up PTS failed, not saving");
557                                 continue;
558                         }
559                         eDebug("fixed up %llx to %llx (offset %llx)", i->second, p, offset);
560 #if BYTE_ORDER == BIG_ENDIAN
561                         where = p;
562 #else
563                         where = bswap_64(p);
564 #endif
565                         what = htonl(2); /* mark */
566                         fwrite(&where, sizeof(where), 1, f);
567                         fwrite(&what, sizeof(what), 1, f);
568                 }
569                 fclose(f);
570         }
571         
572 }
573
574 RESULT eDVBServiceRecord::subServices(ePtr<iSubserviceList> &ptr)
575 {
576         ptr = this;
577         return 0;
578 }
579
580 int eDVBServiceRecord::getNumberOfSubservices()
581 {
582         ePtr<eServiceEvent> evt;
583         if (!m_event_handler.getEvent(evt, 0))
584                 return evt->getNumOfLinkageServices();
585         return 0;
586 }
587
588 RESULT eDVBServiceRecord::getSubservice(eServiceReference &sub, unsigned int n)
589 {
590         ePtr<eServiceEvent> evt;
591         if (!m_event_handler.getEvent(evt, 0))
592         {
593                 if (!evt->getLinkageService(sub, m_ref, n))
594                         return 0;
595         }
596         sub.type=eServiceReference::idInvalid;
597         return -1;
598 }