1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
|
--[[
Copyright © 2012, 2015, 2019-2020 the VideoLAN team
Authors: Cheng Sun <chengsun9atgmail.com>
Pierre Ynard
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
--]]
-- Probe function.
function probe()
local path = vlc.path
path = path:gsub("^www%.", "")
return ( vlc.access == "http" or vlc.access == "https" )
and string.match( path, "^soundcloud%.com/.+/.+" )
end
function fix_quotes( value )
if string.match( value, "^\"" ) then
return "" -- field was really empty string
end
-- TODO: handle escaped backslashes and others
return string.gsub( value, "\\\"", "\"" )
end
-- Search and extract API magic parameter from web asset
function extract_magic( url )
local s = vlc.stream( url )
if not s then
return nil
end
local line = s:read( 4096*1024 )
if not line then
return nil
end
-- The API magic appears under a similar form several times
-- in one of the javascript assets
-- {client_id:"z21TN9SfM0GjGteSzk4ViM1KEwMRNWZF"}
local client_id = string.match( line, '[{,]client_id:"(%w+)"[},]' )
if client_id then
vlc.msg.dbg( "Found soundcloud API magic" )
return client_id
end
return nil
end
-- Parse function.
function parse()
while true do
local line = vlc.readline()
if not line then break end
-- API endpoint for audio stream URL
if not stream then
-- The URL may feature an optional query string: for private
-- tracks in particular it contains a secret token, e.g.
-- https://api-v2.soundcloud.com/media/soundcloud:tracks:123456789/986421ee-f9ba-42b2-a642-df8e9761a49b/stream/progressive?secret_token=s-ABCDE
stream = string.match( line, '"url":"([^"]-/stream/progressive[^"]-)"' )
end
-- API magic parameter
if not client_id then
local script = string.match( line, '<script( .-)>' )
if script then
local src = string.match( script, ' src="(.-)"' )
if src then
-- Assume absolute path
-- https://a-v2.sndcdn.com/assets/48-551fb851-3.js
client_id = extract_magic( src )
end
end
end
-- Metadata
if not name then
name = string.match( line, "[\"']title[\"'] *: *\"(.-[^\\])\"" )
if name then
name = fix_quotes( name )
end
end
if not description then
description = string.match( line, "[\"']artwork_url[\"'] *:.-[\"']description[\"'] *: *\"(.-[^\\])\"" )
if description then
description = fix_quotes( description )
end
end
if not artist then
artist = string.match( line, "[\"']username[\"'] *: *\"(.-[^\\])\"" )
if artist then
artist = fix_quotes( artist )
end
end
if not arturl then
arturl = string.match( line, "[\"']artwork_url[\"'] *: *[\"'](.-)[\"']" )
end
end
if stream then
if client_id then
stream = stream..( string.match( stream, "?" ) and "&" or "?" ).."client_id="..client_id
end
local api = vlc.stream( stream )
if api then
local streams = api:readline() -- data is on one line only
-- This API seems to return a single JSON field
path = string.match( streams, '"url":"(.-)"' )
end
end
if not path then
vlc.msg.err( "Couldn't extract soundcloud audio URL, please check for updates to this script" )
return { }
end
return { { path = path, name = name, description = description, artist = artist, arturl = arturl } }
end
|
