script multifunzionale per vedere le dirette televisive... e altro ^^

[Darby_Crash]

Codice: Seleziona tutto

@echo off
set pathos=%cd%
cd dip
set baseurl=rtmp://yalpvod.alice.cdn.interbusiness.it:1935/vod
if defined ProgramFiles(x86) (
	FOR /F "tokens=1 delims=[" %%A IN ('VER') DO ECHO %%A^(64-bits^) >nul
	set vlc=c:\progra~2\videolan\vlc\vlc >nul
) else (
	FOR /F "tokens=1 delims=[" %%A IN ('VER') DO ECHO %%A^(32-bits^) >nul
	set vlc=c:\progra~1\videolan\vlc\vlc >nul
)
cls
title La settimana di La7 by Darby_Crash
:TODAY
cls
echo.
if not exist "*.txt" goto INIZIO
set /p ddd=Vuoi scaricare l'elenco dei video della settimana? (S/N o X per uscire) - 
if "%ddd%"=="s" del *.txt & cls & goto INIZIO
if "%ddd%"=="n" goto XXX
if "%ddd%"=="x" goto FINE
goto TODAY

:INIZIO
cls
echo.
echo Estrazione dei video della settimana in corso...      ...ATTENDI...
set urlex=http://www.la7.tv/repliche/content/index.php?contentId=
curl -sS www.la7.tv/settimana/ >la7.html
type la7.html | grep -o "href=[^>]*" >la7.txt
del la7.html
find "assetid"<la7.txt>link.txt
del la7.txt
type link.txt | sed "s#href=# #g" >link2.txt
del link.txt
findstr /v "target='_blank'"<link2.txt>link.txt
del link2.txt
sed "s#http://www.la7.tv/richplayer/index.html?assetid=#http://www.la7.tv/repliche/content/index.php?contentId=#g" link.txt>ex.txt
del link.txt
call vislin.bat ex.txt 1 100 >file.txt
del ex.txt
:OPE
set /a cont=%cont% + 1
find "*%cont% ="<file.txt>%cont%.txt
if "%errorlevel%"=="0" goto OPE
if "%errorlevel%"=="1" del file.txt & goto AGA

:AGA
set totfiles=%cont%
set cont=0
:VAI
set /a cont=%cont% + 1
type %cont%.txt | cut -c8- >x(%cont%).txt & del %cont%.txt
if "%cont%"=="9" goto SEC
goto VAI

:SEC
set /a cont=%cont% + 1
type %cont%.txt | cut -c9- >x(%cont%).txt & del %cont%.txt
if "%cont%"=="%totfiles%" goto VIA
goto SEC

:VIA
set cont=0
:GO
set /a cont=%cont% + 1
set /p lin=<x(%cont%).txt
wget -q "%lin% -O "%cont%.txt"
del x(%cont%).txt
if "%cont%"=="%totfiles%" goto CONTI
goto GO

:CONTI
set cont=0
:CONTX
set /a cont=%cont% + 1
type %cont%.txt | grep -o "<title>[^>]*" | sed "s#<title>#*%cont% #" | sed "s#</title# #" >>titoli.txt
if "%cont%"=="%totfiles%" goto XXX
goto CONTX

:XXX
cls
echo.
echo Ecco la lista dei video della settimana...
ping localhost -n 3 >nul
type titoli.txt | more

:INNO
echo.
set exxe=0
set /p exxe=Scegli il numero corrispondente al video da visualizzare o x per uscire: 
echo.
if "%exxe%"=="x" goto FINE 
type %exxe%.txt | grep -o "mp4:/[^<]*" >uri.txt
if "%errorlevel%"=="1" goto SPAS
type uri.txt | sed "s#]]# #" | sed "s#mp4:# #" | awk "{print $1}" >uri1.txt
del uri.txt
goto SCEL
:SPAS
cls
echo.
echo Nessun video trovato!
ping localhost -n 3 >nul
goto XXX

:SCEL
cls
echo.
set /p sce=[N]ormale oppure [A]lta qualita': 
if "%sce%"=="n" goto NOR
if "%sce%"=="a" goto SUP
goto SCEL

:NOR
find "400"<uri1.txt>url.txt
del uri1.txt
set /p est=<url.txt
del url.txt
goto PLAYX

:SUP
find "600"<uri1.txt>url.txt
del uri1.txt
set /p est=<url.txt
del url.txt
goto PLAYX

:PLAYX
cls
echo.
set /p rego=[R]egistra o [V]isualizza: 
if "%rego%"=="r" goto REG
if "%rego%"=="v" goto PLAYS
goto PLAYX

:PLAYS
cls
echo.
echo Avvio dello streaming in corso...
flv -e -r "%baseurl%%est%" -q | %vlc% -
goto XXX

:REG
cls
echo.
echo Avvio della registrazione in corso...
ping localhost -n 5 >nul
echo.
find "*%exxe%"<titoli.txt>tit.txt
type tit.txt | awk "{print $2, $3, $4, $5, $6, $7, $8, $9, $10, $11, $12, $13, $14, $15}" | sed "s/ *$//" >riu.txt
del tit.txt
set /p riu=<riu.txt
del riu.txt
set riu=%riu:?=-%
set riu=%riu:<=-%
set riu=%riu:>=-%
set riu=%riu:|=-%
set riu=%riu:"=-%
set riu=%riu:\=-%
set riu=%riu:/=-%
flv -e -r "%baseurl%%est%" -o "%pathos%\La7_Video_%riu%.mp4"
cls
echo.
echo Registrazione completata!
ping localhost -n 5 >nul
goto XXX

:FINE
cls
echo.
echo By  Darby_Crash!!
ping localhost -n 3 >nul
exit /b

Adesso è perfetto. Visualizza l'elenco dei video presenti con un numero associato e in base a quello si può decidere se registrarlo o visualizzarlo in alta o in qualità normale. Salva i files rinominandoli in base al titolo.

[blubrot]

Direi che i cioccolatini stanno andando a esaurimento: RSILA1 è già morta ...

[zerocoll]

era prevedibile ....

i canali che non si vedono sono

rsi la1


ma penso che fra un paio di giorni  oscureranno tutti i canali ..

[supercar]

in compenso se può essere di aiuto  , adesso moonlight funziona, ho appena provato

[turro]

Il problema grosso non è la Rai mi sa...che in qualche modo riuscivamo a vedere grazie all'estensione per Firefox del team Olrait,  soprattutto...LA7, che come hanno detto altri, sta per diventare il canale più visto del forum.

Spero proprio che ci sia qualcuno in grado di ovviare al taglio dei canali di Zattoo...gliene sarebbe grata "quasi" tutta la comunità!

Io, da niubbo totale,  resto collegato con ammirazione.

PS: grazie a Senbee per le 2 dritte di ieri mattina: sincronizzazione audio/video per VLC con J-K e comando dpkg-reconfigure privoxy...ieri sera tutto funzionava benissimo! ...e non mi sono neppure accorto del "taglio" ...

[lihin]

Senbee, vedi un po' se questo ti piace di più, numerati gli stream (per evitare di dover mettere l'ID), aggiunta descrizione e riformattato l'output "in bella".

Codice: Seleziona tutto

#!/bin/bash

function play_la7(){
curl -sS www.la7.tv/settimana/ > /tmp/la7.html
cat /tmp/la7.html | grep '<div id="giorni">' -A 5 | grep -o '<span class="cat">[^<]*' | cut -d ">" -f2 > /tmp/la7prog.txt
cat /tmp/la7.html | grep '<div id="giorni">' -A 5 | grep -o 'title=[^>]*' | awk -F '"' '{print $2}' > /tmp/la7cont.txt
cat /tmp/la7.html | grep '<div id="giorni">' -A 5 | grep -o '<b class="sep"> - </b>[^<]*' | cut -d ">" -f3 > /tmp/la7descr.txt
paste -d- /tmp/la7prog.txt /tmp/la7cont.txt /tmp/la7descr.txt | sed 's/ - /-/g' | sed 's/-/ - /g' | nl -n rz -w 2 -s ") " > /tmp/la7title.txt
cat /tmp/la7.html | grep '<div id="giorni">' -A 5 | grep -o 'href=[^>]*' | grep 'rel="nofollow"' | awk -F '"' '{print $2}' | cut -d= -f2 > /tmp/la7id.txt
paste -d= /tmp/la7title.txt /tmp/la7id.txt > /tmp/la7idx.txt

PROG=`echo "$(cat /tmp/la7idx.txt | cut -d= -f1)" | zenity --height=450 --width=600 --list --column="Programmi" --title="La7 TV" --text="Select Channel:"`
if [ "$PROG" != "" ]; then 
   LINK=`curl -sS http://www.la7.tv/repliche/content/index.php?contentId=$(grep "$PROG" /tmp/la7idx.txt | cut -d= -f2) | grep -o 'mp4:/[^]]*' | grep 400 | cut -d: -f2`
   rtmpdump -r "rtmp://yalpvod.alice.cdn.interbusiness.it:1935/vod/$LINK" | vlc --qt-minimal-view --meta-title="$(echo $PROG)" --scale 0.5 -
else
   exit 0
fi
}

while [ $? -eq 0 ]; do
   play_la7
done

P.S. Ci sono un po' di opzioni per il lancio di vlc, le ho lasciate giusto perché a qualcuno potrebbero piacere.
Ciao

EDIT: Questione di lana caprina, non mi piace avere la numerazione nella finestra di vlc.
Se lo lanci con questa opzione la fai fuori:

Codice: Seleziona tutto

| vlc --meta-title="$(echo $PROG | sed 's/[0-9][0-9]) //')" -

[Senbee]

Meglio di così non si può!
Perfetto, ti ringrazio moltissimo e aggiorno lo script. Lascio anche la scelta di andare da elenco o di mettere direttamente il link (molte trasmissioni sono raggiungibili solo navigando un po' nel sito e non dallo script).
Ora mi metto al lavoro...

[Darby_Crash]

Ho scritto uno script per alcuni video. E' una boiata recuperare i link.

[Darby_Crash]

Qualcuno ha qualche idea su come riprodurre gli stream mp4 con mplayer?

[lorenzobiggest]

confermo anche a me non si visualizzano più.

[lihin]

@Darby
Ma in che senso, ti si blocca o non lo riproduce proprio?
Se ti si blocca, prova con una pipe.
curl stream | mplayer -
Se invece non lo riproduce proprio, probabilmente dipende dal supporto col quale è stato compilato, perché mplayer solitamente digerisce tutto, pure i sassi.
Posta un esempio, che ci facciamo un idea.

[Darby_Crash]

http://91.211.156.226/iPhone_...../2011 ... cb-8-0.mp4

Proviamo con questo. Come cita l'url ha a che fare con i telefonini, credo...

EDIT: Adesso vanno. Non so qual'era il problema, forse i doppi apici. Se volete posto anche questo script, se vuoi farne un porting...

[lihin]

Darby, intendi questo procedimento, per prendere gli url dal vod?

Codice: Seleziona tutto

#!/bin/bash

URL=`zenity --width=500 --title="Stream" --text="Page url:" --entry`
if [ X"$URL" == "X" ]; then
   exit 0
fi
ID=`curl "$URL" | grep jsonVideoMetadata | grep -o '"id":[^,]*' | awk -F '"' '{print $4}'`
STREAM=`curl "http://cdnselector.xuniplay.fdnames.com/GetCDN.aspx?streamid=$ID" | grep -o 'video src=[^>]*' | awk -F '"' '{print $2}' | grep -v .ism | zenity --height=200 --width 500 --title="Stream" --list --column="Scegli lo stream:"`
if [ X"$STREAM" == "X" ]; then
   exit 0
fi
vlc "$STREAM" 

Che è sostanzialmente copiato dallo script per greasemonkey:
http://userscripts.org/scripts/show/70933

[Darby_Crash]

No. Parlo di uno script che ho scritto qualche ora fa... scarica e riproduce. Registra anche i flussi smooth, ma tramite ismdownloader 2. Non è finito ma è l'idea di base per uno script, come quello di La7, ma come quello, devo fare in modo che incrementi tutti i video del portale.

Codice: Seleziona tutto

@echo off
cd dip
set path1=%cd%

:INIZIO
cls
title Video Player / Downloader
set "baseurl=....."
if defined ProgramFiles(x86) (
	FOR /F "tokens=1 delims=[" %%A IN ('VER') DO ECHO %%A^(64-bits^) >nul
	set vlc=c:\progra~2\videolan\vlc\vlc >nul
) else (
	FOR /F "tokens=1 delims=[" %%A IN ('VER') DO ECHO %%A^(32-bits^) >nul
	set vlc=d:\progra~1\videolan\vlc\vlc >nul
)
cls
echo.
echo Premi un tasto per aprire la pagina e scegli un video... & pause >nul
start .....

:VIA
cls
echo.
echo Incolla qui l'id del video oppure premi x per uscire: 
echo.
set /p "ide=>"
if "%ide%"==" " goto INIZIO
if "%ide%"=="x" goto FINE
wget "http://cdnselector.xuniplay.fdnames.com/GetCDN.aspx?streamid=%ide%&type=video-wmv" -q -O wmv.txt
wget "http://cdnselector.xuniplay.fdnames.com/GetCDN.aspx?streamid=%ide%&type=video-f4v" -q -O f4v.txt
wget "http://cdnselector.xuniplay.fdnames.com/GetCDN.aspx?streamid=%ide%&type=video-mp4" -q -O mp4.txt
wget "http://cdnselector.xuniplay.fdnames.com/GetCDN.aspx?streamid=%ide%&type=stream-smooth" -q -O smooth.txt
type wmv.txt | grep -o "src=[^>]*" | cut -c6- >linwmv.txt
del wmv.txt
type f4v.txt | grep -o "src=[^>]*" | cut -c6- >linf4v.txt
del f4v.txt
type mp4.txt | grep -o "src=[^>]*" | cut -c6- >linmp4.txt
del mp4.txt
type smooth.txt | grep -o "src=[^>]*" | cut -c6- >linsmooth.txt
del smooth.txt
set /p wmv=<linwmv.txt
del linwmv.txt
set wmv=%wmv:"= %
echo %wmv% | awk "{print $1}" >url.txt
set /p wmv=<url.txt
del url.txt
set /p f4v=<linf4v.txt
del linf4v.txt
set f4v=%f4v:"= %
echo %f4v% | awk "{print $1}" >url.txt
set /p f4v=<url.txt
del url.txt
set /p mp4=<linmp4.txt
del linmp4.txt
set mp4=%mp4:"= %
echo %mp4% | awk "{print $1}" >url.txt
set /p mp4=<url.txt
del url.txt
set /p smooth=<linsmooth.txt
del linsmooth.txt
set smooth=%smooth:"= %
echo %smooth% | awk "{print $1}" >url.txt
set /p smooth=<url.txt
del url.txt

:SCEL
cls
echo.
echo Scegli tra le estensioni disponibili:
echo.
echo.
echo (1) = WMV
echo.
echo [%wmv%]
echo.
echo (2) = FLV
echo.
echo [%f4v%]
echo.
echo (3) = MP4
echo.
echo [%mp4%]
echo.
echo (4) = SMOOTH (solo per registrazione video in alta qualita')
echo.
echo [%smooth%]
echo.
echo.
echo.
set /p "media=>"
echo.
if "%media%"=="1" set url=%wmv%
if "%media%"=="2" set url=%f4v%
if "%media%"=="3" set url=%mp4%
if "%media%"=="4" set url=%smooth% & goto SMOO
goto SCEL

:PLA
cls
echo.
echo Avvio dello streaming in corso...
call %vlc% %url%
goto VIA

:SMOO
cls
echo.
echo Avvio della registrazione in corso...
echo.
down "%url%" "c:\Video_%ide%.mkv"
@RD /s /q "c:\Video_%ide%\" >nul
@copy "c:\*.mkv" "%USERPROFILE%\Desktop\" >nul
@del c:\*.mkv >nul
cls
echo.
echo Registrazione avvenuta con successo! Il file e' sul desktop... 
ping localhost -n 5 >nul
goto VIA

:FINE
cls
echo By  Darby_Crash!!
ping localhost -n 3 >nul
exit /b

[lihin]

Ah, una cosa più impegnativa.

Ma... mi pare di ricordare che c'era qualcuno interessato... zerocoll!?  :-[  ;D

Comunque, per lo smooth, la rai con lo script di mitm/kowalsky si riesce a vedere,. Ci sono comunque i video in wmv a bassa risoluzione per tutti gli stream, meglio di niente...
Ciao

[Cook]

Segnalo questo nuovo servizio italiano legale di streaming via browser :
http://twww.tv
Al canale 202 c'è Sportitalia. Sono presenti anche canali tematici ufficiali di varie squadre di calcio ....
Date un'occhiata.

[lihin]

Visto che dal portale non sono accessibili, se non attraverso stratagemmi (a me moonlight su quel portale non ha mai funzionato), per chi fosse interessato a sentire tutte le campane, ultime edizioni dei TG

Codice: Seleziona tutto

#!/bin/bash

PAGE=`curl .... | grep 'class="edizioneTg"' -A 6 | grep h3 -A 1`
echo $PAGE | grep -o 'title="[^"]*' | awk -F '"' '{print $2}' > /tmp/medsettgprog.txt
echo $PAGE | grep -o '<p>[^<]*' | cut -d ">" -f2 > /tmp/medsettged.txt
paste -d " " /tmp/medsettgprog.txt /tmp/medsettged.txt > /tmp/medsettgtitle.txt
echo $PAGE | grep -o 'href=[^ ]*' | awk -F '"' '{print $2}' > /tmp/medsettgurl.txt
paste -d= /tmp/medsettgtitle.txt /tmp/medsettgurl.txt > /tmp/medsettgidx.txt

SELECT=`cat /tmp/medsettgidx.txt | cut -d= -f1 | zenity --height=260 --width 250 --title="TG" --text="Telegionali" --list --column="Scegli lo stream:"`
if [ X"$SELECT" == "X" ]; then
   exit 0
fi
ID=`curl "http:/..../$(cat /tmp/medsettgidx.txt | grep "$SELECT" | cut -d= -f2)" | grep jsonVideoMetadata | grep -o '"id":[^,]*' | awk -F '"' '{print $4}'`
STREAM=`curl "http://cdnselector.xuniplay.fdnames.com/GetCDN.aspx?streamid=$ID" | grep -o 'video src=[^>]*' | awk -F '"' '{print $2}' | grep .wmv`
vlc --qt-minimal-view --scale 1.25 "$STREAM"

Ciao

[Senbee]

Sei come sempre spettacolare :-)
Ho già aggiornato e messo sulla mia home page lo script aggiornato con le tue provvidenziali aggiunte (vedere Fede talvolta è uno spasso, lo ammetto).

Ho tolto il minimal view a VLC perché mi dicono molti utenti del sito che lo preferiscono con tutti i comandi. Ho tolto anche il ridimensionamento visto che comunque VLC si ridimensiona sia automaticamente alle dimensioni dello schermo sia manualmente con grande facilità se lo si vuole più piccolo.

[Darby_Crash]

Ragà ho bisogno di qualcuno che conosca bene il bash e che mi dia una mano con uno script per Teleboy. Ne sto facendo un porting per Windows e ci devo integrare un proxy sia per Nix che per Win. Chiunque è interessato si faccia avanti. Ma niente pubblicazioni prima del lavoro finito. lihin sei disponibile?

[Centurione_01]

Ho notato che pare non più visibile tramite lo script (cannot prefill buffer).
La cosa strana è che se nelle stesse condizioni (tor con exitnode ch) apro zattoo nel browser, funziona regolarmente. Che abbiano messo qualche controllo in più sul browser ?