if _G.SIGH and _G.SIGH:IsValid() then _G.SIGH:Remove() end

local pnl = vgui.Create("DHTML")
pnl:SetHTML("")
pnl:AddFunction("lua", "print", function(text)
    chat.AddText(text)
end)

local data = {}
local i = 0
for char in OGG_DATA:gmatch("(.)") do
    table.insert(data, ("b[%u]=%i;"):format(i, char:byte()))
    i = i + 1
end
data = table.concat(data, "")
print(data:sub(1, 1000))

pnl:RunJavascript(([[
    b = new ArrayBuffer(%s)

    %s

    audio = new webkitAudioContext
    audio.decodeAudioData(
        b,

        function(buffer)
        {
            lua.print("wooo")
        },

        function(err)
        {
            lua.print("decoding error " + err)
        }
    )
]]):format(#OGG_DATA, data))

--[===[

file.Write("test.txt", "LOLOLOL")
local function decode(data)
    pnl:RunJavascript(([[
        function str2ab(str) {
            var buf = new ArrayBuffer(str.length*2); // 2 bytes for each char
            var bufView = new Uint16Array(buf);

            for (var i=0, strLen=str.length; i<strLen; i++)
            {
                bufView[i] = str.charCodeAt(i);
            }
            return buf;
        }

        audio = new webkitAudioContext
        var data = str2ab("%s")
        lua.print(data.toString())

        audio.decodeAudioData(
            data,

            function(buffer)
            {
                lua.print("wooo")
            },

            function(err)
            {
                lua.print("decoding error " + err)
            }
        )
    ]]):format(data))
end

if OGG_DATA then
    decode(OGG_DATA)
else
    http.Fetch("http://raw.github.com/CapsAdmin/pac3/master/about/music.ogg", function(data)
        decode(data)
        OGG_DATA = data
    end)
end
]===]

_G.SIGH = pnl