mahoyo-bgm.xp3-ogg-decoder : not working yet

gistfile1.c

fname = "m01s.ogg"
outfname = "unenc-m01s.ogg"

file = open(fname, "rb")
p "Processing #{fname}"

def decode_xor key, value
  origin = 0
  offset = 1
  8.times do 
    if key & offset != 0 then
      origin = origin | ((value & offset) ^ offset)
    else
      origin = origin | (value & offset)
    end
    offset = offset << 1
  end

  return origin
end

ary = []

5.times do 
  ary << file.getc
end

p "KEY is #{ary[4]}"
key = ary[4].to_i

ary.each do |item|
  p "#{item} => #{decode_xor(key, item.to_i).chr}"
end

file.pos = 0
p "set pos to #{file.pos}"

data = []

while ch = file.getc 
  data << decode_xor(key, ch.to_i).chr
end

p "#{outfname} processing"

open(outfname, "wb") do |file|
  data.each do |ch|
    file.putc ch
  end
end

p "#{outfname} done"