rhaiker 0.0.1

data/History.ja.txt

@@ -0,0 +1,3 @@
+== 0.0.1 2008-09-04
+
+* 初版作成

data/History.txt

@@ -0,0 +1,4 @@
+== 0.0.1 2008-09-04
+
+* 1 major enhancement:
+  * Initial release

data/License.txt

@@ -0,0 +1,20 @@
+Copyright (c) 2008 Saronpasu
+
+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/Manifest.txt

@@ -0,0 +1,34 @@
+History.ja.txt
+History.txt
+License.txt
+Manifest.txt
+README.ja.txt
+README.txt
+Rakefile
+config/hoe.rb
+config/requirements.rb
+example/get_followers.rb
+example/get_following_all_words.rb
+example/get_hot_keywords.rb
+example/haiku_update.rb
+lib/rhaiker.rb
+lib/rhaiker/utils.rb
+lib/rhaiker/version.rb
+lib/rhaiker/xml_parser.rb
+script/console
+script/destroy
+script/generate
+script/txt2html
+setup.rb
+spec/rhaiker_spec.rb
+spec/spec.opts
+spec/spec_helper.rb
+tasks/deployment.rake
+tasks/environment.rake
+tasks/rspec.rake
+tasks/website.rake
+website/index.html
+website/index.txt
+website/javascripts/rounded_corners_lite.inc.js
+website/stylesheets/screen.css
+website/template.html.erb

data/README.ja.txt

@@ -0,0 +1,34 @@
+
+Rhaiker について
+
+1. Rhaiker って何？
+
+  はてなハイクAPIのrubyライブラリです。
+
+2. はてなハイク とは
+
+　はてなのマイクロブログサービスです。
+
+3. はてなハイクAPI とは
+
+　はてなハイクをプログラムから扱うために提供されたWebAPIです。
+
+4. はてなハイクAPI についてもっと詳しく！
+
+　ここ( http://h.hatena.ne.jp/api ) をご覧ください。
+
+5. はてなハイク についてもっと詳しく！
+
+　ここ( http://d.hatena.ne.jp/keyword/はてなハイク ) をご覧ください。
+
+6. 使い方
+
+　使い方の例は、 exsampleフォルダの中にいくつかのサンプルプログラムとして
+　記述しています。
+　また、RDocで詳細な使い方をご覧いただくこともできます。
+
+7. 作者 について
+
+　サロンパス(id:saronpasu)です。
+
+

data/README.txt

@@ -0,0 +1,51 @@
+= rhaiker - Hatena::Haiku::API ruby binding.
+
+http://rhaiker.rubyforge.org/
+
+== DESCRIPTION:
+
+WebAPI-library for Japanese micro-blog 'Hatena::Haiku'.
+This library create only use Standard-Library on ruby-1.8.x.
+
+Hatena::Haiku
+http://h.hatena.ne.jp/
+
+Hatena::Haiku::API
+http://h.hatena.ne.jp/api
+
+== FEATURES/PROBLEMS:
+
+* Still does not support 'Upload ImageFile'.
+
+== SYNOPSIS:
+
+  see exsample/*.rb
+
+== INSTALL:
+
+gem install rhaiker
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 Saronpasu
+
+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,5 @@
+require 'config/requirements'
+require 'config/hoe' # setup Hoe + all gem configuration
+
+Dir['tasks/**/*.rake'].each { |rake| load rake }
+

data/config/hoe.rb

@@ -0,0 +1,74 @@
+require 'rhaiker/version'
+
+AUTHOR = 'saronpasu'  # can also be an array of Authors
+EMAIL = "jamneco@gmail.com"
+DESCRIPTION = "Hatena::Haiku::API ruby binding"
+GEM_NAME = 'rhaiker' # what ppl will type to install your gem
+RUBYFORGE_PROJECT = 'rhaiker' # The unix name for your project
+HOMEPATH = "http://#{RUBYFORGE_PROJECT}.rubyforge.org"
+DOWNLOAD_PATH = "http://rubyforge.org/projects/#{RUBYFORGE_PROJECT}"
+EXTRA_DEPENDENCIES = [
+#  ['activesupport', '>= 1.3.1']
+]    # An array of rubygem dependencies [name, version]
+
+@config_file = "~/.rubyforge/user-config.yml"
+@config = nil
+RUBYFORGE_USERNAME = "saronpasu"
+def rubyforge_username
+  unless @config
+    begin
+      @config = YAML.load(File.read(File.expand_path(@config_file)))
+    rescue
+      puts <<-EOS
+ERROR: No rubyforge config file found: #{@config_file}
+Run 'rubyforge setup' to prepare your env for access to Rubyforge
+ - See http://newgem.rubyforge.org/rubyforge.html for more details
+      EOS
+      exit
+    end
+  end
+  RUBYFORGE_USERNAME.replace @config["username"]
+end
+
+
+REV = nil
+# UNCOMMENT IF REQUIRED:
+# REV = YAML.load(`svn info`)['Revision']
+VERS = Rhaiker::VERSION::STRING + (REV ? ".#{REV}" : "")
+RDOC_OPTS = ['--quiet', '--title', 'rhaiker documentation',
+    "--opname", "index.html",
+    "--charset", "utf-8",
+    "--line-numbers",
+    "--main", "README",
+    "--inline-source"]
+
+class Hoe
+  def extra_deps
+    @extra_deps.reject! { |x| Array(x).first == 'hoe' }
+    @extra_deps
+  end
+end
+
+# Generate all the Rake tasks
+# Run 'rake -T' to see list of generated tasks (from gem root directory)
+$hoe = Hoe.new(GEM_NAME, VERS) do |p|
+  p.developer(AUTHOR, EMAIL)
+  p.description = DESCRIPTION
+  p.summary = DESCRIPTION
+  p.url = HOMEPATH
+  p.rubyforge_name = RUBYFORGE_PROJECT if RUBYFORGE_PROJECT
+  p.test_globs = ["test/**/test_*.rb"]
+  p.clean_globs |= ['**/.*.sw?', '*.gem', '.config', '**/.DS_Store']  #An array of file patterns to delete on clean.
+
+  # == Optional
+  p.changes = p.paragraphs_of("History.txt", 0..1).join("\n\n")
+  #p.extra_deps = EXTRA_DEPENDENCIES
+
+    #p.spec_extras = {}    # A hash of extra values to set in the gemspec.
+  end
+
+CHANGES = $hoe.paragraphs_of('History.txt', 0..1).join("\\n\\n")
+PATH    = (RUBYFORGE_PROJECT == GEM_NAME) ? RUBYFORGE_PROJECT : "#{RUBYFORGE_PROJECT}/#{GEM_NAME}"
+$hoe.remote_rdoc_dir = File.join(PATH.gsub(/^#{RUBYFORGE_PROJECT}\/?/,''), 'rdoc')
+$hoe.rsync_args = '-av --delete --ignore-errors'
+$hoe.spec.post_install_message = File.open(File.dirname(__FILE__) + "/../PostInstall.txt").read rescue ""

data/config/requirements.rb

@@ -0,0 +1,15 @@
+require 'fileutils'
+include FileUtils
+
+require 'rubygems'
+%w[rake hoe newgem rubigen].each do |req_gem|
+  begin
+    require req_gem
+  rescue LoadError
+    puts "This Rakefile requires the '#{req_gem}' RubyGem."
+    puts "Installation: gem install #{req_gem} -y"
+    exit
+  end
+end
+
+$:.unshift(File.join(File.dirname(__FILE__), %w[.. lib]))

data/example/get_followers.rb

@@ -0,0 +1,32 @@
+#!ruby -Ku
+require 'rhaiker'
+
+# first you create Rhaiker instance.
+@accessor = Rhaiker.new
+
+# if you want 'your data' when must settings.
+@accessor.user_id = 'your hatena_id'
+@accessor.api_key = 'fhrIEhelagF' #@h.hatena.ne.jp
+
+# optional settings
+@accessor.user_agent = 'your user_agent'
+
+# get follwings member-list.
+followings = @accessor.get_followings
+
+# but this case can be.
+followings = @accessor.get_followings('your hatena_id')
+
+# return data is ...
+# 
+# [ {:id => 'hatena_tarou',
+#    :name => 'hatena_tarou',
+#    :screen_name => 'hatena_tarou',
+#    :followers_count => 0,
+#    :url => <URI:: ...>,
+#    :profile_image_url => <URI:: ...>},
+#   {:id => 'hatena_hanako', ...},
+#   {...}, ...]
+#
+
+

data/example/get_following_all_words.rb

@@ -0,0 +1,29 @@
+#!ruby -Ku
+require 'rhaiker'
+
+# first you create Rhaiker instance.
+@accessor = Rhaiker.new
+
+# optional settings
+@accessor.user_agent = 'your user_agent'
+
+# access to Hateha::Haiku::API
+my_following_words = @accessor.keywords('your hatena_id')
+
+# filltering only title.
+mywords = my_following_words.collect{|myword|
+  myword[:title]
+}
+
+# filltering related-words only title.
+related_words = my_following_words.collect{|myword|
+   myword[:related_keywords].collect{|related_word|
+     related_word[:title]
+   }
+}
+
+# following-words and related-words.
+all_words = mywords + related_words
+all_words = all_words.uniq
+
+

data/example/get_hot_keywords.rb

@@ -0,0 +1,17 @@
+#!ruby -Ku
+require 'rhaiker'
+
+# first you create Rhaiker instance.
+@accessor = Rhaiker.new
+
+# optional settings
+@accessor.user_agent = 'your user_agent'
+
+# access to Hateha::Haiku::API
+hot_keywords = @accessor.get_hot_keywords
+
+# short case.
+# this code is get 'Hot Keywords' only tiltes.
+hot_keyword_titles = Rhaiker.new.get_hot_keywords.collect{|keyword|keyword[:title]}
+
+

data/example/haiku_update.rb

@@ -0,0 +1,21 @@
+#!ruby -Ku
+require 'rhaiker'
+
+# first you create Rhaiker instance.
+@accessor = Rhaiker.new
+
+# if you want update when must settings.
+@accessor.user_id = 'your hatena_id'
+@accessor.api_key = 'fhrIEhelagF' #@h.hatena.ne.jp
+
+# optional settings
+@accessor.user_agent = 'your user_agent'
+@accessor.source = 'your source keyword'
+
+# input status message in UTF-8.
+params = {:status => 'Test Update.'}
+
+# status update send Hatena::Haiku::API.
+@accessor.status_update(params)
+
+

data/lib/rhaiker.rb

@@ -0,0 +1,767 @@
+#!ruby -Ku
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+require 'rhaiker/utils'
+require 'rhaiker/xml_parser'
+
+=begin rdoc
+Rhaiker is Hatena::Haiku::API ruby binding.
+Use only Pure Ruby library.
+
+see exsample/*.rb
+
+please show Hatena::Haiku::API::Guide[http://h.hatena.ne.jp/api]
+
+=end
+class Rhaiker
+  # HTTP-HEADER 'User-Agent' String
+  attr_accessor :user_agent
+  # Hatena::UserID String
+  attr_accessor :user_id
+  # Hatena::Haiku::API API-Key String
+  attr_accessor :api_key
+  # Hatena::Haiku::API ClientSource String
+  attr_accessor :source
+
+  # Hatena::Haiku::API BaseURL
+  BaseAddress = 'http://h.hatena.ne.jp/api/'
+  # Utilities.
+  include Utils
+  # Customized XML Parser for
+  # Hatena::Haiku::API[http://h.hatena.ne.jp/api]
+  include XML_Parser
+
+  def initialize #:nodoc:
+    @user_agent = 'rhaiker'
+    @source = 'rhaiker'
+  end
+
+=begin rdoc
+Description::
+  get public-timeline from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-public_timeline]
+
+Return::
+  timeline ([{:id => 12345, ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_timeline
+=end
+  def get_public_timeline
+    uri = create_uri(
+      BaseAddress + 
+      'statuses/public_timeline.xml'
+    )
+    request = create_request(:get, uri)
+    document = http_access(uri, request)
+    if document
+      return parse_timeline(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get friends_timeline from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-friends_timeline]
+
+Params::
+  user_id (target user_id) [,
+  options ({:count => 20, [...]})]
+
+Return::
+  timeline ([{:id => 12345, ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#parse_options,
+  Utils#http_access,
+  XML_Parser#parse_timeline,
+=end
+  def get_friends_timeline(user_id = nil, options = nil)
+    uri_base = BaseAddress + 'statuses/friends_timeline'
+    uri_base += user_id ? "/#{user_id}.xml" : '.xml'
+    uri_base += parse_options(options) if options
+    uri = create_uri(uri_base)
+    request = create_request(:get, uri, user_id.nil?)
+    document = http_access(uri, request)
+    if document
+      return parse_timeline(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get user_timeline from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-user_timeline]
+
+Params::
+  user_id (target user_id) [,
+  options ({:count => 20, [...]})]
+
+Return:: 
+  timeline ([{:id => 12345, ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  Utils#parse_options,
+  XML_Parser#parse_timeline,
+=end
+  def get_user_timeline(user_id = nil, options = nil)
+    uri_base = BaseAddress + 'statuses/user_timeline'
+    uri_base += user_id ? "/#{user_id}.xml" : '.xml'
+    uri_base += parse_options(options) if options
+    uri = create_uri(uri_base)
+    request = create_request(:get, uri, user_id.nil?)
+    document = http_access(uri, request)
+    if document
+      return parse_timeline(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get keyword_timeline from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-keyword_timeline]
+
+Params::
+  keywrod (target keyword) [,
+  options ({:count => 20, [...]})]
+
+Return::
+  timeline ([{:id => 12345, ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#parse_options,
+  Utils#http_access,
+  XML_Parser#parse_timeline
+=end
+  def get_keyword_timeline(keyword, options = nil)
+    uri_base = BaseAddress +
+      'statuses/keyword_timeline/' +
+      keyword + '.xml'
+    uri_base += parse_options(options) if options
+    uri = create_uri(uri_base)
+    request = create_request(:get, uri)
+    document = http_access(uri, request)
+    if document
+      return parse_timeline(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get timeline(include picture-url) from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-album]
+
+Params::
+  keyword (target keyword)
+
+Return::
+  timeline ([{:id => 12345, ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#parse_options,
+  Utils#http_access,
+  XML_Parser#parse_timeline
+=end
+  def get_album(keyword = nil)
+    uri_base = BaseAddress + 'statuses/album'
+    uri_base += keyword ? "/#{keyword}.xml" : '.xml'
+    uri = create_uri(uri_base)
+    request = create_request(:get, uri)
+    document = http_access(uri, request)
+    if document
+      return parse_timeline(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get status from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-show]
+
+Params::
+  status_id (target status_id)
+
+Return::
+  status ({:id => 12345, ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_status
+=end
+  def get_status(status_id)
+    uri = create_uri(
+      BaseAddress +
+      'statuses/show/' +
+      status_id.to_s + '.xml'
+    )
+    request = create_request(:get, uri)
+    document = http_access(uri, request)
+    if document
+      return parse_status(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get friends from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-friends]
+
+Params::
+  user_id (target user_id)
+
+Return::
+  users ([{:name => 'hoge', ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_users
+=end
+  def get_friends(user_id = nil)
+    uri_base = BaseAddress + 'statuses/friends'
+    uri_base += user_id ? "/#{user_id}.xml" : '.xml'
+    uri = create_uri(uri_base)
+    request = create_request(:get, uri, user_id.nil?)
+    document = http_access(uri, request)
+    if document
+      return parse_users(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get followers from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-followers]
+
+Params::
+  user_id (target user_id)
+
+Return::
+  users ([{:name => 'hoge', ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_users
+=end
+  def get_followers(user_id = nil)
+    uri_base = BaseAddress + 'statuses/followers'
+    uri_base += user_id ? "/#{user_id}.xml" : '.xml'
+    uri = create_uri(uri_base)
+    request = create_request(:get, uri, user_id.nil?)
+    document = http_access(uri, request)
+    if document
+      return parse_users(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get friend from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#friendship-show]
+
+Params::
+  user_id (target user_id)
+
+Return::
+  user ({:name => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_user
+=end
+  def get_friend(user_id)
+    uri = create_uri(
+      BaseAddress +
+      'friendships/show/' +
+      user_id + '.xml'
+    )
+    request = create_request(:get, uri)
+    document = http_access(uri, request)
+    if document
+      return parse_user(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get hot-keyword from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#keywords-hot]
+
+Return::
+  keywords ([{:title => 'hoge', ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_keywords
+=end
+  def get_hot_keywords
+    uri = create_uri(BaseAddress + 'keywords/hot.xml')
+    request = create_request(:get, uri)
+    document = http_access(uri, request)
+    if document
+      return parse_keywords(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get keyword-list from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#keywords-list]
+
+Params::
+  options => {:page => pagenum}
+
+Return::
+  keywords ([{:title => 'hoge', ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#parse_options,
+  Utils#http_access,
+  XML_Parser#parse_keywords
+=end
+  def get_keyword_list(options = nil)
+    uri_base = BaseAddress + 'keywords/list.xml'
+    uri_base += parse_options(options) if options
+    uri = create_uri(uri_base)
+    request = create_request(:get, uri)
+    document = http_access(uri, request)
+    if document
+      return parse_keywords(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get following keywords from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-keywords]
+
+Params::
+  user_id (target user_id)
+
+Return::
+  keywords ([{:title => 'hoge', ...}, ...]) or false
+
+RelatedMethods::
+  Utils#create_uri
+  Utils#create_request
+  Utils#http_access
+  XML_Parser#parse_keywords
+=end
+  def get_keywords(user_id = nil)
+    uri_base = BaseAddress + 'statuses/keywrods'
+    uri_base += user_id ? "/#{user_id}.xml" : '.xml'
+    uri = create_uri(uri_base)
+    request = create_request(:get, uri, user_id.nil?)
+    document = http_access(uri, request)
+    if document
+      return parse_timeline(document)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  get keyword from
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#keywords-show]
+
+Params::
+  keyword (target keyword)
+
+Return::
+  keyword ({:title => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_keyword
+=end
+  def get_keyword(keyword)
+    uri = create_uri(
+      BaseAddress +
+      'keywords/show/' +
+      keyword + 'xml'
+    )
+    request = create_request(:get, uri)
+    document = http_access(uri, request)
+    if document
+      return parse_keyword(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  update status for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-update]
+
+Params::
+  options ({:status => 'hoge', ...}]
+
+Return::
+  status ({:text => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#parse_options,
+  Utils#http_access,
+  XML_Parser#parse_status
+
+Notes::
+  Still does not support of 'Upload Image File'
+=end
+  def status_update(options)
+    uri_base = BaseAddress + 'statuses/update.xml'
+    uri_base += parse_options(options)
+    uri_base += '&source=' + @source
+    uri = create_uri(uri_base)
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_status(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  delete status for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#statuses-destroy]
+
+Params::
+  status_id (target status_id)
+
+Return::
+  status ({:text => 'hoge', ...}) or false
+
+RelationMethods::
+  create_uri,
+  create_request,
+  http_access,
+  parse_status
+=end
+  def status_destroy(status_id)
+    uri = create_uri(
+      BaseAddress +
+      'statuses/status/destroy/' +
+      status_id.to_s + '.xml'
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_status(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  friend following for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#friendship-create]
+
+Params::
+  user_id (target user_id)
+
+Return::
+  user ({:id => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_user
+=end
+  def friendship_create(user_id)
+    uri = create_uri(
+      BaseAddress +
+      'friendships/create/' +
+      user_id + '.xml'
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_user(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  friend unfollowing for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#friendship-destroy]
+
+Params::
+  user_id (target user_id)
+
+Return::
+  user ({:id => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_user
+=end
+  def friendship_destroy(user_id)
+    uri = create_uri(
+      BaseAddress +
+      'friendships/destroy/' +
+      user_id + '.xml'
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_user(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  add star for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#favorites-create]
+
+Params::
+  status_id (target status_id)
+
+Return::
+  status ({:text => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_status
+=end
+  def favorites_create(status_id)
+    uri = create_uri(
+      BaseAddress +
+      'favorites/create/' +
+      status_id.to_s + '.xml'
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_status(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  delete star for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#favorites-destroy]
+
+Params::
+  status_id (target status_id)
+
+Return::
+  status {:text => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_status
+=end
+  def favorites_destroy(status_id)
+    uri = create_uri(
+      BaseAddress +
+      'favorites/destroy/' +
+      status_id.to_s + '.xml'
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_status(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  following keyword for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#keywords-create]
+
+Params::
+  keyword (target keyword)
+
+Return::
+  keyword ({:title => 'hoge', ...} or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_keyword
+=end
+  def keyword_create(keyword)
+    uri = create_uri(
+      BaseAddress +
+      'keywords/create/' +
+      keyword + '.xml'
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_keyword(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  unfollowing keyword for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#keywords-destroy]
+
+Params::
+  keyword (target keyword)
+
+Return::
+  keyword ({:title => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_keyword
+=end
+  def keyword_destroy(keyword)
+    uri = create_uri(
+      BaseAddress +
+      'keywords/destroy/' +
+      keyword + '.xml'
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_keyword(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  create relation word1 and word2 for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#keywords-relation_create]
+
+Params::
+  word1 (target word),
+  word2 (target word)
+
+Return::
+  keyword ({:title => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_keyword
+=end
+  def keyword_relation_create(word1, word2)
+    uri = create_uri(
+      BaseAddress +
+      'keywords/relation/create.xml' +
+      '?word1=' + word1 +
+      '&word2=' + word2
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_keyword(document.root)
+    else
+      return false
+    end
+  end
+
+=begin rdoc
+Description::
+  delete relation word1 and word2 for
+  Hatena::Haiku::API[http://h.hatena.ne.jp/api#keywords-relation_destroy]
+
+Params::
+  word1 (target word),
+  word2 (rarget word)
+
+Return::
+  keyword ({:title => 'hoge', ...}) or false
+
+RelatedMethods::
+  Utils#create_uri,
+  Utils#create_request,
+  Utils#http_access,
+  XML_Parser#parse_keyword
+=end
+  def keyword_relation_destroy(word1, word2)
+    uri = create_uri(
+      BaseAddress +
+      'keywords/relation/destroy.xml' +
+      '?word1=' + word1 +
+      '&word2=' + word2
+    )
+    request = create_request(:post, uri, true)
+    document = http_access(uri, request)
+    if document
+      return parse_keyword(document.root)
+    else
+      return false
+    end
+  end
+end