source: titan/titan/player.h @ 30604

Last change on this file since 30604 was 30604, checked in by obi, 9 years ago

fix sh4 building

File size: 53.9 KB
Line 
1#ifndef PLAYER_H
2#define PLAYER_H
3
4// playercan bits:
5// 0 policy
6// 1 auditraklist
7// 2 subtitle
8// 3 videomode
9// 4 powerofftimer
10// 5 videosettings
11// 6 stop
12// 7 ff
13// 8 fr
14// 9 pause
15// 10 play
16// 11 jump/seek reverse
17// 12 jump/seek forward
18// 13 changecodec
19// 14 infobar
20// 15 slowmotion
21
22#ifdef EPLAYER3
23Context_t * player = NULL;
24extern OutputHandler_t OutputHandler;
25extern PlaybackHandler_t PlaybackHandler;
26extern ContainerHandler_t ContainerHandler;
27extern ManagerHandler_t ManagerHandler;
28#endif
29
30#ifdef EPLAYER4
31GstElement *pipeline = NULL;
32unsigned long long m_gst_startpts = 0;
33#endif
34
35//titan player
36
37//flag 0: from play
38//flag 1: from timeshift
39//flag 2: from playrcjumpr
40int playerstartts(char* file, int flag)
41{
42        int fd = -1, ret = 0, tssize = 188;
43        int16_t pmtpid = 0;
44        int serviceid = 0;
45        int supermagic = -1;
46        int lastpos = 0;
47        struct channel* chnode = NULL;
48        struct service* snode = NULL;
49        struct dvbdev* fenode = NULL;
50        struct dvbdev* dvrnode = NULL;
51
52        //supermagic = getsupermagic(file);
53
54        if(supermagic == NFS_SUPER_MAGIC || supermagic == SMB_SUPER_MAGIC)
55        {
56                debug(150, "use O_DIRECT to open file %s", file);
57                fd = open(file, O_RDONLY | O_LARGEFILE | O_NONBLOCK | O_DIRECT);
58        }
59        else
60                fd = open(file, O_RDONLY | O_LARGEFILE | O_NONBLOCK);
61
62        if(fd < 0)
63        {
64                perr("open player file");
65                return 1;
66        }
67
68        fenode = fegetdummy();
69        dvrnode = dvropen(fenode);
70        if(dvrnode == NULL)
71        {
72                err("find dvr dev");
73                close(fd);
74                return 1;
75        }
76
77        if(flag == 0 || flag == 2)
78        {
79                //TODO: funktion to get tssize from file content
80                if(cmpfilenameext(file, ".mts") == 0) tssize = 192;
81                if(cmpfilenameext(file, ".m2ts") == 0) tssize = 192;
82               
83                ret = dvbfindpmtpid(fd, &pmtpid, &serviceid, tssize);
84                if(ret == 1)
85                {
86                        err("find sid/pmt pid");
87                        close(fd);
88                        dvrclose(dvrnode, -1);
89                        return 1;
90                }
91               
92                lastpos = 0;
93                if(flag == 0 && getconfigint("showlastpos", NULL) == 1)
94                {
95                        char* fileseek = changefilenameext(file, ".se");
96                        FILE* fbseek = fopen(fileseek, "r");
97                        if(fbseek != NULL)
98                        {
99                                ret = textbox(_("Message"), _("Start at last position ?"), _("OK"), getrcconfigint("rcok", NULL), _("EXIT"), getrcconfigint("rcexit", NULL), NULL, 0, NULL, 0, 600, 200, 10, 0);
100                                if(ret == 0 || ret == 1)
101                                {
102                                        char* skip1 = calloc(1, 20);
103                                        if(skip1 != NULL)
104                                        {
105                                                fscanf(fbseek, "%s", skip1);
106                                                off64_t seekpos = atoll(skip1);
107                                                seekpos = seekpos - (seekpos % tssize);
108                                                lseek64(fd, atoll(skip1), SEEK_SET);
109                                                lastpos = 1;
110                                        }
111                                        free(skip1); skip1 = NULL;
112                                }
113                                fclose(fbseek);
114                        }
115                        free(fileseek); fileseek = NULL;
116                }       
117               
118                status.autoseek = 0;
119               
120                if(flag == 0)
121                {
122                        delmarkernode(-1);
123                        char* filemarker = changefilenameext(file, ".ma");
124                        getmarker(filemarker);
125                        free(filemarker); filemarker=NULL;
126                }
127               
128                if(status.playmarker != NULL)
129                {
130                        char* testfile = changefilenameext(file, ".as");
131                        FILE* testseek = fopen(testfile, "r");
132                        if(testseek != NULL)
133                        {
134                                if(lastpos == 0)
135                                        lseek64(fd, status.playmarker->pos, SEEK_SET);
136                                status.autoseek = 2;
137                                addtimer(&markerautoseek_thread, START, 10000, 1, NULL, NULL, NULL);
138                                fclose(testseek);
139                        }
140                        free(testfile); testfile = NULL;
141                }
142                               
143                delchannel(serviceid, 0, 1);
144                chnode = createchannel("player", 0, 0, serviceid, 99, 0, -1, -1, -1, -1, 0, -1);
145                if(chnode != NULL) chnode->pmtpid = pmtpid;
146        }
147        else
148                chnode = status.aktservice->channel;
149
150        if(chnode == NULL)
151        {
152                err("create channel");
153                close(fd);
154                dvrclose(dvrnode, -1);
155                return 1;
156        }
157
158        if(flag == 1)
159        {
160                ret = servicestart(chnode, NULL, NULL, 2);
161                if(ret != 0)
162                {
163                        err("start play");
164                        close(fd);
165                        dvrclose(dvrnode, -1);
166                        return 1;
167                }
168               
169                //on permanent timeshift seek to end, and a little back (eof problem)
170                if(status.timeshifttype == 1)
171                {
172                        if(status.timeshiftpos > 0)
173                                lseek64(fd, status.timeshiftpos, SEEK_SET);
174                        else
175                        {
176                                unsigned long long pos = lseek64(fd, 0, SEEK_END);
177                                pos -= 10000000;
178                                pos = pos - (pos & tssize);
179                                lseek64(fd, -pos, SEEK_END);
180                        }
181                }
182        }
183
184        ret = recordstartreal(NULL, fd, dvrnode->fd, RECPLAY, 0, NULL, tssize);
185        if(ret != 0)
186        {
187                err("start play thread");
188                close(fd);
189                dvrclose(dvrnode, -1);
190                return 1;
191        }
192
193        snode = getservice(RECORDPLAY, 0);
194        if(snode != NULL)
195        {
196                int dupfd = -1;
197                snode->recname = ostrcat(file, NULL, 0, 0);
198
199                dupfd = open(snode->recname, O_RDONLY | O_LARGEFILE);
200                if(dupfd > -1)
201                        gettsinfo(dupfd, &snode->lenpts, &snode->startpts, &snode->endpts, &snode->bitrate, snode->tssize);
202
203                if(flag == 1)
204                {
205                        snode->lenpts = 0;
206                        snode->endpts = 0;
207                }
208                else
209                {
210                        if(getservicebyrecname(file, 1, 0) != NULL) //playfile is recording, so len can change
211                        {
212                                snode->lenpts = 0;
213                                snode->endpts = 0;
214                        }
215                        else if(dupfd > -1)
216                                snode->endoffile = lseek64(dupfd , 0, SEEK_END);
217                }
218                close(dupfd);
219        }
220
221        if(flag == 0 || flag == 2)
222        {
223                ret = servicestart(chnode, NULL, NULL, 1);
224                if(ret != 0)
225                {
226                        err("start play");
227                        if(snode != NULL) snode->recendtime = 1;
228                        close(fd);
229                        dvrclose(dvrnode, -1);
230                        return 1;
231                }
232                //status.playercan = 0x7EFF;
233                status.playercan = 0xFFFF;     
234        }
235
236        return 0;
237}
238
239//flag 0: from play
240//flag 1: from timeshift
241//flag 2: from playrcjumpr/playerafterendts
242//flag1 0: stop from rcstop
243//flag1 1: stop from servicestop
244void playerstopts(int flag, int flag1)
245{
246        int ret = 0;
247        struct service* snode = NULL;
248        struct channel* node = NULL;
249
250        snode = getservice(RECORDPLAY, flag1);
251
252        if(snode != NULL && snode->recsrcfd >= 0 && flag == 0 && flag1 == 0)
253        {
254                char* fileseek = changefilenameext(snode->recname, ".se");
255                FILE* fbseek = fopen(fileseek, "w");
256                if(fbseek != NULL)
257                {
258                        off64_t pos = getcurrentpos(snode);
259                        if(pos <= 0)
260                                pos = lseek64(snode->recsrcfd, 0, SEEK_CUR);
261                        fprintf(fbseek,"%lld", pos);
262                        fclose(fbseek);
263                }
264                free(fileseek); fileseek=NULL;
265                char* filemarker = changefilenameext(snode->recname, ".ma");
266                ret = putmarker(filemarker);
267                free(filemarker); filemarker=NULL;
268                delmarkernode(-1);
269        }
270       
271        if(snode != NULL) snode->recendtime = 1;
272       
273        if(flag == 0 || flag == 2)
274        {
275                playerslowts(0);
276                playerffts(0);
277
278                ret = servicestop(status.aktservice, 1, 1);
279                if(ret == 1)
280                {
281                        debug(150, "can't stop ts playback service");   
282                }
283                else
284                        status.aktservice->channel = NULL;
285
286                               
287                node = gettmpchannel();
288                if(node != NULL && ostrcmp(node->name, "player") == 0)
289                        delchannel(node->serviceid, node->transponderid, 1);
290        }
291}
292
293void playerresetts()
294{
295        audiostop(status.aktservice->audiodev);
296        videostop(status.aktservice->videodev, 0);
297#ifdef MIPSEL
298        videoclearbuffer(status.aktservice->videodev);
299        audioclearbuffer(status.aktservice->audiodev);
300#endif
301        videoplay(status.aktservice->videodev);
302        audioplay(status.aktservice->audiodev);
303}
304
305void playercontinuets()
306{
307        videocontinue(status.aktservice->videodev);
308        audioplay(status.aktservice->audiodev);
309}
310
311void playerpausets()
312{
313        videofreeze(status.aktservice->videodev);
314        audiopause(status.aktservice->audiodev);
315}
316
317//flag 0: with lock
318//flag 1: without lock
319int playerseekts(struct service* servicenode, int sekunden, int flag)
320{
321        off64_t offset = 0;
322        off64_t endoffile = 0;
323        off64_t currentpos = 0;
324        //off64_t fdptspos = 0;
325        //int ret = 0;
326        unsigned long long lenpts = 0;
327        unsigned long long startpts = 0;
328        unsigned long long endpts = 0;
329        unsigned long long bitrate = 0;
330        //unsigned long long aktpts = 0;
331        //unsigned long long fdpts = 0;
332        //int aktsekunden = 0;
333        int sekundenoff = 0;
334       
335        if(servicenode == NULL) return 1;
336
337        if(servicenode->recsrcfd < 0)
338        {
339                err("source fd not ok");
340                return 1;
341        }
342       
343        if(flag == 0) m_lock(&status.tsseekmutex, 15);
344
345/*
346        ret = videogetpts(status.aktservice->videodev, &aktpts);
347        if(ret == 0)
348        {
349                aktsekunden = aktpts / 90000;
350        }
351        else
352                aktsekunden = 0;
353        ret = getpts(servicenode->recsrcfd, 0, 0, 256 * 1024, &fdpts, &fdptspos, -1, servicenode->tssize);
354        if(ret == 0 && aktsekunden != 0)
355        {
356                sekundenoff = fdpts / 90000 - aktsekunden ;
357                //currentpos = lseek64(servicenode->recsrcfd, fdptspos, SEEK_SET);
358        }
359        else
360                sekundenoff = 0;
361*/
362       
363        currentpos = lseek64(servicenode->recsrcfd, 0, SEEK_CUR);
364
365        lenpts = servicenode->lenpts;
366        startpts = servicenode->startpts;
367        endpts = servicenode->endpts;
368        bitrate = servicenode->bitrate;
369        if(gettsinfo(servicenode->recsrcfd, &lenpts, &startpts, &endpts, &bitrate, servicenode->tssize) != 0)
370        {
371                err("can't read ts info");
372                lseek64(servicenode->recsrcfd, currentpos, SEEK_SET);
373                if(flag == 0) m_unlock(&status.tsseekmutex, 15);
374                return 1;
375        }
376        if(servicenode->endoffile > 0)
377                endoffile = servicenode->endoffile - (servicenode->tssize * 2);
378        else
379                endoffile = lseek64(servicenode->recsrcfd , -servicenode->tssize * 2, SEEK_END);
380
381/*
382        ret = videoclearbuffer(status.aktservice->videodev);
383        ret = audioclearbuffer(status.aktservice->audiodev);
384        ret = videodiscontinuityskip(status.aktservice->videodev, 0);
385*/
386
387        if(sekunden >= 0)
388        {
389                if(sekundenoff != 0)
390                        offset = (bitrate / 8) * (sekunden - sekundenoff);
391                else
392                        offset = (bitrate / 8) * sekunden - 5000000;
393                offset = offset - (offset % servicenode->tssize);
394                if(currentpos + offset > endoffile)
395                {
396                        offset = endoffile - currentpos;
397                        offset = offset - (offset % servicenode->tssize);
398                }
399        }
400        else
401        {
402                sekunden = sekunden * -1;
403                if(sekundenoff != 0)
404                        offset = (bitrate / 8) * (sekunden + sekundenoff);
405                else
406                        offset = (bitrate / 8) * sekunden;
407                if(offset > 0) offset += 5000000;
408                offset = offset - (offset % servicenode->tssize);
409                if(currentpos - offset < 0)
410                        offset = currentpos;
411                offset = offset * -1;
412        }
413        offset += currentpos;
414        currentpos = lseek64(servicenode->recsrcfd, offset, SEEK_SET);
415
416        playerresetts();
417
418        if(flag == 0) m_unlock(&status.tsseekmutex, 15);
419        return 0;
420}
421
422void playerffts(int speed)
423{
424#ifdef MIPSEL
425        audiostop(status.aktservice->audiodev);
426        videoslowmotion(status.aktservice->videodev, 0);
427        videofastforward(status.aktservice->videodev, speed);
428        videocontinue(status.aktservice->videodev);
429#else   
430        videofastforward(status.aktservice->videodev, speed);
431#endif
432}
433
434void playerslowts(int speed)
435{
436#ifdef MIPSEL
437        audiostop(status.aktservice->audiodev);
438        videoslowmotion(status.aktservice->videodev, speed);
439        videofastforward(status.aktservice->videodev, 0);
440        videocontinue(status.aktservice->videodev);
441#else           
442        videoslowmotion(status.aktservice->videodev, speed);
443#endif
444}
445
446//flag = 0 --> recordplay
447//flag = 1 --> timeshift
448void playerfrts(int speed, int flag)
449{
450        if(flag == 1)
451                videocontinue(status.aktservice->videodev);
452        if(speed == -2)
453        {
454                videoclearbuffer(status.aktservice->videodev);
455                audioclearbuffer(status.aktservice->audiodev);
456        }
457        speed *= -1;
458#ifdef MIPSEL
459        audiostop(status.aktservice->audiodev);
460        videoslowmotion(status.aktservice->videodev, 0);
461        videofastforward(status.aktservice->videodev, speed);
462        videocontinue(status.aktservice->videodev);
463#else   
464        videofastforward(status.aktservice->videodev, speed);
465#endif
466}
467       
468
469//flag = 0 --> play ts
470//flag = 1 --> timeshift
471//flag = 2 --> timeshift, not in play mode (only recording)
472int playergetinfots(unsigned long long* lenpts, unsigned long long* startpts, unsigned long long* endpts, unsigned long long* aktpts, unsigned long long* bitrate, int flag)
473{
474        int ret = 0, dupfd = -1;
475        double ratio = 0;
476        struct service* snode = NULL;
477        unsigned long long lenpts1 = 0;
478        unsigned long long startpts1 = 0;
479        unsigned long long endpts1 = 0;
480        unsigned long long bitrate1 = 0;
481        unsigned long long endoffile1 = 0;
482        unsigned long long aktpos = 0;
483       
484        if(flag == 2)
485                snode = getservice(RECORDTIMESHIFT, 0);
486        else
487                snode = getservice(RECORDPLAY, 0);
488               
489        if(snode == NULL) return 1;
490
491        if(snode->lenpts > 0 && snode->startpts > 0 && snode->endpts > 0 && snode->bitrate > 0 && snode->endoffile > 0)
492        {
493                if(lenpts != NULL) *lenpts = snode->lenpts;
494                if(startpts != NULL) *startpts = snode->startpts;
495                if(endpts != NULL) *endpts = snode->endpts;
496                if(bitrate != NULL) *bitrate = snode->bitrate;
497
498                //ret = videogetpts(status.aktservice->videodev, aktpts);
499                if(aktpts != NULL)
500                {
501                        m_lock(&status.tsseekmutex, 15);
502                        if(flag == 2)
503                                aktpos = lseek64(snode->recdstfd , 0, SEEK_CUR);
504                        else
505                                aktpos = lseek64(snode->recsrcfd , 0, SEEK_CUR);
506                        m_unlock(&status.tsseekmutex, 15);
507
508                        ratio = (double)snode->endoffile / (double)(snode->endpts - snode->startpts);
509                        if(ratio == 0) ratio = 1;
510                        *aktpts = ((double)aktpos / ratio);
511                        *aktpts += snode->startpts;
512                }
513
514                return ret;
515        }
516       
517        dupfd = open(snode->recname, O_RDONLY | O_LARGEFILE);
518        if(dupfd < 0)
519        {
520                err("copy source fd not ok");
521                return 1;
522        }
523
524        lenpts1 = snode->lenpts;
525        startpts1 = snode->startpts;
526        endpts1 = snode->endpts;
527        bitrate1 = snode->bitrate;
528        if(gettsinfo(dupfd, &lenpts1, &startpts1, &endpts1, &bitrate1, snode->tssize) != 0)
529        {
530                err("can't read ts info");
531                return 1;
532        }
533
534        if(lenpts != NULL) *lenpts = lenpts1;
535        if(startpts != NULL) *startpts = startpts1;
536        if(endpts != NULL) *endpts = endpts1;
537        if(bitrate != NULL) *bitrate = bitrate1;
538
539        //ret = videogetpts(status.aktservice->videodev, aktpts);
540        if(aktpts != NULL)
541        {
542                m_lock(&status.tsseekmutex, 15);
543                if(flag == 2)
544                        aktpos = lseek64(snode->recdstfd, 0, SEEK_CUR);
545                else
546                        aktpos = lseek64(snode->recsrcfd, 0, SEEK_CUR);
547                m_unlock(&status.tsseekmutex, 15);
548
549                if(snode->endoffile <= 0)
550                        endoffile1 = lseek64(dupfd, 0, SEEK_END);
551                else
552                        endoffile1 = snode->endoffile;
553
554                if(endpts1 == 0)
555                        ratio = 1;
556                else
557                        ratio = (double)endoffile1 / (double)(endpts1 - startpts1);
558
559                if(ratio == 0) ratio = 1;
560                *aktpts = ((double)aktpos / ratio);
561                *aktpts += startpts1;
562        }
563
564        close(dupfd);
565        return ret;
566}
567
568void playerchangeaudiotrackts()
569{
570        screenaudiotrack();
571}
572
573void playerchangesubtitletrackts()
574{
575        screensubtitle();
576}
577
578int playerisplayingts()
579{
580        struct service* snode = getservice(RECORDPLAY, 0);
581
582        if(snode == NULL)
583                return 0;
584        return 1;
585}
586
587void playerafterendts()
588{
589        playerstopts(2, 0);
590}
591
592#ifdef EPLAYER4
593typedef struct _CustomData {
594  gboolean is_live;
595  GstElement *pipeline;
596  GMainLoop *loop;
597} CustomData;
598
599CustomData data;
600#endif
601
602//extern player
603int playerstart(char* file)
604{
605        char * tmpfile = NULL;
606       
607        if(file != NULL)
608        {
609#ifdef EPLAYER3
610                //use eplayer
611
612                if(player != NULL)
613                {
614                        debug(150, "eplayer allready running");
615                        playerstop();
616                }
617
618                player = calloc(1, sizeof(Context_t));
619
620                if(player == NULL)
621                {
622                        err("no mem");
623                        return 1;
624                }
625
626                if(ostrstr(file, "://") == NULL)
627                        tmpfile = ostrcat("file://", file, 0, 0);
628                else
629                        tmpfile = ostrcat(file, NULL, 0, 0);
630
631                if(tmpfile == NULL)
632                {
633                        err("no mem");
634                        free(player); player = NULL;
635                        return 1;
636                }
637// move to mc
638//              set_player_sound(0);
639
640                if(ostrstr(tmpfile, "file://") == NULL)
641                        status.playercan = 0x4650;
642                else
643                        status.playercan = 0xFFFF;
644               
645                player->playback = &PlaybackHandler;
646                player->output = &OutputHandler;
647                player->container = &ContainerHandler;
648                player->manager = &ManagerHandler;
649               
650                //add container befor open, so we can set buffer size
651                char* ext = getfilenameext(tmpfile);
652                if(ext != NULL)
653                {
654                        player->container->Command(player, CONTAINER_ADD, ext);
655                        free(ext); ext = NULL;
656                }
657
658                //select container_ffmpeg, if we does not found a container with extensions
659                if(player->container->selectedContainer == NULL)
660                        player->container->Command(player, CONTAINER_ADD, "mp3");
661
662                if(player && player->container && player->container->selectedContainer)
663                {
664                        int size = getconfigint("playerbuffersize", NULL);
665                        int seektime = getconfigint("playerbufferseektime", NULL);
666                        player->container->selectedContainer->Command(player, CONTAINER_SET_BUFFER_SIZE, (void*)&size);
667                        player->container->selectedContainer->Command(player, CONTAINER_SET_BUFFER_SEEK_TIME, (void*)&seektime);
668                }
669               
670                debug(150, "eplayername = %s", player->output->Name);
671
672                //Registrating output devices
673                player->output->Command(player, OUTPUT_ADD, "audio");
674                player->output->Command(player, OUTPUT_ADD, "video");
675                player->output->Command(player, OUTPUT_ADD, "subtitle");
676               
677                //for subtitle
678                SubtitleOutputDef_t subout;
679
680                subout.screen_width = skinfb->width;
681                subout.screen_height = skinfb->height;
682                subout.framebufferFD = skinfb->fd;
683                subout.destination = (uint32_t *)skinfb->fb;
684                subout.destStride = skinfb->pitch;
685                subout.shareFramebuffer = 1;
686                subout.framebufferBlit = blitfb1;
687
688                player->output->subtitle->Command(player, (OutputCmd_t)OUTPUT_SET_SUBTITLE_OUTPUT, (void*)&subout);
689               
690                if(player->playback->Command(player, PLAYBACK_OPEN, tmpfile) < 0)
691                {
692                        free(player); player = NULL;
693                        free(tmpfile);
694                        return 1;
695                }
696
697                player->output->Command(player, OUTPUT_OPEN, NULL);
698                player->playback->Command(player, PLAYBACK_PLAY, NULL);
699
700                free(tmpfile);
701
702                return 0;
703#endif
704
705#ifdef EPLAYER4
706                int flags = 0x47; //(GST_PLAY_FLAG_VIDEO | GST_PLAY_FLAG_AUDIO | GST_PLAY_FLAG_NATIVE_VIDEO | GST_PLAY_FLAG_TEXT);
707               
708                if(pipeline != NULL)
709                {
710                        debug(150, "eplayer allready running");
711                        playerstop();
712                }
713               
714                if(ostrstr(file, "://") == NULL)
715                        tmpfile = ostrcat("file://", file, 0, 0);
716                else
717                        tmpfile = ostrcat(file, NULL, 0, 0);
718
719                if(tmpfile == NULL)
720                {
721                        err("no mem");
722                        free(pipeline); pipeline = NULL;
723                        return 1;
724                }
725
726                if(ostrstr(tmpfile, "file://") == NULL)
727                        status.playercan = 0x7E7F;
728                else
729                        status.playercan = 0x7E7F;
730       
731                pipeline = gst_element_factory_make("playbin2", "playbin");
732
733// enable buffersize start
734                int size = getconfigint("playerbuffersize", NULL);
735                printf("size: %d\n",size);
736               
737                if(size > 0)
738                        status.prefillbuffer = 1;
739
740                g_object_set(G_OBJECT(pipeline), "buffer-duration", size * GST_SECOND, NULL);
741                g_object_set(G_OBJECT(pipeline), "buffer-size", size, NULL);
742// enable buffersizeend
743
744                g_object_set(G_OBJECT(pipeline), "uri", tmpfile, NULL);
745                g_object_set(G_OBJECT(pipeline), "flags", flags, NULL);
746                free(tmpfile); tmpfile = NULL;
747
748///////////////////
749// srt subs start
750                const char *filename = file;
751                const char *ext = strrchr(filename, '.');
752                if (!ext)
753                        ext = filename + strlen(filename);
754
755                GstElement *subsink = gst_element_factory_make("subsink", "subtitle_sink");
756                if (!subsink)
757                        printf("sorry, can't play: missing gst-plugin-subsink\n");
758                else
759                {
760//                      m_subs_to_pull_handler_id = g_signal_connect (subsink, "new-buffer", G_CALLBACK (gstCBsubtitleAvail), this);
761                        g_object_set (G_OBJECT (subsink), "caps", gst_caps_from_string("text/plain; text/x-plain; text/x-raw; text/x-pango-markup; video/x-dvd-subpicture; subpicture/x-pgs"), NULL);
762                        g_object_set (G_OBJECT (pipeline), "text-sink", subsink, NULL);
763                        g_object_set (G_OBJECT (pipeline), "current-text", -1, NULL);
764                }
765
766                GstBus *bus = gst_pipeline_get_bus(GST_PIPELINE(pipeline));
767#if GST_VERSION_MAJOR < 1
768//              gst_bus_set_sync_handler(bus, gstBusSyncHandler, this);
769                gst_bus_set_sync_handler(bus, NULL, NULL);
770#else
771//              gst_bus_set_sync_handler(bus, gstBusSyncHandler, this, NULL);
772                gst_bus_set_sync_handler(bus, NULL, NULL, NULL);
773#endif
774
775                gst_object_unref(bus);
776                char srt_filename[ext - filename + 5];
777                strncpy(srt_filename,filename, ext - filename);
778                srt_filename[ext - filename] = '\0';
779                strcat(srt_filename, ".srt");
780
781                if(access(srt_filename, R_OK) >= 0)
782                {
783                        printf("found srt1: %s\n",srt_filename);
784                        printf("found srt2: %s\n",g_filename_to_uri(srt_filename, NULL, NULL));
785                        g_object_set(G_OBJECT (pipeline), "suburi", g_filename_to_uri(srt_filename, NULL, NULL), NULL);         
786                }
787// srt end     
788
789///////////////////
790//              CustomData data;
791                memset (&data, 0, sizeof (data));
792                data.pipeline = pipeline;
793//              GstBus *bus;
794//              bus = gst_element_get_bus (pipeline);
795               
796                // Start playing //
797                GstStateChangeReturn ret;
798                ret = gst_element_set_state (pipeline, GST_STATE_PLAYING);
799                if(ret == GST_STATE_CHANGE_FAILURE)
800                {
801                        g_printerr ("Unable to set the pipeline to the playing state.\n");
802                        gst_object_unref (pipeline);
803                        return -1;
804                }
805                else if(ret == GST_STATE_CHANGE_NO_PREROLL)
806                {
807                        data.is_live = TRUE;
808                }
809
810                data.loop = g_main_loop_new (NULL, FALSE);
811                data.pipeline = pipeline;
812                gst_bus_add_signal_watch (bus);
813//              g_signal_connect (bus, "message", G_CALLBACK (cb_message), &data);
814//              status.prefillbuffer = 1;
815
816                int count = 0;
817                m_gst_startpts = 0;
818                while(m_gst_startpts == 0 && count < 5)
819                {
820                        count++;
821                        sleep(1);
822                        m_gst_startpts = playergetpts();
823                }
824
825                return 0;
826#endif
827        }
828       
829        return 1;
830}
831
832
833#ifdef EPLAYER4
834int setBufferSize(int size)
835{
836        int m_buffer_size = size;
837        g_object_set (G_OBJECT (pipeline), "buffer-size", m_buffer_size, NULL);
838        return 0;
839}
840#endif
841
842void playerinit(int argc, char* argv[])
843{
844#ifdef EPLAYER4
845        gst_init(&argc, &argv);
846#endif
847}
848
849#ifdef EPLAYER4
850int gstbuscall(GstBus *bus, GstMessage *msg, CustomData *data)
851{
852
853        int ret = 1;
854        if(!pipeline) return 0;
855        if(!msg) return ret;
856
857        gchar *sourceName = NULL;
858        GstObject *source = GST_MESSAGE_SRC(msg);
859
860        if(!GST_IS_OBJECT(source)) return ret;
861        sourceName = gst_object_get_name(source);
862
863        switch(GST_MESSAGE_TYPE(msg))
864        {
865                case GST_MESSAGE_EOS:
866                        debug(150, "gst player eof");
867                        ret = 0;
868                        break;
869                case GST_MESSAGE_STATE_CHANGED:
870                        if(GST_MESSAGE_SRC(msg) != GST_OBJECT(pipeline))
871                                break;
872
873                        GstState old_state, new_state;
874                        gst_message_parse_state_changed(msg, &old_state, &new_state, NULL);
875               
876                        if(old_state == new_state) break;
877       
878                        debug(150, "gst state change %s -> %s", gst_element_state_get_name(old_state), gst_element_state_get_name(new_state));
879       
880                        GstStateChange transition = (GstStateChange)GST_STATE_TRANSITION(old_state, new_state);
881       
882                        switch(transition)
883                        {
884                                case GST_STATE_CHANGE_NULL_TO_READY:
885                                        break;
886                                case GST_STATE_CHANGE_READY_TO_PAUSED:
887/*
888                                        GstElement *appsink = gst_bin_get_by_name(GST_BIN(pipeline), "subtitle_sink");
889                                        if(appsink)
890                                        {
891                                                g_object_set(G_OBJECT(appsink), "max-buffers", 2, NULL);
892                                                g_object_set(G_OBJECT(appsink), "sync", FALSE, NULL);
893                                                g_object_set(G_OBJECT(appsink), "emit-signals", TRUE, NULL);
894                                                gst_object_unref(appsink);
895                                        }
896*/
897                                        break;
898                                case GST_STATE_CHANGE_PAUSED_TO_PLAYING:
899                                        //if(m_sourceinfo.is_streaming && m_streamingsrc_timeout )
900                                                //m_streamingsrc_timeout->stop();
901                                        break;
902                                case GST_STATE_CHANGE_PLAYING_TO_PAUSED:
903                                        break;
904                                case GST_STATE_CHANGE_PAUSED_TO_READY:
905                                        break;
906                                case GST_STATE_CHANGE_READY_TO_NULL:
907                                        ret = 0;
908                                        break;
909                        }
910                        break;
911                case GST_MESSAGE_ERROR:
912                        debug(150, "gst player error");
913
914                        gchar *gdebug1;
915                        GError *err;
916
917                        gst_message_parse_error(msg, &err, &gdebug1);
918                        g_free(gdebug1);
919
920                        debug(150, "gst error: %s (%i) from %s", err->message, err->code, sourceName);
921                        if(err->domain == GST_STREAM_ERROR)
922                        {
923                                if(err->code == GST_STREAM_ERROR_CODEC_NOT_FOUND )
924                                {
925                                        //if(g_strrstr(sourceName, "videosink"))
926                                        //      m_event((iPlayableService*)this, evUser+11);
927                                        //else if ( g_strrstr(sourceName, "audiosink") )
928                                        //      m_event((iPlayableService*)this, evUser+10);
929                                }
930                        }
931                        g_error_free(err);
932                        break;
933                case GST_MESSAGE_INFO:
934                        debug(150, "gst player info");
935
936/*
937                        gchar *gdebug2;
938                        GError *inf;
939       
940                        gst_message_parse_info(msg, &inf, &gdebug2);
941                        g_free(gdebug2);
942                        if(inf->domain == GST_STREAM_ERROR && inf->code == GST_STREAM_ERROR_DECODE )
943                        {
944                                //if(g_strrstr(sourceName, "videosink"))
945                                //      m_event((iPlayableService*)this, evUser+14);
946                        }
947                        g_error_free(inf);
948*/
949                        break;
950                case GST_MESSAGE_TAG:
951                        debug(150, "gst player tag");
952                        break;
953                //case GST_MESSAGE_ASYNC_DONE:
954                //      debug(150, "gst player async done");
955                //      break;
956                case GST_MESSAGE_ELEMENT:
957                        debug(150, "gst player element");
958                        break;
959                case GST_MESSAGE_BUFFERING:
960                        debug(150, "gst player buffering");
961
962/*
963                        GstBufferingMode mode;
964                        gst_message_parse_buffering(msg, &(m_bufferInfo.bufferPercent));
965                        gst_message_parse_buffering_stats(msg, &mode, &(m_bufferInfo.avgInRate), &(m_bufferInfo.avgOutRate), &(m_bufferInfo.bufferingLeft));
966                        //m_event((iPlayableService*)this, evBuffering);
967*/
968
969//debug(10, "gst player buffering");
970                        if(status.prefillbuffer == 1)
971                        {
972
973                                gint percent = 0;
974                                if (data->is_live) break;
975                                gst_message_parse_buffering (msg, &percent);
976                                g_print ("Buffering (%3d%%)\r", percent);
977                                if (percent < 100)
978                                {
979                                        gst_element_set_state (data->pipeline, GST_STATE_PAUSED);
980                                }
981                                else
982                                {
983                                        gst_element_set_state (data->pipeline, GST_STATE_PLAYING);
984                                        status.prefillbuffer = 0;
985                                }
986                        }
987                        break;
988
989/*
990                        GstBufferingMode mode;
991                        gst_message_parse_buffering(msg, &(status.bufferpercent));
992                        gst_message_parse_buffering_stats(msg, &mode, &(status.avgInRate), &(status.avgOutRate), &(status.bufferingLeft));
993
994//                      printf("#########################################################\n");
995//                      printf("Buffering %u percent done\n", status.bufferpercent);
996//                      printf("avgInRate %d\n", status.avgInRate);
997//                      printf("avgOutRate %d\n", status.avgOutRate);
998//                      printf("bufferingLeft %lld\n", status.bufferingLeft);
999                                       
1000                        if(status.prefillbuffer == 1)
1001                        {
1002                                printf("status.prefillbuffer Buffering %u percent done\n", status.bufferpercent);
1003
1004                                if (status.bufferpercent == 100)
1005                                {
1006                                        GstState state;
1007                                        gst_element_get_state(pipeline, &state, NULL, 0LL);
1008                                        if (state != GST_STATE_PLAYING)
1009                                        {
1010                                                // eDebug("start playing");
1011                                                gst_element_set_state (pipeline, GST_STATE_PLAYING);
1012                                        }
1013//                                      m_ignore_buffering_messages = 5;
1014                                        status.prefillbuffer = 0;
1015                                }
1016                                else if (status.bufferpercent == 0)
1017                                {
1018                                        // eDebug("start pause");
1019                                        gst_element_set_state (pipeline, GST_STATE_PAUSED);
1020//                                      m_ignore_buffering_messages = 0;
1021                                }
1022                        }
1023*/
1024/*
1025                                GstBufferingMode mode;
1026                                printf("GST_STATE_PAUSED\n");
1027                                gst_element_set_state (pipeline, GST_STATE_PAUSED);
1028
1029
1030                                gst_message_parse_buffering(msg, &(m_bufferInfo.bufferPercent));
1031                                // eDebug("Buffering %u percent done", m_bufferInfo.bufferPercent);
1032                                gst_message_parse_buffering_stats(msg, &mode, &(m_bufferInfo.avgInRate), &(m_bufferInfo.avgOutRate), &(m_bufferInfo.bufferingLeft));
1033                                m_event((iPlayableService*)this, evBuffering);
1034                                if (m_use_prefillbuffer && !m_is_live && --m_ignore_buffering_messages <= 0)
1035                                {
1036                                        if (m_bufferInfo.bufferPercent == 100)
1037                                        {
1038                                                GstState state;
1039                                                gst_element_get_state(pipeline, &state, NULL, 0LL);
1040                                                if (state != GST_STATE_PLAYING)
1041                                                {
1042                                                        // eDebug("start playing");
1043                                                        gst_element_set_state (pipeline, GST_STATE_PLAYING);
1044                                                }
1045                                                m_ignore_buffering_messages = 5;
1046                                        }
1047                                        else if (m_bufferInfo.bufferPercent == 0)
1048                                        {
1049                                                // eDebug("start pause");
1050                                                gst_element_set_state (pipeline, GST_STATE_PAUSED);
1051                                                m_ignore_buffering_messages = 0;
1052                                        }
1053                                        else
1054                                        {
1055                                                m_ignore_buffering_messages = 0;
1056                                        }
1057                                }
1058
1059*/
1060                        break;
1061                case GST_MESSAGE_STREAM_STATUS:
1062                        debug(150, "gst player stream status");
1063
1064/*
1065                        GstStreamStatusType type;
1066                        GstElement *owner;
1067
1068                        gst_message_parse_stream_status(msg, &type, &owner);
1069                        if(type == GST_STREAM_STATUS_TYPE_CREATE && m_sourceinfo.is_streaming)
1070                        {
1071                                if(GST_IS_PAD(source))
1072                                        owner = gst_pad_get_parent_element(GST_PAD(source));
1073                                else if(GST_IS_ELEMENT(source))
1074                                        owner = GST_ELEMENT(source);
1075                                else
1076                                        owner = NULL;
1077                                if(owner)
1078                                {
1079                                        GstElementFactory *factory = gst_element_get_factory(GST_ELEMENT(owner));
1080                                        const gchar *name = gst_plugin_feature_get_name(GST_PLUGIN_FEATURE(factory));
1081                                        if (!strcmp(name, "souphttpsrc"))
1082                                        {
1083                                                //m_streamingsrc_timeout->start(10 * 1000, true);
1084                                                g_object_set(G_OBJECT(owner), "timeout", 10, NULL);
1085                                        }
1086                                       
1087                                }
1088                                if(GST_IS_PAD(source))
1089                                        gst_object_unref(owner);
1090                        }
1091*/
1092                        break;
1093                default:
1094                        debug(150, "gst player unknown message");
1095                        break;
1096        }
1097        g_free(sourceName);
1098        return ret;
1099}
1100#endif
1101
1102int playergetbuffersize()
1103{
1104        int ret = 0;
1105
1106#ifdef EPLAYER3
1107        if(player && player->container && player->container->selectedContainer)
1108                player->container->selectedContainer->Command(player, CONTAINER_GET_BUFFER_SIZE, (void*)&ret);
1109#endif
1110
1111        return ret;
1112}
1113
1114int playergetbufferstatus()
1115{
1116        int ret = 0;
1117
1118#ifdef EPLAYER3
1119        if(player && player->container && player->container->selectedContainer)
1120                player->container->selectedContainer->Command(player, CONTAINER_GET_BUFFER_STATUS, (void*)&ret);
1121#endif
1122
1123        return ret;
1124}
1125
1126int playerstopbuffer()
1127{
1128        int ret = 0;
1129
1130#ifdef EPLAYER3
1131        if(player && player->container && player->container->selectedContainer)
1132                player->container->selectedContainer->Command(player, CONTAINER_STOP_BUFFER, NULL);
1133#endif
1134
1135        return ret;
1136}
1137
1138int playerisplaying()
1139{
1140#ifdef SIMULATE
1141        return 1;
1142#endif
1143
1144#ifdef EPLAYER3
1145        if(player != NULL && player->playback != NULL && player->playback->isPlaying)
1146                return 1;
1147#endif
1148
1149#ifdef EPLAYER4
1150        int ret = 1;
1151
1152        if(pipeline)
1153        {
1154                GstBus *bus = gst_pipeline_get_bus(GST_PIPELINE(pipeline));
1155                GstMessage *message = NULL;
1156//use global variale, with static var crash
1157//              CustomData *data = NULL;
1158                while((message = gst_bus_pop(bus)))
1159                {
1160                        ret = gstbuscall(bus, message, &data);
1161                        gst_message_unref(message);
1162                }
1163        }
1164        else
1165                ret = 0;
1166
1167        return ret;
1168#endif
1169        return 0;
1170}
1171
1172void playerplay()
1173{
1174#ifdef EPLAYER3
1175        if(player && player->playback)
1176                player->playback->Command(player, PLAYBACK_PLAY, NULL);
1177#endif
1178
1179#ifdef EPLAYER4
1180        if(pipeline)
1181                gst_element_set_state(pipeline, GST_STATE_PLAYING);
1182#endif
1183}
1184
1185int playerstop()
1186{
1187#ifdef EPLAYER3
1188        if(player && player->playback)
1189                player->playback->Command(player, PLAYBACK_STOP, NULL);
1190        if(player && player->container && player->container->selectedContainer)
1191                player->container->selectedContainer->Command(player, CONTAINER_STOP, NULL);
1192        if(player && player->output)
1193        {
1194                player->output->Command(player, OUTPUT_CLOSE, NULL);
1195                player->output->Command(player, OUTPUT_DEL, (void*)"audio");
1196                player->output->Command(player, OUTPUT_DEL, (void*)"video");
1197                player->output->Command(player, OUTPUT_DEL, (void*)"subtitle");
1198        }
1199        if(player && player->playback)
1200                player->playback->Command(player, PLAYBACK_CLOSE, NULL);
1201
1202        free(player);
1203        player = NULL;
1204// move to mc
1205//      set_player_sound(1);
1206#endif
1207
1208#ifdef EPLAYER4
1209        if(pipeline)
1210        {
1211                gst_element_set_state(pipeline, GST_STATE_NULL);
1212                gst_object_unref(GST_OBJECT(pipeline));
1213                pipeline = NULL;
1214        }
1215#endif
1216
1217        writesysint("/proc/sys/vm/drop_caches", 3, 0);
1218        return 0;
1219}
1220
1221void playerafterend()
1222{
1223#ifdef EPLAYER3
1224        if(player != NULL && player->playback != NULL)
1225                playerstop();
1226#endif
1227
1228#ifdef EPLAYER4
1229        if(pipeline)
1230                playerstop();
1231#endif
1232}
1233
1234void playerpause()
1235{
1236#ifdef EPLAYER3
1237        if(player && player->playback)
1238                player->playback->Command(player, PLAYBACK_PAUSE, NULL);
1239#endif
1240
1241#ifdef EPLAYER4
1242        if(pipeline)
1243                gst_element_set_state(pipeline, GST_STATE_PAUSED);
1244#endif
1245}
1246
1247void playercontinue()
1248{
1249#ifdef EPLAYER3
1250        if(player && player->playback)
1251                player->playback->Command(player, PLAYBACK_CONTINUE, NULL);
1252#endif
1253
1254#ifdef EPLAYER4
1255        if(pipeline)
1256                gst_element_set_state(pipeline, GST_STATE_PLAYING);
1257#endif
1258}
1259
1260void playerff(int speed)
1261{
1262#ifdef EPLAYER3
1263        int speedmap = 0;
1264
1265        if (speed < 1) speed = 1;
1266        if (speed > 7) speed = 7;
1267
1268        switch(speed)
1269        {
1270                case 1: speedmap = 1; break;
1271                case 2: speedmap = 3; break;
1272                case 3: speedmap = 7; break;
1273                case 4: speedmap = 15; break;
1274                case 5: speedmap = 31; break;
1275                case 6: speedmap = 63; break;
1276                case 7: speedmap = 127; break;
1277        }
1278
1279        if(player && player->playback)
1280                player->playback->Command(player, PLAYBACK_FASTFORWARD, &speedmap);
1281#endif
1282}
1283
1284void playerslow(int speed)
1285{
1286#ifdef EPLAYER3
1287        int speedmap = 0;
1288
1289        if (speed < 1) speed = 1;
1290        if (speed > 7) speed = 7;
1291
1292        switch(speed)
1293        {
1294                case 1: speedmap = 1; break;
1295                case 2: speedmap = 3; break;
1296                case 3: speedmap = 7; break;
1297                case 4: speedmap = 15; break;
1298                case 5: speedmap = 31; break;
1299                case 6: speedmap = 63; break;
1300                case 7: speedmap = 127; break;
1301        }
1302
1303        if(player && player->playback)
1304                player->playback->Command(player, PLAYBACK_SLOWMOTION, &speedmap);
1305#endif
1306}
1307
1308void playerfr(int speed)
1309{
1310#ifdef EPLAYER3
1311        int speedmap = 0;
1312
1313        if (speed > -1) speed = -1;
1314        if (speed < -7) speed = -7;
1315
1316        switch(speed)
1317        {
1318                case -1: speedmap = -5; break;
1319                case -2: speedmap = -10; break;
1320                case -3: speedmap = -20; break;
1321                case -4: speedmap = -40; break;
1322                case -5: speedmap = -80; break;
1323                case -6: speedmap = -160; break;
1324                case -7: speedmap = -320; break;
1325        }
1326
1327        if(player && player->playback)
1328                player->playback->Command(player, PLAYBACK_FASTBACKWARD, &speedmap);
1329#endif
1330}
1331
1332void playerseek(float sec)
1333{
1334#ifdef EPLAYER3
1335        if(player && player->playback)
1336                player->playback->Command(player, PLAYBACK_SEEK, (void*)&sec);
1337#endif
1338
1339#ifdef EPLAYER4
1340        gint64 nanos_pts = 0, nanos_len = 0;
1341        gint64 pts = 0, len = 0;
1342        //GstFormat fmt = GST_FORMAT_TIME;
1343               
1344        if(pipeline)
1345        {
1346                len = playergetlength();
1347                nanos_len = len * 1000000000;
1348                if(nanos_len < 0) nanos_len = 0;
1349
1350                pts = playergetpts();
1351                nanos_pts = pts * 11111;
1352                nanos_pts = nanos_pts + (sec * 1000000000);
1353                if(nanos_pts < 0) nanos_pts = 0;
1354
1355                if(nanos_pts >= nanos_len)
1356                        playerstop();
1357                else
1358                        gst_element_seek(pipeline, 1.0, GST_FORMAT_TIME, GST_SEEK_FLAG_FLUSH, GST_SEEK_TYPE_SET, nanos_pts, GST_SEEK_TYPE_NONE, GST_CLOCK_TIME_NONE);
1359        }
1360#endif
1361}
1362
1363typedef enum { atUnknown, atMPEG, atMP3, atAC3, atDTS, atAAC, atPCM, atOGG, atFLAC, atWMA } audiotype_t;
1364
1365audiotype_t gstCheckAudioPad(GstStructure* structure)
1366{
1367        if (!structure)
1368                return atUnknown;
1369
1370        if ( gst_structure_has_name (structure, "audio/mpeg"))
1371        {
1372                gint mpegversion, layer = -1;
1373                if (!gst_structure_get_int (structure, "mpegversion", &mpegversion))
1374                        return atUnknown;
1375
1376                switch (mpegversion) {
1377                        case 1:
1378                                {
1379                                        gst_structure_get_int (structure, "layer", &layer);
1380                                        if ( layer == 3 )
1381                                                return atMP3;
1382                                        else
1383                                                return atMPEG;
1384                                        break;
1385                                }
1386                        case 2:
1387                                return atAAC;
1388                        case 4:
1389                                return atAAC;
1390                        default:
1391                                return atUnknown;
1392                }
1393        }
1394
1395        else if ( gst_structure_has_name (structure, "audio/x-ac3") || gst_structure_has_name (structure, "audio/ac3") )
1396                return atAC3;
1397        else if ( gst_structure_has_name (structure, "audio/x-dts") || gst_structure_has_name (structure, "audio/dts") )
1398                return atDTS;
1399#if GST_VERSION_MAJOR < 1
1400        else if ( gst_structure_has_name (structure, "audio/x-raw-int") )
1401#else
1402        else if ( gst_structure_has_name (structure, "audio/x-raw") )
1403#endif
1404                return atPCM;
1405
1406        return atUnknown;
1407}
1408
1409void playerfreetracklist(char** TrackList)
1410{
1411        int i = 0;
1412
1413        if(TrackList != NULL)
1414        {
1415                while(TrackList[i] != NULL)
1416                {
1417                        free(TrackList[i]);
1418                        free(TrackList[i + 1]);
1419                        i += 2;
1420                }
1421        }
1422}
1423
1424char** playergettracklist(int type)
1425{
1426        char ** TrackList = NULL;
1427#ifdef EPLAYER3
1428        if(player && player->manager)
1429        {
1430                switch(type)
1431                {
1432                        case 1:
1433                                if(player->manager->audio)
1434                                {
1435                                        player->manager->audio->Command(player, MANAGER_LIST, &TrackList);
1436                                        debug(150, "Audio Track List");
1437                                }
1438                                break;
1439                        case 2:
1440                                if(player->manager->subtitle)
1441                                {
1442                                        player->manager->subtitle->Command(player, MANAGER_LIST, &TrackList);
1443                                        debug(150, "Subtitle Track List");
1444                                }
1445                                break;
1446                        default:
1447                                if(player->manager->video)
1448                                {
1449                                        player->manager->video->Command(player, MANAGER_LIST, &TrackList);
1450                                        debug(150, "Video Track List");
1451                                }
1452                }
1453               
1454                int i = 0;
1455                if(TrackList != NULL)
1456                {
1457                        while(TrackList[i] != NULL)
1458                        {
1459                                string_newline(TrackList[i]);
1460                                i += 2;
1461                        }
1462                       
1463                        debug(150, "Track List");
1464                        i = 0;
1465                        while(TrackList[i] != NULL)
1466                        {
1467                                debug(150, "%s - %s", TrackList[i], TrackList[i + 1]);
1468                                i += 2;
1469                        }
1470                }
1471        }
1472#endif
1473
1474//////////////////////////////NEUER CODE //////////////////////////////
1475#ifdef EPLAYER4
1476        //char ** tmpTrackList[2][100];
1477        TrackList = calloc(1, sizeof(char *) * ((100 * 2) + 1));
1478        //TrackList = tmpTrackList;
1479       
1480        if(pipeline != NULL)
1481        {
1482                gint i, n_video = 0, n_audio = 0, n_text = 0;
1483               
1484                g_object_get(pipeline, "n-video", &n_video, NULL);
1485                g_object_get(pipeline, "n-audio", &n_audio, NULL);
1486                g_object_get(pipeline, "n-text", &n_text, NULL);
1487               
1488                switch(type)
1489                {
1490                        case 1:
1491                                for(i = 0; i < n_audio; i++)
1492                                {
1493                                        GstTagList *tags = NULL;
1494                                        gchar *g_codec = NULL, *g_lang = NULL;
1495                                        char* tmpstr = NULL;
1496                                        GstPad* pad = 0;
1497                                       
1498                                        g_signal_emit_by_name (pipeline, "get-audio-pad", i, &pad);
1499#if GST_VERSION_MAJOR < 1
1500                                        GstCaps* caps = gst_pad_get_negotiated_caps(pad);
1501#else
1502                                        GstCaps* caps = gst_pad_get_current_caps(pad);
1503#endif
1504                                        if(!caps)
1505                                                continue;
1506                                       
1507                                        GstStructure* str = gst_caps_get_structure(caps, 0);
1508                                        const gchar *g_type = gst_structure_get_name(str);
1509
1510                                        g_signal_emit_by_name(pipeline, "get-audio-tags", i, &tags);
1511
1512#if GST_VERSION_MAJOR < 1
1513                                        if(tags && gst_is_tag_list(tags))
1514#else
1515                                        if(tags && GST_IS_TAG_LIST(tags))
1516#endif
1517                                        {
1518                                                if(gst_tag_list_get_string(tags, GST_TAG_AUDIO_CODEC, &g_codec))
1519                                                {
1520                                                        printf("Audio Codec: %s\n", g_codec);
1521
1522                                                        tmpstr = ostrcat(g_codec, NULL, 0, 0);
1523                                                        if(tmpstr != NULL)
1524                                                                tmpstr = ostrcat(tmpstr, " (", 1, 0);
1525                                                        tmpstr = ostrcat(tmpstr, (gchar*)g_type, 1, 0);
1526                                                        if(g_codec != NULL)
1527                                                                tmpstr = ostrcat(tmpstr, ")", 1, 0);
1528
1529                                                        TrackList[i * 2] = ostrcat(tmpstr, NULL, 0, 0);
1530                                                        g_free(tmpstr); tmpstr = NULL;
1531                                                        g_free(g_codec); g_codec = NULL;
1532                                                }
1533                                                if(gst_tag_list_get_string(tags, GST_TAG_LANGUAGE_CODE, &g_lang))
1534                                                {
1535                                                        printf("Audio Lang: %s\n", g_lang);
1536                                                        TrackList[(i * 2) + 1] = ostrcat(g_lang, NULL, 0, 0);
1537                                                        g_free(g_lang); g_lang = NULL;
1538                                                }
1539                                                gst_tag_list_free(tags);
1540                                        }
1541                                        else
1542                                        {
1543                                                printf("Audio Codec: %s\n", g_codec);
1544                                               
1545                                                tmpstr = ostrcat(g_codec, NULL, 0, 0);
1546                                                if(tmpstr != NULL)
1547                                                        tmpstr = ostrcat(tmpstr, " (", 1, 0);
1548                                                tmpstr = ostrcat(tmpstr, (gchar*)g_type, 1, 0);
1549                                                if(g_codec != NULL)
1550                                                        tmpstr = ostrcat(tmpstr, ")", 1, 0);
1551                                                               
1552                                                TrackList[i * 2] = ostrcat(tmpstr, NULL, 0, 0);
1553
1554                                                g_free(tmpstr); tmpstr = NULL;
1555                                                g_free(g_codec); g_codec = NULL;
1556                                        }
1557                                }
1558                                break;
1559                        case 2:
1560                                for(i = 0; i < n_text; i++)
1561                                {
1562                                        GstTagList *tags = NULL;
1563                                        gchar *g_codec = NULL, *g_lang = NULL;
1564//                                      GstPad* pad = 0;
1565                               
1566                                        g_signal_emit_by_name(pipeline, "get-text-tags", i, &tags);
1567                                       
1568#if GST_VERSION_MAJOR < 1
1569                                        if (tags && gst_is_tag_list(tags))
1570#else
1571                                        if (tags && GST_IS_TAG_LIST(tags))
1572#endif
1573                                        {
1574                                                if(gst_tag_list_get_string(tags, GST_TAG_SUBTITLE_CODEC, &g_codec));
1575                                                {
1576                                                        printf("SubTitle Codec: %s\n", g_codec);
1577                                                        TrackList[i * 2] = ostrcat(g_codec, NULL, 0, 0);
1578                                                        g_free(g_codec); g_codec = NULL;
1579                                                }
1580                                                if(gst_tag_list_get_string(tags, GST_TAG_LANGUAGE_CODE, &g_lang))
1581                                                {
1582                                                        printf("SubTitle Lang: %s\n", g_lang);
1583                                                        TrackList[(i * 2) + 1] = ostrcat(g_lang, NULL, 0, 0);
1584                                                        g_free(g_lang); g_lang = NULL;
1585                                                }
1586                                                gst_tag_list_free(tags);
1587                                        }
1588/*
1589                                        g_signal_emit_by_name(pipeline, "get-text-pad", i, &pad);
1590                                        if(pad)
1591                                                g_signal_connect(G_OBJECT(pad), "notify::caps", G_CALLBACK (gstTextpadHasCAPS), this);
1592
1593                                        printf("getSubtitleType: %d\n", getSubtitleType(pad, g_codec));
1594*/
1595                                }
1596                                break;
1597                        default:
1598                                for(i = 0; i < n_video; i++)
1599                                {
1600                                        GstTagList *tags = NULL;
1601                                        gchar *g_codec = NULL, *g_lang = NULL;
1602                                       
1603                                        g_signal_emit_by_name(pipeline, "get-video-tags", i, &tags);
1604                                       
1605#if GST_VERSION_MAJOR < 1
1606                                        if (tags && gst_is_tag_list(tags))
1607#else
1608                                        if (tags && GST_IS_TAG_LIST(tags))
1609#endif
1610                                        {
1611                                                if(gst_tag_list_get_string(tags, GST_TAG_VIDEO_CODEC, &g_codec));
1612                                                {
1613                                                        printf("Video Codec: %s\n", g_codec);
1614                                                        TrackList[i * 2] = ostrcat(g_codec, NULL, 0, 0);
1615                                                        g_free(g_codec); g_codec = NULL;
1616                                                }
1617                                                if(gst_tag_list_get_string(tags, GST_TAG_LANGUAGE_CODE, &g_lang))
1618                                                {
1619                                                        printf("Video Lang: %s\n", g_lang);
1620                                                        TrackList[(i * 2) + 1] = ostrcat(g_lang, NULL, 0, 0);
1621                                                        g_free(g_lang); g_lang = NULL;
1622                                                }
1623                                                gst_tag_list_free(tags);
1624                                        }
1625                                }
1626                }
1627        }
1628#endif
1629//////////////////////////////NEUER CODE //////////////////////////////
1630
1631        return TrackList;
1632}
1633
1634//*CurTrackEncoding and *CurTrackName be freed
1635void playergetcurtrac(int type, int *CurTrackId, char** CurTrackEncoding, char** CurTrackName)
1636{
1637#ifdef EPLAYER3
1638        if(player && player->manager)
1639        {
1640                switch(type)
1641                {
1642                        case 1:
1643                                if(player->manager->audio)
1644                                {
1645                                        player->manager->audio->Command(player, MANAGER_GET, CurTrackId);
1646                                        player->manager->audio->Command(player, MANAGER_GETENCODING, CurTrackEncoding);
1647                                        player->manager->audio->Command(player, MANAGER_GETNAME, CurTrackName);
1648                                }
1649                                break;
1650                        case 2:
1651                                if(player->manager->subtitle)
1652                                {
1653                                        player->manager->subtitle->Command(player, MANAGER_GET, CurTrackId);
1654                                        player->manager->subtitle->Command(player, MANAGER_GETENCODING, CurTrackEncoding);
1655                                        player->manager->subtitle->Command(player, MANAGER_GETNAME, CurTrackName);
1656                                }
1657                                break;
1658                        default:
1659                                if(player->manager->video)
1660                                {
1661                                        player->manager->video->Command(player, MANAGER_GET, CurTrackId);
1662                                        player->manager->video->Command(player, MANAGER_GETENCODING, CurTrackEncoding);
1663                                        player->manager->video->Command(player, MANAGER_GETNAME, CurTrackName);
1664                                }
1665                }
1666
1667                if(CurTrackId != NULL)
1668                        debug(150, "Current Track ID: %d", *CurTrackId);
1669                if(*CurTrackEncoding != NULL)
1670                        debug(150, "Current Track Enc: %s", *CurTrackEncoding);
1671                if(*CurTrackName != NULL)
1672                        debug(150, "Current Track Name: %s", *CurTrackName);
1673        }
1674#endif
1675
1676#ifdef EPLAYER4
1677        if(pipeline != NULL)
1678        {
1679                switch(type)
1680                {
1681                        case 1:
1682                                g_object_get(G_OBJECT(pipeline), "current-audio", CurTrackId, NULL);
1683                                break;
1684                }
1685               
1686                if(CurTrackId != NULL)
1687                        debug(150, "Current Track ID: %d", *CurTrackId);
1688        }
1689#endif
1690}
1691
1692unsigned long long playergetpts()
1693{
1694        unsigned long long pts = 0;
1695        unsigned long long sec = 0;
1696
1697#ifdef EPLAYER3
1698        if(player && player->playback)
1699        {
1700                player->playback->Command(player, PLAYBACK_PTS, &pts);
1701                sec = pts / 90000;
1702                debug(150, "Pts = %02d:%02d:%02d (%llu.0000 sec)", (int)((sec / 60) / 60) % 60, (int)(sec / 60) % 60, (int)sec % 60, sec);
1703        }
1704#endif
1705
1706#ifdef EPLAYER4
1707        GstFormat fmt = GST_FORMAT_TIME; //Returns time in nanosecs
1708       
1709/*
1710        if(pipeline)
1711        {
1712                gst_element_query_position(pipeline, &fmt, (gint64*)&pts);
1713                sec = pts / 1000000000;
1714                pts = sec * 90000;
1715                debug(150, "Pts = %02d:%02d:%02d (%llu.0000 sec)", (int)((sec / 60) / 60) % 60, (int)(sec / 60) % 60, (int)sec % 60, sec);
1716        }
1717*/
1718
1719        if(pipeline)
1720        {
1721                gint64 pos;
1722                GstElement *sink;
1723                pts = 0;
1724
1725                g_object_get(G_OBJECT (pipeline), "audio-sink", &sink, NULL);
1726
1727                if(!sink) g_object_get (G_OBJECT (pipeline), "video-sink", &sink, NULL);
1728                if(!sink) return 0;
1729
1730                gchar *name = gst_element_get_name(sink);
1731                gboolean use_get_decoder_time = ostrstr(name, "dvbaudiosink") || ostrstr(name, "dvbvideosink");
1732                g_free(name);
1733
1734                if(use_get_decoder_time) g_signal_emit_by_name(sink, "get-decoder-time", &pos);
1735
1736                gst_object_unref(sink);
1737
1738                if(!use_get_decoder_time && !gst_element_query_position(pipeline, &fmt, &pos))
1739                        return 0;
1740
1741                /* pos is in nanoseconds. we have 90 000 pts per second. */
1742                pts = pos / 11111;
1743                pts = pts - m_gst_startpts;
1744                sec = pts / 90000;
1745                debug(150, "StartPTS = %llu Pts = %02d:%02d:%02d (%llu.0000 sec)", m_gst_startpts, (int)((sec / 60) / 60) % 60, (int)(sec / 60) % 60, (int)sec % 60, sec);
1746        }
1747#endif
1748
1749        if(pts < 0) pts = 0;
1750        return pts;
1751}
1752
1753double playergetlength()
1754{
1755        double length = 0;
1756
1757#ifdef EPLAYER3
1758        if(player && player->playback)
1759        {
1760                player->playback->Command(player, PLAYBACK_LENGTH, &length);
1761                if(length < 0) length = 0;
1762                debug(150, "Length = %02d:%02d:%02d (%.4f sec)", (int)((length / 60) / 60) % 60, (int)(length / 60) % 60, (int)length % 60, length);
1763        }
1764#endif
1765
1766#ifdef EPLAYER4
1767        GstFormat fmt = GST_FORMAT_TIME; //Returns time in nanosecs
1768        gint64 len;
1769
1770        if(pipeline)
1771        {
1772                gst_element_query_duration(pipeline, &fmt, &len);
1773                length = len / 1000000000;
1774                if(length < 0) length = 0;
1775                debug(150, "Length = %02d:%02d:%02d (%.4f sec)", (int)((length / 60) / 60) % 60, (int)(length / 60) % 60, (int)length % 60, length);
1776        }
1777#endif
1778
1779        return length;
1780}
1781
1782char* playergetinfo(char* tag)
1783{
1784        char* ret = NULL;
1785
1786#ifdef EPLAYER3
1787        char *tags[] = {"Title", "Artist", "Album", "Year", "Genre", "Comment", "Track", "Copyright", "TestLibEplayer", NULL};
1788        int i = 0;
1789
1790        if(player && player->playback)
1791        {
1792                while(tags[i] != NULL)
1793                {
1794                        ret = tags[i];
1795                        if(ostrcmp(tag, ret) == 0)
1796                        {
1797                                player->playback->Command(player, PLAYBACK_INFO, &ret);
1798                                break;
1799                        }
1800
1801                        i++;
1802                }
1803        }
1804#endif
1805        return ret;
1806}
1807
1808void playerchangeaudiotrack(int num)
1809{
1810#ifdef EPLAYER3
1811        if(player && player->playback)
1812                player->playback->Command(player, PLAYBACK_SWITCH_AUDIO, (void*)&num);
1813#endif
1814
1815#ifdef EPLAYER4
1816        if(pipeline != NULL)
1817                g_object_set(G_OBJECT(pipeline), "current-audio", num, NULL);   
1818#endif
1819}
1820
1821void playerchangesubtitletrack(int num)
1822{
1823#ifdef EPLAYER3
1824        if(player && player->playback)
1825                player->playback->Command(player, PLAYBACK_SWITCH_SUBTITLE, (void*)&num);
1826#endif
1827}
1828
1829void playerstopsubtitletrack()
1830{
1831#ifdef EPLAYER3
1832        if(player && player->output && player->output->subtitle)
1833                player->output->subtitle->Command(player, (OutputCmd_t)OUTPUT_STOP, NULL);
1834        if(player && player->container && player->container->assContainer)
1835        {
1836                player->container->assContainer->Command(player, CONTAINER_STOP, NULL);
1837                player->container->assContainer->Command(player, CONTAINER_INIT, NULL);
1838        }
1839        if(player && player->manager && player->manager->subtitle)
1840        {
1841                int onlycurrent = 1;
1842                player->manager->subtitle->Command(player, MANAGER_DEL, (void*)&onlycurrent);
1843        }
1844#endif
1845}
1846
1847int playerjumpts(struct service* servicenode, int sekunden, int *startpts, off64_t *poslastpts, off64_t *bitrate, int vpid, int tssize)
1848{
1849        int adaptation = 0;
1850        int payload = 0;
1851        int pes = 0;
1852        int tspid = 0;
1853       
1854        off64_t pts  = 0;
1855        uint64_t aktpts = 0;
1856        long long unsigned int lenpts = 0;
1857        long long unsigned int startpts1 = 0;
1858        long long unsigned int endpts = 0;
1859        long long unsigned int aktbitrate = 0;
1860        off64_t ziehlpts = 0;
1861
1862        off64_t curpos = 0;
1863        off64_t newpos = 0;
1864        off64_t jump = 0;
1865
1866        int kleiner = 0;
1867        int groesser = 0;
1868        int gleich = 0;
1869        int len = 0;
1870        int i = 0;
1871        int ret = 0;
1872
1873        if(servicenode == NULL) return -1;
1874
1875        int buflen = tssize * 15000;
1876        char *buf = malloc(buflen);
1877        if(buf == NULL)
1878                return -1;
1879       
1880        curpos = lseek64(servicenode->recsrcfd, 0, SEEK_CUR);   
1881        int dupfd = open(servicenode->recname, O_RDONLY | O_LARGEFILE);
1882        newpos = lseek64(dupfd, curpos, SEEK_SET);
1883       
1884        if (*startpts == 0)
1885        {
1886                if(videogetpts(status.aktservice->videodev, &aktpts) == 0)
1887                {
1888                                ziehlpts = (aktpts / 90000) + sekunden;
1889                }
1890                else
1891                        return 1;
1892        }
1893        else
1894        {
1895                ziehlpts = *startpts + sekunden;
1896        }
1897        *startpts = ziehlpts;
1898
1899        if(*bitrate == 0)
1900        {
1901                lenpts = servicenode->lenpts;
1902                startpts1 = servicenode->startpts;
1903                endpts = servicenode->endpts;
1904                aktbitrate = servicenode->bitrate;
1905                ret = gettsinfo(dupfd, &lenpts, &startpts1, &endpts, &aktbitrate, servicenode->tssize);
1906                if(ret != 0)
1907                {
1908                        err("can't read ts info");
1909                }
1910                else
1911                        *bitrate = aktbitrate;
1912                newpos = lseek64(dupfd, curpos, SEEK_SET);
1913        }
1914        else
1915                aktbitrate = *bitrate;
1916               
1917        if(*poslastpts == 0)
1918                *poslastpts = curpos;
1919       
1920        if(sekunden > 0)
1921        {
1922                err("not implemented");
1923                return 1;
1924        }       
1925        else if(sekunden < 0)
1926        {
1927                sekunden = sekunden * -1;
1928                if(aktbitrate != 0)
1929                {
1930                        jump = (aktbitrate / 8) * sekunden;
1931                        jump = jump + (curpos - *poslastpts);
1932                        jump = jump + (jump % servicenode->tssize);
1933                        newpos = lseek64(dupfd, -jump, SEEK_CUR);
1934                }
1935                else
1936                        newpos = lseek64(dupfd, - buflen, SEEK_CUR);
1937                if(newpos < 0)
1938                        newpos = lseek64(dupfd, tssize, SEEK_SET);
1939        }
1940        len = read(dupfd, buf, buflen);
1941        for(i = 0; i < len; i = i + 1)
1942        {
1943                if (buf[i] == 0x47 && buf[i+tssize] == 0x47)
1944                {
1945                        newpos = lseek64(dupfd, newpos + i, SEEK_SET);
1946                        break;
1947                }
1948        }
1949        if(i >= len)
1950        {
1951                newpos = lseek64(dupfd, curpos, SEEK_SET);     
1952                return 1;
1953        }
1954        while(1)
1955        {
1956        len = read(dupfd, buf, buflen);
1957
1958                if(len > 0)
1959                {
1960                        for(i = 0; i <= len-tssize; i = i + tssize)
1961                        {
1962                                payload = 0;
1963
1964                                tspid = (buf[i+1] & 0x1F) << 8;
1965                                tspid = tspid + (buf[i+2] & 0xFF);
1966                                pes = buf[i+1] & 0x40;
1967
1968                                if(tspid == vpid)
1969                                {       
1970                                        adaptation = buf[i+3] & 0x30;
1971                                        if(adaptation == 16)
1972                                        {
1973                                                payload = 4;
1974                                        }
1975                                        if(adaptation == 32)
1976                                        {
1977                                                //printf("adaptation field only\n");
1978                                        }
1979                                        if(adaptation == 48)
1980                                        {
1981                                                payload = buf[i+4] & 0xFF;
1982                                                payload = payload + 5;
1983                                        }
1984                                        if(payload != 0)
1985                                        {
1986                                                if(pes == 64)
1987                                                {
1988                                                        if(buf[i+payload+7] & 0x80) //PTS
1989                                                        {
1990                                                                pts = ((unsigned long long)(buf[i+payload+9] & 0xE)) << 29;
1991                                                                pts |= ((unsigned long long)(buf[i+payload+10] & 0xFF)) << 22;
1992                                                                pts |= ((unsigned long long)(buf[i+payload+11] & 0xFE)) << 14;
1993                                                                pts |= ((unsigned long long)(buf[i+payload+12] & 0xFF)) << 7;
1994                                                                pts |= ((unsigned long long)(buf[i+payload+13] & 0xFE)) >> 1;
1995                                                               
1996                                                                if(pts / 90000 == ziehlpts)
1997                                                                {
1998                                                                        gleich = newpos + i;
1999                                                                        break;
2000                                                                }
2001                                                                else if(pts / 90000 > ziehlpts)
2002                                                                {                                                                       
2003                                                                        groesser = newpos + i;
2004                                                                        break;
2005                                                                }
2006                                                                else
2007                                                                {
2008                                                                        kleiner = newpos + i;
2009                                                                }
2010                                                        }
2011                                                }
2012                                        }
2013                                }
2014                        }
2015                        if(gleich != 0)
2016                        {
2017                                close(dupfd);
2018                                free(buf);buf = NULL;
2019                                *poslastpts = lseek64(servicenode->recsrcfd, gleich, SEEK_SET);
2020                                return 0;
2021                        }
2022                        else if(groesser != 0 && kleiner != 0)
2023                        {
2024                                close(dupfd);
2025                                free(buf);buf = NULL;
2026                                *poslastpts = lseek64(servicenode->recsrcfd, kleiner, SEEK_SET);
2027                                return 0;
2028                        }
2029                        else if(groesser != 0)
2030                        {
2031                                if((newpos - buflen)  < 0)
2032                                {
2033                                        close(dupfd);
2034                                        free(buf);buf = NULL;
2035                                        *poslastpts = 0;
2036                                        return -1       ;
2037                                }
2038                                else
2039                                {
2040                                        newpos = lseek64(dupfd, -(buflen * 2), SEEK_CUR);
2041                                }
2042                        }
2043                }
2044                else
2045                {
2046                        if(kleiner == 0)
2047                        {
2048                                close(dupfd);
2049                                free(buf);buf = NULL;
2050                                newpos = lseek64(servicenode->recsrcfd, curpos, SEEK_SET);
2051                                *poslastpts = 0;
2052                                return -1;
2053                        }
2054                        else
2055                        {
2056                                close(dupfd);
2057                                free(buf);buf = NULL;
2058                                *poslastpts = lseek64(servicenode->recsrcfd, kleiner, SEEK_SET);
2059                                return 0;
2060                        }
2061                }
2062        }
2063}
2064
2065//praez = 1 .... sekunden
2066//                      =       2 .... zehntel
2067//                      = 3 .... hundertstel
2068//                      = 4 .... volle Uebereinstimmung
2069//
2070//type  = 0 .... alle
2071//                      = 1 .... nur PCR
2072//                      = 2 .... nur Video
2073//                      = 3 .... nur Audio
2074//
2075//flag = 0 --> play ts
2076//flag = 1 --> timeshift
2077//flag = 2 --> timeshift, not in play mode (only recording)
2078//flag = 9 --> dataset mode
2079//
2080off64_t playergetptspos(unsigned long long fpts, off64_t pos, int dir, int praez, int type, int flag, char* dsn)
2081{
2082        unsigned long long pts;
2083        int ret = 0, dupfd = -1, left = 0, tssize = 0, recbsize = 0;
2084        unsigned char* buf = NULL;
2085        unsigned char *payload;
2086        int pid = 0, pusi = 0;
2087        unsigned char* packet;
2088        struct service* snode;
2089       
2090        if(type > 3)
2091        {
2092                printf("type %i nicht unterstützt\n", type);
2093                return -1;
2094        }
2095       
2096        if(flag == 2)
2097                snode = getservice(RECORDTIMESHIFT, 0);
2098        else if(flag != 9)
2099                snode = getservice(RECORDPLAY, 0);
2100               
2101        if(flag == 9)
2102        {
2103                tssize = 188;
2104                recbsize = tssize * 1024 * 10;
2105                dupfd = open(dsn, O_RDONLY | O_LARGEFILE );
2106        }
2107        else
2108        {
2109                tssize = snode->tssize;
2110                recbsize = snode->tssize * 1024 * 10;
2111                dupfd = open(snode->recname, O_RDONLY | O_LARGEFILE);
2112        }
2113
2114        if(dupfd < 0)
2115        {
2116                err("copy source fd not ok");
2117                return -1;
2118        }
2119
2120        buf = malloc(recbsize);
2121        if(buf == NULL)
2122        {
2123                err("no mem");
2124                return -1;
2125        }
2126        packet = buf;
2127        if(dir > 0) 
2128                pos = lseek64(dupfd, pos, SEEK_SET);
2129        else
2130                pos = lseek64(dupfd, pos - recbsize, SEEK_SET);
2131       
2132        ret = read(dupfd,  buf, recbsize);
2133        close(dupfd);
2134        left = 0;
2135       
2136        if(buf[0] != 0x47)
2137        {
2138                while(left < tssize)
2139                {
2140                        if(buf[left] == 0x47) break;
2141                        left++;
2142                }
2143                if(left >= tssize)
2144                {
2145                        free(buf);
2146                        return -1;
2147                }       
2148        }
2149        pts = 0;
2150        while(left <= recbsize - tssize)
2151        {
2152                if(pts != 0)
2153                {
2154                        switch( praez )
2155          {
2156        case 1 :        if(fpts / 90000 != pts / 90000)
2157                                                        pts = 0;
2158                                                break;
2159        case 2 :        if(fpts / 9000 != pts / 9000)
2160                                                        pts = 0;
2161                                                break;
2162        case 3 :        if(fpts / 900 != pts / 900)
2163                                                        pts = 0;
2164                                                break;         
2165        case 4 :        if(fpts != pts )
2166                                                        pts = 0;
2167                                                break;
2168                                default :       free(buf); return -1; break;
2169                        }
2170                        if(pts != 0)
2171                        {       
2172                                pos = pos + left - tssize;
2173                                free(buf);
2174                                return pos;
2175                        }
2176                }
2177                packet = buf + left;
2178                left = left + tssize;
2179                                               
2180                pid = ((packet[1] << 8) | packet[2]) & 0x1FFF;
2181                pusi = !!(packet[1] & 0x40);
2182                //check for adaption field
2183                if(packet[3] & 0x20)
2184                {
2185                        if(type > 1)continue;
2186                        if(packet[4] >= 183) continue;
2187                        if(packet[4])
2188                        {
2189                                if(packet[5] & 0x10) //PCR present
2190                                {
2191                                        pts = ((unsigned long long)(packet[6] & 0xFF)) << 25;
2192                                        pts |= ((unsigned long long)(packet[7] & 0xFF)) << 17;
2193                                        pts |= ((unsigned long long)(packet[8] & 0xFE)) << 9;
2194                                        pts |= ((unsigned long long)(packet[9] & 0xFF)) << 1;
2195                                        pts |= ((unsigned long long)(packet[10] & 0x80)) >> 7;
2196                                        continue;
2197                                }
2198                        }
2199                        payload = packet + packet[4] + 4 + 1;
2200                } else
2201                        payload = packet + 4;
2202               
2203                if(type == 1) continue;
2204                if(!pusi) continue;
2205               
2206                if (payload[0] || payload[1] || (payload[2] != 1))
2207                        continue;
2208               
2209                        //stream use extension mechanism def in ISO 13818-1 Amendment 2
2210                if(payload[3] == 0xFD)
2211                {
2212                        if(payload[7] & 1) //PES extension flag
2213                        {
2214                                int offs = 0;
2215                                if(payload[7] & 0x80) offs += 5; //pts avail
2216                                if(payload[7] & 0x40) offs += 5; //dts avail
2217                                if(payload[7] & 0x20) offs += 6; //escr avail
2218                                if(payload[7] & 0x10) offs += 3; //es rate
2219                                if(payload[7] & 0x8) offs += 1; //dsm trickmode
2220                                if(payload[7] & 0x4) offs += 1; //additional copy info
2221                                if(payload[7] & 0x2) offs += 2; //crc
2222                                if(payload[8] < offs) continue;
2223
2224                                uint8_t pef = payload[9 + offs++]; //pes extension field
2225                                if(pef & 1) //pes extension flag 2
2226                                {
2227                                        if(pef & 0x80) offs += 16; //private data flag
2228                                        if(pef & 0x40) offs += 1; //pack header field flag
2229                                        if(pef & 0x20) offs += 2; //program packet sequence counter flag
2230                                        if(pef & 0x10) offs += 2; //P-STD buffer flag
2231                                        if(payload[8] < offs) continue;
2232
2233                                        uint8_t stream_id_extension_len = payload[9 + offs++] & 0x7F;
2234                                        if(stream_id_extension_len >= 1)
2235                                        {
2236                                                if(payload[8] < (offs + stream_id_extension_len)) continue;
2237                                                //stream_id_extension_bit (should not set)
2238                                                if(payload[9 + offs] & 0x80) continue;
2239                                                switch(payload[9 + offs])
2240                                                {
2241                                                        case 0x55 ... 0x5f: break; //VC-1
2242                                                        case 0x71: break; //AC3 / DTS
2243                                                        case 0x72: break; //DTS - HD
2244                                                        default:
2245                                                                printf("skip unknwn stream_id_extension %02x\n", payload[9 + offs]);
2246                                                                continue;
2247                                                }
2248                                        }
2249                                        else
2250                                                continue;
2251                                }
2252                                else
2253                                        continue;
2254                        }
2255                        else
2256                                continue;
2257                }
2258                //drop non-audio, non-video packets because other streams
2259                //can be non-compliant.
2260                //0xC0 = audio, 0xE0 = video
2261                else if(((payload[3] & 0xE0) != 0xC0) && ((payload[3] & 0xF0) != 0xE0))
2262                        continue;
2263
2264                if((payload[7] & 0x80) && ((payload[3] & 0xF0) != 0xE0) && (type == 0 || type == 2)) //PTS video
2265                {
2266                        pts = ((unsigned long long)(payload[9] & 0xE)) << 29;
2267                        pts |= ((unsigned long long)(payload[10] & 0xFF)) << 22;
2268                        pts |= ((unsigned long long)(payload[11] & 0xFE)) << 14;
2269                        pts |= ((unsigned long long)(payload[12] & 0xFF)) << 7;
2270                        pts |= ((unsigned long long)(payload[13] & 0xFE)) >> 1;
2271                        continue;
2272                }
2273                if((payload[7] & 0x80) && ((payload[3] & 0xE0) != 0xC0) && (type == 0 || type == 3)) //PTS audio
2274                {
2275                        pts = ((unsigned long long)(payload[9] & 0xE)) << 29;
2276                        pts |= ((unsigned long long)(payload[10] & 0xFF)) << 22;
2277                        pts |= ((unsigned long long)(payload[11] & 0xFE)) << 14;
2278                        pts |= ((unsigned long long)(payload[12] & 0xFF)) << 7;
2279                        pts |= ((unsigned long long)(payload[13] & 0xFE)) >> 1;
2280                        continue;
2281                }
2282        }
2283        free(buf);
2284        return recbsize * -1;
2285}
2286
2287#endif
Note: See TracBrowser for help on using the repository browser.