[int13h@machine ~]$ cat /etc/adobe/mms.cfg 
#Hardware video decoding
EnableLinuxHWVideoDecode=1

mplayer -cache 4096 $(xclip -o)

--[[
 Translate VKontakte video webpage URL to the corresponding MP4 URLs

 v1.0 12.04.2012

 Copyright © 2012 Dionysus < dionysus ατ webnoise.org.ua >

 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.
--]]

-- Helper function to convert embedded video src into a webpage url
-- ToDo RuTube
function normalize_src( src )
    -- YouTube
    _, _, id = string.find( src, "www%.youtube%.com/embed/([-_a-zA-Z0-9]+)" )
    if id then return "http://www.youtube.com/watch?v="..id end
    -- Vimeo
    _, _, id = string.find( src, "player%.vimeo%.com/video/([0-9]+)" )
    if id then return "http://vimeo.com/"..id end
    -- else
    return src
end

-- Helper function to get a "--preferred-resolution" parameter's value
function get_prefres()
    local prefres = -1
    if vlc.var and vlc.var.inherit then
        prefres = vlc.var.inherit(nil, "preferred-resolution")
        if prefres == nil then
            prefres = -1
        end
    end
    return prefres
end

-- Probe function
function probe()
    if vlc.access ~= "http" and vlc.access ~= "https" then
        return false
    end
    local vkontakte_site = (   string.match( string.sub( vlc.path, 1, 7 ),  "vk.com/" )
                            or string.match( string.sub( vlc.path, 1, 13 ), "vkontakte.ru/" ) )
    if not vkontakte_site then
        return false
    end
    return ( string.match( vlc.path, "/video%-?%d+_%d+" ) )
end

-- Parse function
function parse()
    while true do
        line = vlc.readline()
        if not line then break end

        -- detect charset (usually "windows-1251")
        if string.match( line, "<meta http%-equiv=\"content%-type\"" ) then
            _, _, charset = string.find( line, "charset=([^\"]*)\"" )
            vlc.msg.dbg("Charset found: "..charset)
        end

        -- detecting external iframe content
        if string.match( line, "ajax%.preload" ) then
            if string.match ( line, "<iframe id=\\\"video_player\\\"" ) then
                _, _, src = string.find( line, "<iframe[^>]*src=\\\"([^\"]*)\\\"" )
                if src then
                    -- remove escape characters
                    src = string.gsub( src, "\\/", "/" )

                    vlc.msg.info("External video found: "..src)
                    -- try to normalize src value (optional)
                    src = normalize_src( src )
                    return { { path = src } }
                end
            end
        end

        -- try to find parameters
        if string.match( line, "box%.setOptions" ) then
            _, _, host   = string.find( line, "\\\"host\\\":\\\"(%d*)\\\"" )
            _, _, userid = string.find( line, "\\\"uid\\\":\\\"(%d*)\\\"" )
            _, _, vtag   = string.find( line, "\\\"vtag\\\":\\\"(%w*)\\\"" )
            _, _, hd     = string.find( line, "\\\"hd\\\":([-%d]*)," )
            _, _, title  = string.find( line, "\\\"md_title\\\":\\\"([^\"]*)\\\"" )
            _, _, thumb  = string.find( line, "\\\"thumb\\\":\\\"([^\"]*)\\\"" )
        end

        if host and userid and vtag and hd and title and thumb then
            -- default charset
            if not charset then charset = "windows-1251" end

            -- encode string to UTF8
            title = vlc.strings.from_charset( charset, title )
            -- remove escape characters
            thumb = string.gsub( thumb, "\\\\\\", "" )
            title = string.gsub( title, "\\\\\\", "" )
            title = vlc.strings.resolve_xml_special_chars( title )
            -- convert string to integer
            hd = tonumber(hd)

            -- build formats list
            if hd == 3 then
                height_list = { 720, 480, 360, 240 }
            elseif hd == 2 then
                height_list = { 480, 360, 240 }
            elseif hd == 1 then
                height_list = { 360, 240 }
            else
                height_list = { 240 }
            end

            -- move preferred format to the first position
            prefres = get_prefres()
            if prefres >= 0 then
                pos = 1
                for _, height in pairs(height_list) do
                    if tonumber(height) <= prefres then break end
                    pos = pos + 1
                end
                if pos > 1 then
                    -- swap values
                    height_list[1], height_list[pos] = height_list[pos], height_list[1]
                end
            end

            result = { }
            -- enqueue all available formats
            for _, height in pairs(height_list) do
                table.insert( result, { path = "http://cs"..host..".vk.com/u"..userid.."/video/"..vtag.."."..height..".mp4"; name = "["..height.."p] "..title; arturl = thumb } )
            end
            return result
        end
    end

    vlc.msg.err( "Couldn't extract VKontakte video URL, please check for updates to this script" )
    return { }
end

function vkplay(){
        wget $1 -O - | mplayer -cache 16192 -
}

function vkplay(){
        mplayer -cache 4096 $1
}

Дата регистрации: 21.05.2007 14:07:28