Advertisement
Inquisitor

[CMD/BAT] podcast2playlist

Apr 19th, 2015
259
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 1.41 KB | None | 0 0
  1. @Echo Off
  2. :: podcast2playlist.cmd
  3. :: applejack, 2015
  4. SetLocal EnableDelayedExpansion
  5.  
  6. :: Ссылка на rss фид подкаста
  7. Set URL=http://feeds.feedburner.com/ukfmusic
  8.  
  9. :: Выделяем из ссылки последний элемент и используем его в качестве имени плейлиста
  10. Set "Data="!URL:/=" "!""
  11. For %%N In (!Data!) Do (Set "PLName=%%~N")
  12.  
  13. :: Создаём файл плейлиста или перезаписываем старый, если есть
  14. Echo #EXTM3U>"%PLName%.m3u8"
  15.  
  16. :: Притворяемся айфоном и тянем страницу, которую разбираем с помощью простой регулярки, выбирая ссылки на аудио
  17. For /F "delims=" %%A In ('wget "%URL%" -O- --user-agent "Mozilla/5.0 (iPhone; CPU iPhone OS 5_0 like Mac OS X) AppleWebKit/534.46 (KHTML, like Gecko) Version/5.1 Mobile/9A334 Safari/7534.48.3" --quiet 2^>nul 3^>nul^|grep -Eo "feedburner:origLink.[^<]+"^|grep -Po "(ftp|http(s)?://){1}.*"') Do (
  18.     Set URL=%%A
  19.     Set "Data="!URL:/=" "!""
  20.     :: Пишем данные в плейлист, сопровождая ссылки отображаемыми именами, взятыми из имён файлов
  21.     For %%N In (!Data!) Do (Set "Name=%%~N")
  22.     Set "Name=!Name:_= !"
  23.     Set "Name=!Name:~,-4!"
  24.     Echo #EXTINF:-1,!Name!>>"%PLName%.m3u8"
  25.     Echo !URL!>>"%PLName%.m3u8"
  26. )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement