jxl-muq 0.0.1

data/README.markdown

@@ -0,0 +1,27 @@
+# Muq, a Muxtape CLI
+Basic command line interface for <http://muxtape.com>.
+
+## Usage
+See `muq up -h` and `muq dn -h` for details.
+
+Muxtape's limits are 12 songs per tape and 10MB per song.
+
+### Upload examples
+`muq up favorite.mp3 --user=bob --pass=bob --email=bob@example.com`  
+Create a new account for Bob and upload his favorite tune.
+
+`muq up -u=larry -p=kensentme`  
+Upload every mp3 in the current directory to Larry's existing account.
+
+`muq up some.mp3,another.mp3 -u=larry -p=kensentme --banner="Larry's Tape" --caption="Wooo" --color=ffdddd`  
+Upload mp3s and set banner, caption and color.
+
+### Download examples
+`muq dn hiphop` or `mux dn http://hiphop.muxtape.com/`  
+Download a single tape.
+
+`muq dn hip,hop,rap,rnb`  
+Download multiple tapes.
+
+## Bugs?
+Fork and fix, thanks!

data/bin/muq

@@ -0,0 +1,201 @@
+#!/usr/bin/env ruby
+require File.dirname(__FILE__) + '/../lib/muq'
+require 'main'
+
+Main do
+  mixin :login do
+    option('user', 'u') do
+      description 'Login (and subdomain) name.'
+      argument :required
+      required
+    end
+
+    option('pass', 'p') do
+      description 'Pwnage.'
+      argument :required
+      required
+    end
+
+    option('email', 'e') do
+      description 'Email address used to register a new account.'
+      argument :required
+    end
+    
+    #option('random', 'r') do
+    #  description 'Generate random user/pass/email if absent.'
+    #end
+  end
+
+  mixin :settings do
+    option('banner') do
+      description 'Title.'
+      argument :required
+    end
+
+    option('caption') do
+      description 'Subtitle.'
+      argument :required
+    end
+
+    option('color') do
+      description 'Color. (hex value without # prefix)'
+      argument :required
+    end
+  end
+
+  mixin :upload do  
+    argument('mp3s') do
+      description 'Comma separated list of MP3s or directories to upload.'
+      cast :list_of_string
+      default "."
+    end
+  end
+
+  mixin :download do
+    argument('tapes') do
+      description 'Comma separated list of tape(s) to download.'
+      argument :required
+      cast :list_of_string
+    end
+
+    option('tracks') do
+      description 'Command separated list of track(s) to download.'
+      argument :required
+      cast :list_of_integer
+    end
+
+    argument('dir') do
+      description 'Base directory. A subdirectory is created for every tape.'
+      validate{|dir| File.directory?(dir)}
+      default "."
+      optional
+    end
+  end
+
+  mode :up do
+    mixin :login
+    mixin :settings
+    mixin :upload
+  end
+
+  mode :dn do
+    mixin :download
+  end
+
+  def run
+    params.each {|p| instance_variable_set("@#{p.name}", p.value)}
+ 
+    m = Muq.new
+
+    if @mode == "dn"
+      @tapes.each do |tape|
+        user = tape.scan(/(\w+)\.muxtape\.com/)
+        user = tape.scan(/\w+/) if user.empty?
+        puts "Downloading #{user}'s tape..."
+        FileUtils.mkdir_p("#{@dir}/#{user}")
+        songs = m.songs(user)
+        get = []
+        if @tracks
+          @tracks.each do |track|
+            get << songs[track-1]
+          end
+        else
+          get = songs
+        end
+        total = get.size
+        count = 1
+        get.each do |song|
+          puts "[#{count}/#{total}] #{song[:name]}"
+          m.download(song[:url], "#{@dir}/#{user}/#{song[:file]}")
+          count += 1
+        end
+      end
+      exit 
+    end
+
+    #if @random
+    #  @user  ||= m.rnd_user
+    #  @pass  ||= m.rnd_pass
+    #  @email ||= m.rnd_email
+    #end
+
+    if @mp3s
+      q = []
+      @mp3s.each do |mp3s|
+        if File.directory?(mp3s)
+          q += m.find_mp3s(mp3s)
+        elsif File.file?(mp3s)
+          q += mp3s.to_a
+        end
+        q = m.remove_dupes(q, @user)
+        begin
+          m.check_queue(q)
+        rescue Muq::TooManyFiles, Muq::FileTooLarge => e
+          puts e.to_s
+          exit 1
+        end
+      end
+      puts "Valid upload queue."
+      q_valid = true
+    end
+
+    if @user && @pass then
+      begin
+        m.login(@user, @pass)
+        puts "Valid login."
+      rescue Muq::InvalidLogin => e
+        puts e.to_s
+        if @email
+          puts "Trying to create account."
+          begin
+            m.register( @user, @pass, @email )
+          rescue Muq::NameTooLong, Muq::NameInUse, Muq::EmailInUse => e
+            puts e.to_s
+            m.logout
+          end
+          puts "Account '#{@user}' created with password '#{@pass}'."
+          m.set_color(m.rnd_color)
+          m.add_favorite('jxl') # nice index under 'favorited' ;)
+        else
+          puts "Can't create account without email."
+          m.logout
+        end
+      end
+
+      if @banner
+        m.set_banner(@banner)
+        puts "Banner set to '#{@banner}'"
+      end
+
+      if @caption
+        m.set_caption(@caption)
+        puts "Caption set to '#{@caption}'"
+      end
+      
+      if @color
+        m.set_color(@color)
+        puts "Color set to '#{@color}'"
+      end
+
+      if q_valid
+        begin
+          total = q.size
+          count = 1
+          q.each do |file|
+            name = File.basename(file)
+            puts "[#{count}/#{total}] #{name}"
+            m.upload(file)
+            count += 1
+          end
+        rescue Muq::LimitReached, Muq::InvalidUpload => e
+          puts e.to_s
+          m.logout
+        end
+        puts "Done! (URL: http://#{@user}.#{m.host}/ PW: #{@pass})"
+      end
+      m.logout(:win)
+    else
+      help!
+    end
+  end
+end

data/lib/muq.rb

@@ -0,0 +1,265 @@
+#!/usr/bin/env ruby
+
+require 'fileutils'
+require 'tmpdir'
+
+begin
+  require 'rubygems'
+rescue LoadError
+end
+
+require 'curb'
+require 'hpricot'
+require 'id3lib'
+
+class Muq
+  attr_accessor :c, :host
+
+  # the curb
+  def initialize()
+    @host = "muxtape.com"
+    @c = Curl::Easy.new do |c|
+      c.headers["User-Agent"] = "Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.8.1.14) Gecko/20080404 Iceweasel/2.0.0.14 (Debian-2.0.0.14-1)"
+      c.cookiejar = "#{Dir.tmpdir}/cookies.muq"
+      c.enable_cookies = true
+      c.verbose = false
+    end
+    @c
+  end
+
+  # create a new account
+  def register(user, pass, email)
+    raise NameTooLong, "Name too long." unless user.length < 32
+    post("#{@host}/create", {:name => user, :pass => pass, :email => email})
+    raise NameInUse, "Name in use." unless name_available?
+    raise EmailInUse, "Email in use." unless email_available?
+  end
+
+  # use existing account
+  def login(user, pass)
+    post("#{@host}/login", {:name => user, :pass => pass})
+    raise InvalidLogin, "Invalid login." unless valid_login?
+  end
+
+  # quit
+  def logout(win=false)
+    get("#{@host}/logout")
+    File.delete("#{Dir.tmpdir}/cookies.muq")
+    exit 1 unless win
+    exit 0
+  end
+  
+  # find mp3s and sort in reverse order
+  # (the last uploaded file is displayed first on site)
+  def find_mp3s(dir)
+    Dir.glob("#{dir}/*.mp3").sort.reverse
+  end
+
+  # check if the queue is within the limits
+  def check_queue(queue)
+    amount = queue.size
+    raise TooManyFiles, "Too many files. (#{amount})" unless amount < 12
+    queue.each do |file|
+      raise FileTooLarge, "#{File.basename(file)} is too large." unless filesize_ok?(file)
+    end
+  end
+
+  # remove already uploaded mp3s from the queue
+  def remove_dupes(queue, user)
+    songs = just_songs(user)
+    new_queue = []
+    queue.each do |file|
+      tags = ID3Lib::Tag.new(file)
+      artist = tags.artist
+      title = tags.title
+      new_queue << file unless songs.include?("#{artist} - #{title}")
+    end
+    new_queue
+  end
+  
+  # build an array of songs for the specified user
+  def just_songs(user)
+    doc = Hpricot(get("#{user}.#{@host}"))
+    out = []
+    doc.search("//li[@class='song']/div[@class='name']").each do |song|
+      out << song.inner_text.strip
+    end
+    out
+  end
+
+  # build an array of songs for the specified user
+  # (including download url and filename)
+  def songs(user)
+    doc = Hpricot(get("#{user}.#{@host}"))
+    scripts = doc.search("//script[@type='text/javascript']").inner_text
+    kettle = scripts.match(/new Kettle\((.*)\)/)[1]
+    split = kettle.scan(/\[.+?\]/)
+    hex = eval("Array.new(#{split[0]})")
+    sig = eval("Array.new(#{split[1]})")
+    out = []
+    if hex.size == sig.size
+      total = hex.size
+      total.times do |i|
+        name = doc.search("//li[@id='song#{hex[i]}']/div[@class='name']").inner_text.strip
+        url = "http://muxtape.s3.amazonaws.com/songs/"
+        url += "#{hex[i]}?PLEASE=DO_NOT_STEAL_MUSIC&#{sig[i]}" # rly sry lulz
+        out << {:name => name, :file => filename(name, i+1), :url => url}
+      end
+    end
+    out
+  end
+
+  # file upload
+  def upload(file)
+    @c.url = "#{@host}/upload"
+    raise LimitReached, "Song limit reached." unless room_left?
+    @c.multipart_form_post = true
+    @c.http_post(Curl::PostField.file('file', file))
+    @c.multipart_form_post = false
+    raise InvalidUpload, "Can't handle encoding." unless valid_upload?
+  end
+
+  # file download
+  def download(url, file)
+    Curl::Easy.download(url, file)
+  end
+
+  # set the banner/title
+  def set_banner(banner="")
+    set(:command => "bannercaption", :args => "none", :banner => banner)
+  end
+  
+  # set the caption/sub-title
+  def set_caption(caption="")
+    set(:command => "bannercaption", :args => "none", :caption => caption)
+  end
+  
+  # set the header color (hex value without # prefix)
+  def set_color(color="")
+    set(:command => "color", :args => color)
+  end
+
+  # change the password
+  def set_pass(pass)
+    set(:command => "password", :args => %Q{{"password1":"#{pass}","password2":"#{pass}"}} )
+  end
+
+  # add a user to favorites
+  def add_favorite(user)
+    set(:command => "favorite", :args => user)
+  end
+
+  # remove a user from favorites
+  def rm_favorite(user)
+    set(:command => "unfavorite", :args => user)
+  end
+
+   # random values
+  def rnd_user
+    rnd_string(rnd_size, false)
+  end
+
+  def rnd_pass
+    rnd_string
+  end
+
+  def rnd_email
+    "#{rnd_string}@#{rnd_string}.#{rnd_string(rnd_size(2,4), false)}"
+  end
+
+  def rnd_color
+    "#{rnd_string(6, true, "a", "f")}"
+  end
+
+  private
+    # http get
+    def get(url)
+      @c.url = url
+      @c.http_get
+      @c.body_str
+    end
+
+    # http post
+    def post(url, hash)
+      @c.url = url
+      fields = []
+      hash.each_pair do |key, value|
+        fields << Curl::PostField.content(key.to_s, value).to_s
+      end
+      @c.http_post(url, fields)
+    end
+ 
+    # change a setting
+    def set(hash)
+      post("#{@host}/settings/ajax", hash)
+    end
+   
+    # grep body
+    def cant_find(regex)
+      @c.body_str.grep(regex).empty?
+    end
+
+    # errors checks
+    def filesize_ok?(file)
+      File.size(file) < (10 * 1024 * 1024)
+    end
+
+    def email_available?
+      cant_find(/already a user with that email address/)
+    end
+
+    def name_available?
+      cant_find(/that name is unavailable/)
+    end
+
+    def valid_login?
+      cant_find(/Invalid name or password\./)
+    end
+
+    def logged_in?
+      cant_find(/You must be \<a href=\"\/login\"\>logged in\<\/a\>/)
+    end
+
+    def room_left?
+      cant_find(/reached your limit of 12 songs/)
+    end
+
+    def valid_upload?
+      cant_find(/Try it one more time, if it fails again/)
+    end
+
+    # random-fu
+    def rnd_size(from=1, to=10)
+      (from + rand * to).floor
+    end
+
+    def rnd_string(size=rnd_size, num=true, from="a", to="z")
+      chars  = (from..to).to_a
+      chars += ('0'..'9').to_a unless num == false
+      (1..size).collect{|a| chars[rand(chars.size)] }.join
+    end
+
+    # funky filename
+    def filename(name, nr)
+      file = name.downcase
+      file = file.gsub(" - ", "-")
+      file = file.gsub("/", "")
+      file = file.gsub(".", "")
+      file = file.gsub(",", "")
+      file = file.gsub("  ", " ")
+      file = file.gsub(" ", "_")
+      file = "#{"%02.0f" % nr}-#{file}-muq.mp3"
+    end
+
+    # you FAIL
+    class FAIL  < RuntimeError; end
+    class InvalidLogin  < FAIL; end
+    class NotLoggedIn   < FAIL; end
+    class NameTooLong   < FAIL; end
+    class NameInUse     < FAIL; end
+    class EmailInUse    < FAIL; end
+    class TooManyFiles  < FAIL; end
+    class FileTooLarge  < FAIL; end
+    class InvalidUpload < FAIL; end
+    class LimitReached  < FAIL; end
+end

data/muq.gemspec

@@ -0,0 +1,15 @@
+Gem::Specification.new do |s|
+  s.name = "muq"
+  s.version = "0.0.1"
+  s.summary = "Muxtape.com CLI"
+  s.description = "Command line interface for Muxtape."
+  s.author = "Ron Damen"
+  s.email = "jxl@ganja.nl"
+  s.homepage = "http://github.com/jxl/muq/"
+  s.files = ["README.markdown", "muq.gemspec", "bin/muq", "lib/muq.rb"]
+  s.executables = "muq"
+  s.add_dependency("main", ["> 0.0.0"])
+  s.add_dependency("curb", ["> 0.0.0"])
+  s.add_dependency("hpricot", ["> 0.0.0"])
+  s.add_dependency("id3lib-ruby", ["> 0.0.0"])
+end

metadata

@@ -0,0 +1,91 @@
+--- !ruby/object:Gem::Specification 
+name: jxl-muq
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Ron Damen
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-04-26 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: main
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">"
+      - !ruby/object:Gem::Version 
+        version: 0.0.0
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: curb
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">"
+      - !ruby/object:Gem::Version 
+        version: 0.0.0
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: hpricot
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">"
+      - !ruby/object:Gem::Version 
+        version: 0.0.0
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: id3lib-ruby
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">"
+      - !ruby/object:Gem::Version 
+        version: 0.0.0
+    version: 
+description: Command line interface for Muxtape.
+email: jxl@ganja.nl
+executables: 
+- muq
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- README.markdown
+- muq.gemspec
+- bin/muq
+- lib/muq.rb
+has_rdoc: false
+homepage: http://github.com/jxl/muq/
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.0.1
+signing_key: 
+specification_version: 2
+summary: Muxtape.com CLI
+test_files: []
+