hts tvheadend m3u import

[ego]

Не совсем плагин это, но все-же пишу сюда.

Подскажите, для просмотра IPtv можно-ли как-нибудь импортировать .m3u в программу или нужно все каналы вручную набивать?

[MATPOC]

Сообщение от ego

Не совсем плагин это, но все-же пишу сюда.
Подскажите, для просмотра IPtv можно-ли как-нибудь импортировать .m3u в программу или нужно все каналы вручную набивать?

Да, я писал скрипт для конвертирования плейлиста в формате navi-x. Поправьте в переменной $MIFACE интерфейс, с которого делаются запросы к провайдеру IPTV. Скрипт очень простой - берёт плейлист в формате m3u со стандартного ввода (stdin) или указать имя файла в качестве агрумента. Файлы нумеруются с 1001 (iptv_1001 и т.д.) чтобы не пересекаться с возможными спутниковыми каналами. Файлы с определениями IPTV каналов создаются в домашней директории ~/.hts/tvheadend/iptvservices текущего пользователя, то есть нужно запускать от имени пользователя, под которым работает tvehadend:

sudo su -c './m3u2hts.pl iptv.m3u' - hts

Если директория ~/.hts/tvheadend/iptvservices не существует или недоступна для записи, скрипт завершает работу с выводом предупреждения.

Позиции плейлиста m3u должны задаваться парами строк вида:

#EXTINF:что угодно , Имя канала
proto://@233.32.240.236:1234

Где proto == udp или rtp, адрес обязательно из четырёх чисел, разделённых точками.

Сам код очень простой, но там есть все заготовки для вывода плейлиста в других форматах - в переменные $mproto, $mgroup, $mport из строки URL вычленяются соответственно протокол, мультикаст группа и порт. Так как для вывода в формат tvheadend некторые переменные не используются, то perl выдаёт предупреждения, которые можно игнорировать:

Name "main::mproto" used only once: possible typo at ./m3u2hts.pl line 27.
Name "main::murl" used only once: possible typo at ./m3u2hts.pl line 28.

PHP код:

#!/usr/bin/perl -w

my $DEBUG = 0;
my $MIFACE = "eth1";
my $MAXN = 9999;

my $HTSIPTVDIR = "~/.hts/tvheadend/iptvservices";
# my $HTSIPTVDIR = "~/.hts/tvheadend/iptvtransports"; // old version
my $fcount = 1000;

# Check $HTSIPTVDIR exist?
### glob возвращает СПИСОК!!! нестабильно работает как скаляр
my @lghtsiptvdir = glob($HTSIPTVDIR);
my $ghtsiptvdir = $lghtsiptvdir[0];
die "Directory '$ghtsiptvdir' is not exist or not writable\n"
    if !(-w $ghtsiptvdir);

sub out_tvheadend;

while (defined($line = <>) ) {
    if ($line =~ /#EXTINF:.*,\s*(.*)(\s*)/) {
    $channel_name = $1;
    $channel_name =~ s/\r+//;

        if (defined($line = <>)
        and ($line =~ '(udp|rtp)://@?(\d+\.\d+\.\d+\.\d+):(\d+)')) {
        $mproto = $1; $mgroup = $2; $mport = $3;
        $murl = $line;
    }
    out_tvheadend;
    }
}

sub out_tvheadend
{
    do 
    { # ищем несуществующий файл iptv_ с номером $fcount
        $fname = sprintf "%s/iptv_%04u", $ghtsiptvdir, ++$fcount;
    } until (!(-e $fname) and ($fcount < $MAXN));

    print $fcount, " ", $channel_name, " ", $fname, "\n" if $DEBUG;

    if (!(open(FH, ">", $fname))) {
        warn "Couldn't open $fname for writing: $!\n"
    }
    else {
        print FH "{\n";
        print FH "\t\"pmt\": 0,\n";
        print FH "\t\"port\": $mport,\n";
        print FH "\t\"interface\": \"$MIFACE\",\n";
        print FH "\t\"group\": \"$mgroup\",\n";
        print FH "\t\"channelname\": \"$channel_name\",\n";
        print FH "\t\"mapped\": 1,\n";
        print FH "\t\"pcr\": 0,\n";
        print FH "\t\"disabled\": 0\n";
        print FH "}\n";
        close FH or warn "Couldn't close $fname: $!\n";
    } 
} 


[bam]

Спасибо за скрипт.
Было бы полезно добавить возможность обновления каналов tvheadend новыми каналами из плейлиста, а не импортировать каждый раз все каналы.

[Stranger]

чтобы темы не плодить, тоже здесь спрошу. никто не знает, можно xbmc+tvheadend заставить работать через udproxy? имеется прокси udp, который на выходе выдает поток по http протоколу (формат строки запроса http://192.168.1.1:81/udp/234.5.2.64:1234).

[MATPOC]

Сообщение от Stranger

чтобы темы не плодить, тоже здесь спрошу. никто не знает, можно xbmc+tvheadend заставить работать через udproxy? имеется прокси udp, который на выходе выдает поток по http протоколу (формат строки запроса http://192.168.1.1:81/udp/234.5.2.64:1234).

tvheadend понимает только udp и rtp. XBMC понимает почти всё, поэтому вы можете поднять udpxy и использовать локальные плейлисты, но без прелестей tvheadend. Для локальных плейлистов я рекомендую плагин Navi-X, обсуждение которого ведётся в ветке Плагин для IP-TV провайдеров на третьей странице.

[MATPOC]

Сообщение от bam

Спасибо за скрипт.
Было бы полезно добавить возможность обновления каналов tvheadend новыми каналами из плейлиста, а не импортировать каждый раз все каналы.

Такой скрипт за пять сек не рисуется. Я делаю проще - при помощи команды diff или fc получаю разницу между предыдущим и новым плейлистом и уже на этот маленький кусочек натравливаю скрипт.

[bam]

Сообщение от MATPOC

Такой скрипт за пять сек не рисуется. Я делаю проще - при помощи команды diff или fc получаю разницу между предыдущим и новым плейлистом и уже на этот маленький кусочек натравливаю скрипт.

Хм. Это тоже идея. Спасибо.
Думаю настроить запуск вашего скрипта при пробуждении системы из сна.
Возникает вопрос - если при этом будут проимпортированы новые каналы, заметит ли это tvheadend без перезапуска?

[MATPOC]

Сообщение от bam

Думаю настроить запуск вашего скрипта при пробуждении системы из сна.
Возникает вопрос - если при этом будут проимпортированы новые каналы, заметит ли это tvheadend без перезапуска?

Так часто обновляется плейлист? И tvheadebd автоматом не подхватит новые каналы, как минимум надо послать ему сигнал HUP.

[ego]

Большое Вам спасибо!