twitter-lists-cli 0.1.0

data/README.md

@@ -0,0 +1,33 @@
+twitter-lists-cli
+=================
+A command-line client for manipulating large Twitter lists in the shell, shell scripts, etc.
+
+Currently supports
+------------------
+- OAuth authentication
+- Showing a users's followers/following
+- Following and unfollowing users
+- Showing, adding, and removing a members from a list
+
+License
+-------
+Copyright (c) 2010 Dwayne Litzenberger
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,26 @@
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |s|
+    s.name = "twitter-lists-cli"
+    s.executables = ["twitter-auth", "twitter-follow", "twitter-following", "twitter-lists"]
+    s.summary = "Command-line client for manipulating Twitter lists."
+    s.email = "dlitz@dlitz.net"
+    s.homepage = "http://github.com/dlitz/twitter-lists-cli"
+    s.description = <<EOF
+A command-line client for manipulating large Twitter lists in the shell, shell scripts, etc.
+
+Currently supports
+------------------
+- OAuth authentication
+- Showing a users's followers/following
+- Following and unfollowing users
+- Showing, adding, and removing a members from a list
+EOF
+    s.authors = ["Dwayne Litzenberger"]
+    s.files = FileList["[A-Z]*", "bin/**/*"]
+    s.add_dependency "twitter", "~> 0.9.5"    # John Nunemaker's twitter gem
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler, or one of its dependencies, is not available. Install it with: gem install jeweler"
+end

data/VERSION.yml

@@ -0,0 +1,5 @@
+--- 
+:patch: 0
+:major: 0
+:minor: 1
+:build: 

data/bin/twitter-auth

@@ -0,0 +1,32 @@
+#!/usr/bin/env ruby
+require 'optparse'
+require 'twitter'
+
+# Parse arguments
+options = {:only => false, :unfollow=>false}
+OptionParser.new do |opts|
+  opts.banner = "#{opts.program_name}"
+  opts.separator "Get OAuth credentials"
+  opts.separator ""
+  opts.separator "Global Options:"
+  opts.on("--auth FILE", "Read authentication data from the specified FILE") do |optarg|
+    options[:auth_file] = optarg
+  end
+  opts.separator ""
+end.parse!
+options[:auth_file] ||= ENV["TWITTER_AUTHFILE"]
+options[:auth_file] ||= File.expand_path("~/.twitter")
+raise "No --auth file specified" unless options[:auth_file] # XXX TODO - output usage information
+raise "Too many arguments" unless ARGV.empty?
+
+auth = YAML.load_file(options[:auth_file])
+oauth = Twitter::OAuth.new(auth["token"], auth["secret"])
+rt = oauth.request_token
+puts "Go to https://#{rt.authorize_url}"
+print "Enter the PIN here: "
+$stdout.flush
+pin = $stdin.readline.strip
+
+atoken, asecret = oauth.authorize_from_request(rt.token, rt.secret, pin)
+
+puts({"atoken" => atoken, "asecret" => asecret}.to_yaml)

data/bin/twitter-follow

@@ -0,0 +1,83 @@
+#!/usr/bin/env ruby
+require 'optparse'
+require 'twitter'
+
+# Parse arguments
+options = {:only => false, :unfollow=>false}
+OptionParser.new do |opts|
+  opts.banner = "#{opts.program_name} [-l LISTNAME] [--only | -d] [USER...]"
+  opts.separator "Follow or unfollow users"
+  opts.separator ""
+  opts.on("-l", "--list LISTNAME", "act on the specified LISTNAME instead of the logged-in user") do |optarg|
+    options[:list] = optarg
+  end
+  opts.on("-d", "--unfollow", "unfollow the specified users") do |optarg|
+    options[:unfollow] = optarg
+  end
+  opts.separator ""
+  opts.separator "If no USERs are specified on the command line, they will be read from stdin."
+  opts.separator ""
+  opts.separator "Global Options:"
+  opts.on("--auth FILE", "Read authentication data from the specified FILE") do |optarg|
+    options[:auth_file] = optarg
+  end
+  opts.separator ""
+end.parse!
+options[:auth_file] ||= ENV["TWITTER_AUTHFILE"]
+options[:auth_file] ||= File.expand_path("~/.twitter")
+raise "No --auth file specified" unless options[:auth_file] # XXX TODO - output usage information
+raise "--unfollow and --only are mutually exclusive" if options[:unfollow] and options[:only]
+raise "--only not implemented yet" if options[:only]
+if ARGV.empty?
+  users = []
+  begin
+    loop do
+      users << STDIN.readline.strip
+    end
+  rescue EOFError
+  end
+  users = users.select{|u| u =~ /[^\s]/}  # skip blank lines
+  options[:users] = users
+else
+  options[:users] = ARGV
+end
+
+auth = YAML.load_file(options[:auth_file])
+oauth = Twitter::OAuth.new(auth["token"], auth["secret"])
+oauth.authorize_from_access(auth["atoken"], auth["asecret"])
+base = Twitter::Base.new(oauth)
+
+# Knowing our own screen name is required when fetching list members
+if options[:list]
+  options[:user] ||= auth["user"]
+  options[:user] ||= base.verify_credentials.screen_name
+end
+
+options[:users].each do |user|
+  if options[:list]
+    if options[:unfollow]
+      begin
+        base.list_remove_member(options[:user], options[:list], user)
+      rescue Twitter::TwitterError => e
+        # Don't raise exception if the user is already removed
+        raise unless e.data['error'] == "The user you are trying to remove from the list is not a member"
+      end
+    else
+      base.list_add_member(options[:user], options[:list], user)
+    end
+  else
+    if options[:unfollow]
+      begin
+        base.friendship_destroy(user)
+      rescue Twitter::TwitterError => e
+        raise unless e.data["error"] == "You are not friends with the specified user."
+      end
+    else
+      begin
+        base.friendship_create(user, true)
+      rescue Twitter::TwitterError => e
+        raise unless e.data["error"] =~ /\ACould not follow user: (.* is already on your list\.|You've already requested to follow .*)\Z/
+      end
+    end
+  end
+end

data/bin/twitter-following

@@ -0,0 +1,62 @@
+#!/usr/bin/env ruby
+require 'optparse'
+require 'twitter'
+
+# Parse arguments
+options = {}
+OptionParser.new do |opts|
+  opts.banner = "#{opts.program_name} [-r] [-u USER] [LISTNAME]"
+  opts.separator "Show who is being followed by a user or a list"
+  opts.separator ""
+  opts.on("-u", "--user USER", "specify a username (default is the logged-in user)") do |optarg|
+    options[:user] = optarg
+  end
+  opts.on("-r", "--reverse", "show followers instead of who is following") do |optarg|
+    options[:reverse] = optarg
+  end
+  opts.separator ""
+  opts.separator "Global options:"
+  opts.on("--auth FILE", "Read authentication data from the specified FILE") do |optarg|
+    options[:auth_file] = optarg
+  end
+  opts.separator ""
+end.parse!
+options[:auth_file] ||= ENV["TWITTER_AUTHFILE"]
+options[:auth_file] ||= File.expand_path("~/.twitter")
+raise "No --auth file specified" unless options[:auth_file] # XXX TODO - output usage information
+raise "Too many arguments specified" if ARGV.length > 1 # XXX TODO - output usage information
+options[:list] = ARGV[0]
+
+auth = YAML.load_file(options[:auth_file])
+oauth = Twitter::OAuth.new(auth["token"], auth["secret"])
+oauth.authorize_from_access(auth["atoken"], auth["asecret"])
+base = Twitter::Base.new(oauth)
+
+# Knowing our own screen name is required when fetching list members
+if options[:list]
+  options[:user] ||= auth["user"]
+  options[:user] ||= base.verify_credentials.screen_name
+end
+
+cursor = -1
+begin
+  query = {}
+  if options[:list]
+    if options[:reverse]
+      result = base.list_subscribers(options[:user], options[:list], query.merge(:cursor => cursor))
+    else
+      result = base.list_members(options[:user], options[:list], query.merge(:cursor => cursor))
+    end
+  else
+    query[:screen_name] = options[:user] if options[:user]
+    if options[:reverse]
+      result = base.followers(query.merge(:cursor => cursor))
+    else
+      result = base.friends(query.merge(:cursor => cursor))
+    end
+  end
+  result.users.each do |u|
+    puts u.screen_name
+  end
+  cursor = result.next_cursor
+end until cursor == 0

data/bin/twitter-lists

@@ -0,0 +1,84 @@
+#!/usr/bin/env ruby
+require 'optparse'
+require 'twitter'
+
+# Parse arguments
+options = {:create => false, :delete => false}
+OptionParser.new do |opts|
+  opts.banner = "#{opts.program_name} [-s] [-u USER] [-c LISTNAME... | -d LISTNAME...]"
+  opts.separator "Show, create, or delete lists"
+  opts.on("-u", "--user USER", "specify a username (default is the logged-in user)") do |optarg|
+    options[:user] = optarg
+  end
+  opts.on("-c", "--create", "create the specified list(s)") do |optarg|
+    options[:create] = true
+  end
+  opts.on("-d", "--delete", "delete the specified list(s)") do |optarg|
+    options[:delete] = true
+  end
+  opts.on("-s", "--slugs", "Use slugs instead of (possibly non-unique) names") do |optarg|
+    options[:slugs] = optarg
+  end
+  opts.separator ""
+  opts.separator "If no LISTNAMEs are specified on the command line, they will be read from stdin."
+  opts.separator ""
+  opts.separator "Global options:"
+  opts.on("--auth FILE", "Read authentication data from the specified FILE") do |optarg|
+    options[:auth_file] = optarg
+  end
+  opts.separator ""
+end.parse!
+options[:auth_file] ||= ENV["TWITTER_AUTHFILE"]
+options[:auth_file] ||= File.expand_path("~/.twitter")
+raise "No --auth file specified" unless options[:auth_file] # XXX TODO - output usage information
+raise "--create and --delete are mutually exclusive" if options[:create] and options[:delete]
+if (options[:create] || options[:delete])
+  if ARGV.empty?
+    lists = []
+    begin
+      loop do
+        lists << STDIN.readline.strip
+      end
+    rescue EOFError
+    end
+    lists = lists.select{|u| u =~ /[^\s]/}  # skip blank lines
+    options[:lists] = lists
+  else
+    options[:lists] = ARGV
+  end
+else
+  raise "No arguments are allowed without --create or --delete" unless ARGV.empty?
+end
+
+auth = YAML.load_file(options[:auth_file])
+oauth = Twitter::OAuth.new(auth["token"], auth["secret"])
+oauth.authorize_from_access(auth["atoken"], auth["asecret"])
+base = Twitter::Base.new(oauth)
+
+# Knowing our own screen name is required
+options[:user] ||= auth["user"]
+options[:user] ||= base.verify_credentials.screen_name
+
+if options[:create]
+  options[:lists].each do |list|
+    base.list_create(options[:user], :name => list)
+  end
+elsif options[:delete]
+  options[:lists].each do |list|
+    unless options[:slugs]
+      # convert list name to slug
+      list = list.downcase.gsub(/[^a-z0-9]+/, '-').gsub(/\A-+|-+\Z/, '').gsub(/-+/, '-')
+    end
+    base.list_delete(options[:user], list)
+  end
+else
+  cursor = -1
+  begin
+    query = {}
+    result = base.lists(options[:user], query.merge(:cursor => cursor))
+    result.lists.each do |list|
+      puts options[:slugs] ? list.slug : list.name
+    end
+    cursor = result.next_cursor
+  end until cursor == 0
+end

metadata

@@ -0,0 +1,93 @@
+--- !ruby/object:Gem::Specification 
+name: twitter-lists-cli
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  - 0
+  version: 0.1.0
+platform: ruby
+authors: 
+- Dwayne Litzenberger
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-07-10 00:00:00 -04:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: twitter
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        - 9
+        - 5
+        version: 0.9.5
+  type: :runtime
+  version_requirements: *id001
+description: |
+  A command-line client for manipulating large Twitter lists in the shell, shell scripts, etc.
+  
+  Currently supports
+  ------------------
+  - OAuth authentication
+  - Showing a users's followers/following
+  - Following and unfollowing users
+  - Showing, adding, and removing a members from a list
+
+email: dlitz@dlitz.net
+executables: 
+- twitter-auth
+- twitter-follow
+- twitter-following
+- twitter-lists
+extensions: []
+
+extra_rdoc_files: 
+- README.md
+files: 
+- README.md
+- Rakefile
+- VERSION.yml
+- bin/twitter-auth
+- bin/twitter-follow
+- bin/twitter-following
+- bin/twitter-lists
+has_rdoc: true
+homepage: http://github.com/dlitz/twitter-lists-cli
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: Command-line client for manipulating Twitter lists.
+test_files: []
+