root/lang/ruby/misc/vox-upload-photo-atom.rb

#!/usr/bin/env ruby -Ku
=begin
Vox Photo Uploading Tool

~/.vox.com.yaml
---
mail: "login@email"
pass: "password"
name: "cho45" # http://[name].vox.com/

License:: Creative Commons by
=end

require "rubygems"
require "xml/libxml"
require "pit"
require "pathname"
require "time"
require "yaml"
require "uri"
require "net/http"
require "webrick/httputils"
Net::HTTP.version_1_2


def dh(res)
        puts res.body
        res.each do |k,v|
                puts "#{k}: #{v}"
        end
        p res
end

# like hpricot
def XML(str)
        parser = XML::Parser.new
        parser.string = str
        parser.parse
end

config = Pit.get("vox.com", :require => {
        "username" => "your email in Vox",
        "password" => "your password in Vox",
        "nickname" => "your subdomain in Vox"
})
uri  = URI("http://#{config['nickname']}.vox.com/library/posts/atom.xml")

headers = {
        "Authorization" => "Basic " + ["#{config["username"]}:#{config["password"]}"].pack("m"),
        "Content-Type" => "application/atom+xml",
}

ns  = [
        "atom:http://www.w3.org/2005/Atom",
        "privacy:http://www.sixapart.com/ns/atom/privacy",
        "photo:http://sixapart.com/atom/photo#",
        "media:http://search.yahoo.com/mrss/",
]

doc = XML(Net::HTTP.get(uri.host, uri.request_uri, uri.port))

post_uri = URI(doc.find("/atom:feed/atom:link[@rel='service.post']", ns).first[:href])

puts "Uploading photo..."
ARGV.each do |filename|
        file = Pathname.new(filename)
        mime_type = WEBrick::HTTPUtils.mime_type(file.to_s, WEBrick::HTTPUtils::DefaultMimeTypes)
        Net::HTTP.start(post_uri.host, post_uri.port) do |http|
                res = http.post(post_uri.request_uri, <<-EOS.gsub(/^\t+/, ""), headers.merge("Slug"=>file.basename.to_s))
                        <?xml version="1.0" ?>
                        <entry xmlns="http://www.w3.org/2005/Atom">
                                <title>#{file.basename}</title>
                                <updated>#{Time.now.xmlschema}</updated>
                                <content mode="base64" type="#{mime_type}">#{[file.read].pack("m")}</content>
                        </entry>
                EOS
                if res.code == "201"
                        uri = URI(res["Location"])
                        Net::HTTP.start(uri.host, uri.port) do |http|
                                res = http.get(uri.request_uri, headers)
                                dh res if $DEBUG
                                begin
                                        doc = XML(res.body)
                                        puts doc.find("/atom:entry/atom:link[@type='text/html']", ns).first[:href]
                                        doc.find("/atom:entry/privacy:privacy/*", ns).each do |i|
                                                puts "Publish to %s" % i[:name].to_s
                                        end
                                rescue => e
                                        p e
                                end
                                if $DEBUG
                                        res = http.send_request("DELETE", uri.request_uri, nil, headers)
                                        dh res
                                end
                        end
                else
                        puts "Error:"
                        dh res
                end
        end
end


#-- error on binary upload
#file = Pathname.new("2150944907_5be2ee34ac.jpg")
#Net::HTTP.start(uri.host, uri.port) do |http|
#       p headers.merge("Content-Type" => "image/jpeg")
#       res = http.post(uri.request_uri, file.read, headers.merge("Content-Type" => "image/jpeg"))
#       dh res
#       uri = URI(res["Location"])
#end