pastis 0.0.1

data/LICENSE

@@ -0,0 +1,15 @@
+Copyright (c) 2007 Samuel Lebeau
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

data/bin/pastis

@@ -0,0 +1,73 @@
+#!/usr/bin/env ruby
+require 'rubygems'
+require 'pastis'
+require 'tempfile'
+require 'optparse'
+require 'timeout'
+
+language = restricted = edit = nil
+
+def version
+  "Pastis, version #{Pastis::Version.join('.')}"
+end
+
+OptionParser.new do |opts|
+  opts.banner = <<END
+#{version}
+Paste the given file or STDIN to Pastie, returns the paste URL.
+
+Usage: #{ARGV.first} [options] [file]
+END
+  
+  opts.separator ''
+  
+  opts.separator 'Options:'
+  
+  opts.on('-l', '--language [LANGUAGE]', "Select a language\n\
+          (c/diff/html/javascript/nitro_xhtml/pascal/plaintext/rhtml/ruby/sql)") do |l|
+    language = l.downcase 
+  end
+  opts.on('-p', '--[no-]private', 'Private paste (default to false)') { |r| restricted = r }
+  opts.on('-e', '--[no-]edit', 'Edit the input with $EDITOR (defaults to false)') { |e| edit = e }
+  
+  opts.on_tail('-h', '--help', 'Show this message') do
+    puts opts
+    exit
+  end
+  
+  opts.on_tail('-v', '--version', 'Print Pastis version') do
+    puts version
+    exit
+  end
+end.parse!
+
+paste =
+  if ARGV.first
+    File.read(ARGV.first)
+  else
+    # detect if there's something from STDIN
+    begin
+      timeout(0.1) { $stdin.gets } << $stdin.read
+    rescue TimeoutError
+    end
+  end
+
+if (!paste || edit)
+  Tempfile.open('pastie') do |f|
+    f << paste
+    f.rewind
+    system("#{ENV['EDITOR']} #{f.path}")
+    f.rewind
+    # Tempfile.open curiously returns 'nil' instead of the last expression
+    paste = f.read
+  end
+end
+
+begin
+  puts Pastis.paste(paste, {
+    :language => language,
+    :private => restricted
+  }).url
+rescue Pastis::Error => e
+  abort e.message
+end

data/lib/pastis.rb

@@ -0,0 +1,222 @@
+require 'net/http'
+require 'open-uri'
+
+# Load Hpricot on demand
+def Hpricot(object) #:nodoc:
+  require 'rubygems'
+  require 'hpricot'
+  Kernel.send(:Hpricot, object)
+end
+
+class Module #:nodoc:
+  alias_method :const_missing_without_pastis, :const_missing
+  
+  # Load CGI on demand
+  def const_missing(const)
+    if const == :CGI
+      require 'cgi'
+      Module.send(:alias_method, :const_missing, :const_missing_without_pastis)
+      CGI
+    else
+      const_missing_without_pastis(const)
+    end
+  end
+end
+
+#
+# Pastis is a simple ruby interface to Pastie (http://pastie.caboo.se)
+#
+# == Usage
+#
+#   paste = Pastis.paste "var some = 'private js code';", :language => :javascript, :private => true
+#
+#   paste.url
+#   # => "http://pastie.caboo.se/private/lbejcc0royyyyozwl8jbg"
+#
+#   paste.raw_url
+#   # => "http://pastie.caboo.se/private/lbejcc0royyyyozwl8jbg.txt"
+#
+#   paste.body
+#   # => "var some = 'private js code';"
+#
+#   pages = Pastis.search [a search expression]
+#
+#   pages.next_page.last.url
+#   # => "http://pastie.caboo.se/pastes/43577"
+module Pastis
+  Version = [ 0, 0, 1 ]
+  
+  class Error < RuntimeError; end
+  class PasteNotCreatedError < Error; end
+  class EmptyPasteError < Error; end
+  class PaginationError < Error; end
+  
+  # Represents a paste, shoudn't be created by hand
+  class Paste
+    def initialize(attributes)
+      %w(url body time preview).each do |attribute|
+        instance_variable_set("@#{attribute}", attributes[attribute.intern])
+      end
+    end
+    
+    attr_reader :url
+    
+    # Url of the raw paste
+    def raw_url
+      "#{url}.txt"
+    end
+    
+    # 5 first lines of the paste
+    def preview
+      @preview ||= body.to_a[0, 6].to_s
+    end
+    
+    # Creation time
+    def time
+      @time ||= Time.parse(Hpricot(get(url)).at("#paste_date").innerText)
+    end
+    
+    # Body of the paste
+    def body
+      @body ||= get(raw_url)
+    end
+    alias_method :to_s, :body
+    
+    private
+    
+    def get(url)
+      Pastis.send(:get, url)
+    end
+  end
+  
+  # Represents a collection of pastes paginated
+  class Collection < Array
+    def initialize(page, &block)
+      @page, @block = page, block
+      
+      parse_url(yield(page))
+      super(@pastes)
+    end
+    
+    attr_reader :page, :pages_count
+    
+    def next_page
+      raise PaginationError, "last page" if last_page?
+      move(page + 1)
+    end
+    alias_method :next, :next_page
+    
+    def previous_page
+      raise PaginationError, "first page" if first_page?
+      move(page - 1)
+    end    
+    alias_method :previous, :previous_page
+    
+    def goto_page(page)
+      raise PaginationError, "page out of range" unless (1..pages_count).member?(page)
+      move(page)
+    end
+    alias_method :goto, :goto_page
+    
+    def last_page?
+      page == pages_count
+    end
+    
+    def first_page?
+      page == 1
+    end
+    
+    private
+    
+    def get(url)
+      Pastis.send(:get, url)
+    end
+    
+    def move(page)
+      Collection.new(page, &@block)
+    end
+    
+    def parse_url(url)
+      doc = Hpricot(get(url))
+      
+      @pastes = (doc/'.pastePreview').collect do |node|
+        Paste.new :time => Time.parse(node.at('.when span').innerText),
+                  :url => node.at('.link a').attributes['href'],
+                  :preview => node.at('.code').innerText
+      end
+      
+      @pages_count = 
+        Hpricot((doc/'.pages strong').first.innerText.split(' ').last).innerText.to_i
+    end
+  end
+  
+  class << self
+    def url #:nodoc:
+      "http://pastie.caboo.se"
+    end
+    
+    # Creates a paste, returns the created Paste object.
+    # The options are :
+    #
+    # * <tt>:language</tt>: The language used in the paste (defaults to Ruby)
+    # * <tt>:private</tt>: true if the paste is private (default to false)
+    def create(body, options = {})
+      raise EmptyPasteError, "Empty paste, not submitted..." unless body =~ /\w/
+      
+      response = post_paste(body, options);
+      
+      raise PasteNotCreatedError, "Error occured : #{response.code}" unless response.code =~ /[23]0\d/
+      raise PasteNotCreatedError, "Paste not created" unless response['location']
+    
+      return Paste.new(:body => body, :url => response['location'], :time => Time.now)
+    end
+    alias_method :paste, :create
+    
+    # Searches some expression on Pastie.
+    # Returns a Collection object
+    def search(expression, page = 1)
+      Collection.new(page) do |page|
+        search_url(expression, page)
+      end
+    end
+    
+    # Lists all pastes.
+    # Returns a Collection object
+    def list(page = 1)
+      Collection.new(page) do |page|
+        all_url(page)
+      end
+    end
+    alias_method :all, :list
+  
+    private
+    
+    def post_paste(body, options)
+      post(create_url,
+        "paste[restricted]" => options[:private] ? '1' : '0',
+        "paste[parser]" => options[:language] ? options[:language].to_s.downcase : :ruby,
+        "paste[body]" => body,
+        "paste[authorization]" => 'burger');
+    end
+    
+    def get(url)
+      open(url) { |f| f.read }
+    end
+  
+    def post(url, parameters = {})
+      Net::HTTP.post_form(URI.parse(url), parameters)
+    end
+  
+    def create_url
+      "#{url}/pastes/create"
+    end
+  
+    def search_url(query, page)
+      "#{url}/search?q=#{CGI.escape(query.to_s)}&page=#{page}"
+    end 
+  
+    def all_url(page)
+      "#{url}/all/page/#{page}"
+    end
+  end
+end

metadata

@@ -0,0 +1,56 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.4
+specification_version: 1
+name: pastis
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+date: 2007-09-25 00:00:00 +02:00
+summary: A simple interface to Pastie
+require_paths: 
+- lib
+email: sam@gotfresh.info
+homepage: http://i.gotfresh.info
+rubyforge_project: 
+description: Pastis is a simple interface to create, list and search for pastes on Pastie (http://pastie.caboo.se).\n\ It could be used as a library or a standalone binary
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+post_install_message: 
+authors: 
+- Samuel Lebeau
+files: 
+- LICENSE
+- bin/pastis
+- lib/pastis.rb
+test_files: []
+
+rdoc_options: []
+
+extra_rdoc_files: []
+
+executables: 
+- pastis
+extensions: []
+
+requirements: []
+
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hpricot
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0.6"
+    version: