source: trollforge/dsp-trollforge/MegaTokyo/Mtreg.rb @ 233 Tweet

#/usr/local/bin/ruby

require 'cgi'
require 'net/http'

proxy_port = 0
proxy = 'proxy:port'
proxy, proxy_port = proxy.split /:/

code = %w(
5d5e4c7ea73dee3414cf2c7b64623f07
0a5b5e8f81f9bc1ad36951d164bbdcc7
3f5153ad7a39ce5c638d2d4d76a4f7d2
02105b0bf998dda0521651fc5358ebb4
04e0c0cf3c07da9acf71bc55ea4abd0c
553f5f17d919d5fe39dbf2ecec527a5f
6536c447424ca0816105a14488a30e75
93e552ee61a82f00461b4fd9d3975514
cb2469fe19cff2b6fb1181751592528f
3f4078f6ebf0d261f428c2dab07ef7ed
)


def make_int min, max
        (rand * (max - min)).round + min
end

def make_str min, max
        buf = ''
        make_int(min, max).times do
                buf << make_int(?a, ?z).chr
        end
        buf
end

txt = String.new
regid = String.new
z = Array.new
m = 0
rcode = String.new

session = Net::HTTP::Proxy(proxy,  
proxy_port).new('forums.megatokyo.com', 80)    

head, txt = (session.get '/index.php?act=Reg&CODE=00')

txt.each do |x|
        x.match /.*regid.*value='(.*)' \/>/
        regid = $1 if $1
        x.match /<img src='(.*=\d)'/
        y = $1; z.push y if y and x.match /Code/
end

puts "> fetching image files"
z.each do |l| 
        l.gsub!('&amp;', '&').chomp!
        `wget -q -nc "#{l}" -O "tmp/#{m}.tmp"`
        m += 1
end

puts "> running md5..."
6.times do |i|
        # OR if you have md5sum use:
        # `md5sum tmp/#{i}.tmp`.match /(.*)\s\s.*/
        `md5 tmp/#{i}.tmp`.match /^MD5.*= (.*)$/
        10.times do |j|
                if $1 == code[j]
                        rcode << j.to_s
                end
        end
end

usrname = (make_str 4, 10)
usr = (make_str 3, 12)
email = usr + '@mailinator.com'

post =
'act=Reg' +
'&CODE=02' +
'&coppa_user=0' +
'&UserName=' + usrname +
'&PassWord=password_here' +
'&PassWord_Check=password_here' +
'&EmailAddress=' + email +
'&EmailAddress_two=' + email +
'&regid=' + regid + 
'&reg_code=' + rcode + 
'&agree=1'

puts "> sending..."
head, body = session.post('/index.php', post)

if body.match /your registration has been submitted/i
        puts "> registration accepted"
end

sleep 60

get = '/mailinator/ShowMail.do?email=' + usr + '&msgnum=0'

session = Net::HTTP::Proxy(proxy, 
proxy_port).new('mailinator.com', 80)
head, body = session.get(get)

if body.match /mailinator.s anti-abuse code.*what mailbox you/i
        puts '> banned from mailinator'
        exit
end

body.match /..href.(.*act.Reg.*CODE....uid.*)>http/
$1.match /.*(\/index.php.*)$/
rel = $1


session = Net::HTTP::Proxy(proxy,  
proxy_port).new('forums.megatokyo.com', 80)    

puts "> validating..."
head, body = session.get(rel)

puts "> account: #{usrname}:password_here\n\n"
`echo #{usrname}:password_here >> mtusrs.txt`