timelog4r 0.2.0 → 0.3.0

data/History.txt

@@ -1,3 +1,10 @@
+== 0.3.0 2011-08-2x
+
+* 3 major enhancement:
+  * [new][web_handler] support non api accessor.
+  * [change] API or WEB selectable. initialize of instance with argment.
+  * [update] support for timelog.jp service major version up.
+
 == 0.2.0 2011-07-2x
 
 * 1 major enhancement:

data/Manifest.txt

@@ -11,6 +11,7 @@ lib/timelog4r.rb
 lib/timelog4r/utils.rb
 lib/timelog4r/version.rb
 lib/timelog4r/xml_parser.rb
+lib/timelog4r/html_parser.rb
 script/console
 script/destroy
 script/generate

data/README.txt

@@ -9,8 +9,12 @@ Timelog4r is TimelogAPI for ruby.
 == SYNOPSIS:
 
   t = Timelog4r.new
+  # if use API.
+  # t = Timelog4r.new(:api)
   t.user_id = 'your timelog id'
   t.password = 'your timelog password'
+  # if use WEB-Accessor.(not use API)
+  t.login
   t.update 'Hello Timelog.'
 
 == INSTALL:
@@ -21,7 +25,7 @@ sudo gem install timelog4r
 
 (The MIT License)
 
-Copyright (c) 2008 saronpasu
+Copyright (c) 2008-2011 saronpasu
 
 Permission is hereby granted, free of charge, to any person obtaining
 a copy of this software and associated documentation files (the

data/config/requirements.rb

@@ -2,7 +2,7 @@ require 'fileutils'
 include FileUtils
 
 require 'rubygems'
-%w[rake hoe newgem rubigen].each do |req_gem|
+%w[rake hoe newgem rubigen mechanize].each do |req_gem|
   begin
     require req_gem
   rescue LoadError

data/example/create_refollow_list.rb

@@ -1,5 +1,14 @@
 #!ruby -Ku
 # -*- encoding: UTF-8 -*-
+
+=begin
+
+  Timelog.jp service major version-up.
+  not support 'follow and follower'.
+
+=end
+
+__END__
 require 'timelog4r'
 
 t = Timelog4r.new

data/example/hello_world.rb

@@ -7,7 +7,10 @@ t.user_id = 'your Timelog ID'
 t.password = 'your Password'
 # t.user_agent = 'your client appli's namet'
 
+# if you access of WEB.(not use API)
+t.login
+
 note = 'Hello, World.'
-group_id = 'sandbox'
+group_id = 'timeline00'
 t.update(note, group_id)
 

data/lib/timelog4r/html_parser.rb

@@ -0,0 +1,275 @@
+#!ruby -Ku
+#-*- encoding: utf-8 -*-
+
+class Timelog4r
+  module HTML_Parser
+    require 'time'
+    require 'uri'
+    class ParseError < StandardError; end
+    
+    def permission_to_sym(string)
+      case string
+        when '0'
+          return :public
+        when '1'
+          return :friends_only
+        when '2'
+          return :private
+        else
+          return :unknown
+      end
+    end
+    
+    def tags_to_a(tag_string)
+      
+    end
+    
+    def is_group?(entry_element)
+      group_element = 'span[@class="time"]/a[@class="name"]'
+      
+    end
+    
+    def has_parent_entry?(entry_element)
+      
+    end
+    
+    def has_child_entry?(entry_element)
+      
+    end
+    
+    def parse_children_entries(entries_element)
+      
+    end
+    
+    def parse_entry(state_element)
+      permalink_element = 'span[@class="time"]/a[3]'
+      memo_element = 'h3'
+      author_element = 'span[@class="time"]/a[@class="name"]'
+      group_element = 'h3/a[@class="name"]'
+      permission_element = 'img[@class="icn_left"]'
+      has_star_element = 'img[@src="http://img.timelog.jp/star.gif"]'
+      star_count_element = has_star_element
+      res_count_element = 'img[@src="http://img.timelog.jp/comment.gif"]'
+      tag_list_element = 'span[@class="tag"]'
+      reply_to_element = 'h3/a'
+      
+      result = nil
+      
+      begin
+        result = Hash.allocate
+        unless state_element.at(memo_element) then
+          raise ParseError('not found memo_text.')
+        else
+          result[:memo_text] = state_element.at(memo_element).inner_text
+        end
+        unless state_element.at(permalink_element) then
+          raise ParseError.new('not found memo_id.')
+        else
+          result[:memo_id] = state_element.at(
+            permalink_element
+          ).attr('href')[7..-1]
+        end
+        unless state_element.at(permission_element) then
+          raise ParseError.new('not found permission.')
+        else
+          result[:permission] = state_element.at(
+            permission_element
+          ).attr('src').match(
+            /icon_(public|friend)\.gif/
+          ) ? $1.to_sym : nil
+        end
+        unless state_element.at(permalink_element) then
+          raise ParseError.new('not found modified.')
+        else
+          result[:modified] = state_element.at(
+            permalink_element
+          ).inner_text.match(
+            /(\d+\/\d+).+(\d+:\d+)/
+          ) ? Time.parse(
+            [Time.now.year.to_s+'/', $1, ' '+$2].join
+          ) : nil
+        end
+        unless state_element.at(permalink_element) then
+          raise ParseError.new('not found permalink.')
+        else
+          result[:permalink] = URI.parse(
+            'http://timelog.jp/' + state_element.at(
+              permalink_element
+            ).attr('href')
+          )
+        end
+        unless state_element.at(author_element) then
+          raise ParseError('not found author.')
+        else
+          author = state_element.at(author_element)
+          result[:author] = parse_author(author)
+        end
+        unless state_element.at(group_element) then
+          raise ParseError.new('not found group.')
+        else
+          group = state_element.at(group_element)
+          result[:in_group] = parse_group(group)
+        end
+        links = state_element.search(reply_to_element)
+        links = links.reject do |link|
+          link.has_attribute?('class') or
+          link.has_attribute?('target')
+        end
+        unless links.empty? then
+          reply_to = Hash.allocate
+          author = Hash.allocate
+          link = links.last
+          author[:user_id] = link.attr(
+            'href'
+          ).match(
+            /\/\/(.+)\.timelog\.jp/
+          ) ? $1 : nil
+          author[:screen_name] = link.inner_text
+          reply_to[:author] = author
+          result[:reply_to] = reply_to
+        end
+        # result[:todo] not supported.
+        if state_element.at(tag_list_element) then
+          tags = state_element.at(tag_list_element)
+          result[:tag] = parse_tag_list(tags)
+        end
+        if state_element.at(has_star_element) then
+          result[:star] = state_element.at(
+            has_star_element
+          ).attr(
+            'alt'
+          ).match(
+            /\d+/
+          ) ? [:count => $1.to_i] : [:count => 0]
+        else
+          result[:star] = [:count => 0]
+        end
+        unless state_element.at(res_count_element) then
+          raise ParseError.new('not found res count.')
+        else
+          result[:res_count] = state_element.at(
+            res_count_element
+          ).inner_text.match(
+            /\d+/
+          ) ? $1.to_i : 0
+        end
+        
+        # reject group name.
+        group_name_pattern = Regexp.new(
+          result[:in_group][:name].gsub(
+            /(\(\[\/\.\)\])/, '\$&'
+          )
+        )
+        result[:memo_text].sub!(group_name_pattern, '')
+        
+        # reject reply name.
+        reply_name_pattern = Regexp.new(/(\s＞\s\w+).+$/)
+        result[:memo_text].sub!(reply_name_pattern, '')
+        
+        # reject tags.
+        tags_pattern = Regexp.new(/(\s\[.+\])$/)
+        result[:memo_text].gsub!(tags_pattern, '')
+        
+        result[:memo_text].rstrip.strip.chomp!
+      rescue ParseError => e
+        p e
+        return nil
+      else
+        return result
+      end
+    end
+    
+    def parse_author(author_element)
+      author = Hash.allocate
+      begin
+        author[:user_id] = author_element.attr(
+          'href'
+        ).match(
+          /\/\/(.+)\.timelog\.jp/
+        ) ? $1 : nil
+        author[:name] = author_element.inner_text[1..-2]
+      rescue ParseError => e
+        p e
+        return false
+      else
+        return author
+      end
+    end
+    
+    def parse_group(group_element)
+      group = Hash.allocate
+      begin
+        group[:group_id] = group_element.attr(
+          'href'
+        ).match(
+          /\/\/(.+)\.timelog\.jp/
+        ) ? $1 : nil
+        group[:name] = group_element.inner_text
+      rescue ParseError => e
+        p e
+        return nil
+      else
+        return group
+      end
+    end
+    
+    def parse_timeline(timeline_element)
+      document = Mechanize::Page.new(
+        URI.parse('http://timelog.jp/home/'),
+        {'content-type' => 'text/html'},
+        timeline_element,
+        '200',
+        @agent
+      )
+      
+      timeline_element = 'ul#timeline'
+      entry_element = 'div#list_1/li'
+      permalink_element = 'span[@class="time"]/a[3]'
+      
+      result = nil
+      
+      begin
+        timeline = document.search(timeline_element)
+        raise ParseError.new('not found timeline element.') if timeline.empty?
+        entries = timeline.search(entry_element)
+        raise ParseError.new('not found entry elements.') if entries.empty?
+        result = entries.map do |entry|
+          parse_entry(entry)
+        end
+      rescue ParseError => e
+        p e
+        return nil
+      else
+        return result
+      end
+    end
+    
+    def parse_tag(tag_element)
+      
+    end
+    
+    def parse_tag_list(tag_list_element)
+      tag_element = 'a'
+      
+      tags = tag_list_element.search(tag_element)
+      result = tags.map do |tag|
+        tag.inner_text
+      end
+      return result
+    end
+    
+    def parse_user(user_element)
+      
+    end
+    
+    def parse_user_list(user_list_element)
+      
+    end
+    
+    def parse_profile(profile_element)
+      
+    end
+  end
+end
+
+

data/lib/timelog4r/version.rb

@@ -1,7 +1,7 @@
 class Timelog4r
   module VERSION #:nodoc:
     MAJOR = 0
-    MINOR = 2
+    MINOR = 3
     TINY  = 0
 
     STRING = [MAJOR, MINOR, TINY].join('.')

data/lib/timelog4r.rb

@@ -3,8 +3,10 @@
 $:.unshift(File.dirname(__FILE__)) unless
   $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
 
+require 'mechanize'
 require 'timelog4r/utils'
 require 'timelog4r/xml_parser'
+require 'timelog4r/html_parser'
 
 =begin rdoc
 Timelog4r is TimelogAPI for ruby.
@@ -21,17 +23,34 @@ class Timelog4r
   attr_accessor :user_id
   # REQUIRED:: Set your Timelog PassWord.
   attr_accessor :password
+  # REQUIRED:: TimelogAPI Use-Flag.
+  attr_accessor :use_accessor
+  # OPTIONAL:: WEB Access used PrivateKey.
+  attr_accessor :private_key
+  # OPTIONAL:: WEB Accessor Agent.
+  attr_accessor :agent
 
   # TimelogAPI's BaseURI.
   BaseAddress = 'http://api.timelog.jp/'
+  WebAddress = 'http://timelog.jp/'
 
   # Utilities.
   include Utils
   # Customized XML-Parser.
-  include XML_Parser
+  # include XML_Parser
 
-  def initialize #:nodoc:
+  def initialize(use_accessor = :web) #:nodoc:
     @user_agent = 'timelog4r'
+    case use_accessor
+      when :api
+        @use_accessor = :api
+        self.extend XML_Parser
+      when :web
+        @use_accessor = :web
+        @agent = Mechanize.new
+        @agent.user_agent = @user_agent
+        self.extend HTML_Parser
+    end
   end
 
 =begin rdoc
@@ -60,12 +79,20 @@ RelatedMethods::
 
 =end
   def get_public_timeline(options = nil)
-    address = BaseAddress + 'public_msg.asp'
-    address += parse_options(options) if options
-    uri = create_uri(address)
-    request = create_request(:get, uri)
-    response = http_access(uri, request)
-    result = parse_timeline(response) if response
+    result = nil
+    case @use_accessor
+      when :api
+        address = BaseAddress + 'public_msg.asp'
+        address += parse_options(options) if options
+        uri = create_uri(address)
+        request = create_request(:get, uri)
+        response = http_access(uri, request)
+        result = parse_timeline(response) if response
+      when :web
+        address = 'http://'+@user_id+'.timelog.jp/home/public.asp'
+        response = @agent.get(address)
+        result = parse_timeline(response.body) if response
+    end
     return result
   end
 
@@ -94,12 +121,19 @@ RelatedMethods::
 
 =end
   def get_friends_timeline(options = nil)
-    address = BaseAddress + 'friends_msg.asp'
-    address += parse_options(options) if options
-    uri = create_uri(address)
-    request = create_request(:get, uri, true)
-    response = http_access(uri, request)
-    result = parse_timeline(response) if response
+    case @use_accessor
+      when :api
+        address = BaseAddress + 'friends_msg.asp'
+        address += parse_options(options) if options
+        uri = create_uri(address)
+        request = create_request(:get, uri, true)
+        response = http_access(uri, request)
+        result = parse_timeline(response) if response
+      when :web
+        address = 'http://'+ @user_id +'.timelog.jp/home/'
+        response = @agent.get(address)
+        result = parse_timeline(response.body) if response
+    end
     return result
   end
 
@@ -130,12 +164,19 @@ RelatedMethods::
 
 =end
   def get_my_timeline(options = nil)
-    address = BaseAddress + 'my_msg.asp'
-    address += parse_options(options) if options
-    uri = create_uri(address)
-    request = create_request(:get, uri, true)
-    response = http_access(uri, request)
-    result = parse_timeline(response) if response
+    case @user_accessor
+      when :api
+        address = BaseAddress + 'my_msg.asp'
+        address += parse_options(options) if options
+        uri = create_uri(address)
+        request = create_request(:get, uri, true)
+        response = http_access(uri, request)
+        result = parse_timeline(response) if response
+      when :web
+        address = 'http://'+ @user_id +'.timelog.jp/personal.asp'
+        response = @agent.get(address)
+        result = parse_timeline(response.body) if response
+    end
     return result
   end
 
@@ -186,12 +227,19 @@ RelatedMethods::
   XML_Parser#parse_profile
 
 =end
-  def get_profile
-    address = BaseAddress + 'show.asp'
-    uri = create_uri(address)
-    request = create_request(:get, uri, true)
-    response = http_access(uri, request)
-    result = parse_profile(response) if response
+  def get_profile(user_id = @user_id)
+    case @use_accessor
+      when :api
+        address = BaseAddress + 'show.asp'
+        uri = create_uri(address)
+        request = create_request(:get, uri, true)
+        response = http_access(uri, request)
+        result = parse_profile(response) if response
+      when :web
+        address = 'http://'+ @user_id +'.timelog.jp/profile.asp'
+        response = @agent.get(address)
+        result = parse_profile(response.body) if response
+    end
     return result
   end
 
@@ -368,12 +416,19 @@ RelatedMethods::
 
 =end
   def get_reply_list(options = nil)
-    address = BaseAddress + 'res_msg.asp'
-    address += parse_options(options) if options
-    uri = create_uri(address)
-    request = create_request(:get, uri, true)
-    response = http_access(uri, request)
-    result = parse_timeline(response) if response
+    case @use_accessor
+      when :api
+        address = BaseAddress + 'res_msg.asp'
+        address += parse_options(options) if options
+        uri = create_uri(address)
+        request = create_request(:get, uri, true)
+        response = http_access(uri, request)
+        result = parse_timeline(response) if response
+      when :web
+        address = 'http://'+ @user_id +'.timelog.jp/resmsg.asp'
+        response = @agent.get(address)
+        result = parse_timeline(response.body) if response
+    end
     return result
   end
 
@@ -420,15 +475,37 @@ RelatedMethods::
 
 =end
   def update(text, group_id = nil, res_id = nil, tags = nil)
-    text = set_tags(text, tags) if tags
-    text += ' #'+group_id if group_id
-    params = {:text => text}
-    params[:remsgid] = res_id if res_id
-    address = BaseAddress + 'new.asp' + parse_options(params)
-    uri = create_uri(address)
-    request = create_request(:post, uri, true)
-    response = http_access(uri, request)
-    return !response.nil?
+    case @use_accessor
+      when :api
+        text = set_tags(text, tags) if tags
+        text += ' #'+group_id if group_id
+        params = {:text => text}
+        params[:remsgid] = res_id if res_id
+        address = BaseAddress + 'new.asp' + parse_options(params)
+        uri = create_uri(address)
+        request = create_request(:post, uri, true)
+        response = http_access(uri, request)
+        return !response.nil?
+      when :web
+        post_view = 'http://'+@user_id+'.timelog.jp'
+        post_url = WebAddress + '/home/postb.asb'
+        post_form = @agent.get(post_view).forms.first
+        
+        text = set_tags(text, tags) if tags
+        
+        post_form['inp_exm'] = '0'
+        post_form['sel_Type'] = '0'
+        post_form['inp_Public'] = '0'
+        post_form['t'] = '1'
+        post_form['inp_refresh'] = '0'
+        post_form['inp_stag'] = ''
+        # post_form['inp_gi'] = group_id ? group_id : ''
+        post_form['inp_Grp'] = group_id ? group_id : ''
+        post_form['inp_key'] = @private_key
+        post_form['inp_remsgid'] = res_id ? res_id : ''
+        post_form['inp_msg'] = text # message!
+        post_form.submit
+    end
   end
 
 =begin rdoc
@@ -584,4 +661,135 @@ RelatedMethods::
        " #" + group_id
     update(text, res_id, tags)
   end
+
+=begin rdoc
+Description::
+  login for timelog.jp.(use web only)
+
+Params::
+
+  :account login user's account [String] defualt @user_id
+  :password login user's password [String] default @password
+
+Return::
+
+  true (case of 'login success.')
+  false (case of 'login denny.')
+
+=end
+  def login(account = @user_id, password = @password)
+    login_view = WebAddress + 't_login.asp'
+    login_url = WebAddress + 'login.asp'
+    login_form = @agent.get(login_view).forms.first
+    login_form['inp_ac'] = account
+    login_form['inp_pw'] = password
+    login_form['inp_red'] = login_view
+=begin
+    if login_form.valid? then
+      login_form.click_button(login_form.buttons.first)
+      @private_key = get_private_key
+      return true
+    else
+      return false
+    end
+=end
+    login_form.submit #click_button(login_form.buttons.first)
+    @private_key = get_private_key
+    return true
+  end
+  
+=begin rdoc
+Description::
+  timelog.jp logined?(use web only.)
+
+Return::
+  true (case of 'logined.')
+  false (case of 'not logined.')
+
+=end
+  def login?()
+    home_view = 'http://'+ @user_id + '.timelog.jp/home/'
+    home = @agent.get(home_view)
+    return home.forms.first.name.eql?('frmBox')
+  end
+  
+=begin rdoc
+Description::
+  get private key.(web accessor only.)
+
+Return::
+  private key(String)
+
+=end
+  def get_private_key()
+    home_view = 'http://'+ @user_id + '.timelog.jp/home/'
+    home = @agent.get(home_view)
+    main_form = home.forms.first
+    return main_form['inp_key']
+  end
+  
+=begin rdoc
+Description::
+  this group joined?
+
+Argments::
+  :group_id check group_id [String] (Requiement)
+
+Return::
+  true (case of this group joined.)
+  false (case of this group not joined.)
+
+=end
+  def joined?(group_id)
+    group_view = 'http://' + group_id + '.timelog.jp/'
+    joined_element = 'li#del'
+    group_page = @agent.get(group_view)
+    return group_page.at(joined_element) ? true : false
+  end
+  
+=begin rdoc
+Description::
+  join to group.
+
+Argments::
+  :group_id join to group. [String] (Requirement)
+
+Return::
+  true (case of join to group success.)
+
+=end
+  def join_group(group_id)
+    group_view = 'http://' + group_id + '.timelog.jp/'
+    join_url = group_view + 'addfriend.asp?ac=' + group_id
+    @agent.get(join_url)
+    return true
+  end
+  
+=begin rdoc
+Description::
+  leave for group.
+
+Argments::
+  :group_id leave for group.[String] (Requirement)
+
+Return::
+  true (case of leave for group success.)
+
+=end
+  def leave_group(group_id)
+    group_view = 'http://' + group_id + '.timelog.jp/'
+    leave_url = group_view + 'delfriend.asp?ac=' + group_id
+    @agent.get(leave_url)
+    return true
+  end
+  
+  def get(url) #:nodoc:
+    return false if @use_accessor.eql?(:api)
+    return @agent.get(url)
+  end
+  
+  def post(url, query) #:nodoc:
+    return false if @use_accessor.eql?(:api)
+    return @agent.post(url, query)
+  end
 end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: timelog4r
 version: !ruby/object:Gem::Version 
-  hash: 23
+  hash: 19
   prerelease: 
   segments: 
   - 0
-  - 2
+  - 3
   - 0
-  version: 0.2.0
+  version: 0.3.0
 platform: ruby
 authors: 
 - saronpasu
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-07-27 00:00:00 Z
+date: 2011-08-23 00:00:00 Z
 dependencies: 
 - !ruby/object:Gem::Dependency 
   name: hoe
@@ -23,14 +23,13 @@ dependencies:
   requirement: &id001 !ruby/object:Gem::Requirement 
     none: false
     requirements: 
-    - - ">="
+    - - ~>
       - !ruby/object:Gem::Version 
-        hash: 35
+        hash: 27
         segments: 
         - 2
-        - 9
-        - 4
-        version: 2.9.4
+        - 12
+        version: "2.12"
   type: :development
   version_requirements: *id001
 description: TimelogAPI for ruby.
@@ -60,6 +59,7 @@ files:
 - lib/timelog4r/utils.rb
 - lib/timelog4r/version.rb
 - lib/timelog4r/xml_parser.rb
+- lib/timelog4r/html_parser.rb
 - script/console
 - script/destroy
 - script/generate
@@ -108,7 +108,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: timelog4r
-rubygems_version: 1.8.5
+rubygems_version: 1.8.8
 signing_key: 
 specification_version: 3
 summary: TimelogAPI for ruby.