superfeedr-em-mysql 0.4.0

data/README

@@ -0,0 +1,40 @@
+Async MySQL driver for Ruby/EventMachine
+  (c) 2008 Aman Gupta (tmm1)
+
+
+Requires mysqlplus.
+
+  require 'em/mysql'
+
+  # alias SQL for simpler syntax
+
+  SQL = EventedMysql
+  def SQL(query, &blk) SQL.select(query, &blk) end
+
+  
+  # setup connection details and allow 4 connections to the server
+
+  SQL.settings.update :host => 'localhost',
+                      :port => 3306,
+                      :database => 'test',
+                      :connections => 4
+  
+
+  # use 4 connections to execute queries in parallel
+
+  SQL('select sleep(0.25)'){ p 'done' }
+  SQL('select sleep(0.25)'){ p 'done' }
+  SQL('select sleep(0.25)'){ p 'done' }
+  SQL('select sleep(0.25)'){ p 'done' }
+
+Also includes a sequel async wrapper
+
+  require 'sequel'
+  require 'sequel/async'
+
+  DB = Sequel.connect(:adapter => 'mysql', :user => 'root', :database => 'test', ...)
+  EventedMysql.settings.update(..., :on_error => proc{|e| log 'error', e })
+
+  DB[:table].where(:field => 'value').async_update(:field => 'new value')
+
+For more info, see the comments in lib/sequel/async.rb

data/em-mysql.gemspec

@@ -0,0 +1,21 @@
+spec = Gem::Specification.new do |s|
+  s.name = 'superfeedr-em-mysql'
+  s.version = '0.4.0'
+  s.date = '2009-06-23'
+  s.summary = 'Async MySQL client API for Ruby/EventMachine'
+  s.email = "em-mysql@tmm1.net"
+  s.homepage = "http://github.com/tmm1/em-mysql"
+  s.description = 'Async MySQL client API for Ruby/EventMachine'
+  s.has_rdoc = false
+  s.authors = ["Aman Gupta"]
+  s.add_dependency('eventmachine', '>= 0.12.9')
+
+  # git ls-files
+  s.files = %w[
+    README
+    em-mysql.gemspec
+    lib/em/mysql.rb
+    lib/sequel/async.rb
+    test.rb
+  ]
+end

data/lib/em/mysql.rb

@@ -0,0 +1,306 @@
+require 'rubygems'
+require 'eventmachine'
+require 'mysqlplus'
+require 'fcntl'
+
+MAX_RETRIES_ON_DEADLOCKS = 10
+
+class Mysql
+  def result
+    @cur_result
+  end
+end
+
+class EventedMysql < EM::Connection
+  def initialize mysql, opts
+    @mysql = mysql
+    @fd = mysql.socket
+    @opts = opts
+    @current = nil
+    @@queue ||= []
+    @processing = false
+    @connected = true
+
+    log 'mysql connected'
+
+    self.notify_readable = true
+    EM.add_timer(0){ next_query }
+  end
+  attr_reader :processing, :connected, :opts
+  alias :settings :opts
+
+  DisconnectErrors = [
+    'query: not connected',
+    'MySQL server has gone away',
+    'Lost connection to MySQL server during query'
+  ] unless defined? DisconnectErrors
+
+  def notify_readable
+    log 'readable'
+    if item = @current
+      @current = nil
+      start, response, sql, cblk, eblk, retries = item
+      log 'mysql response', Time.now-start, sql
+      arg = case response
+            when :raw
+              result = @mysql.get_result
+              @mysql.instance_variable_set('@cur_result', result)
+              @mysql
+            when :select
+              ret = []
+              result = @mysql.get_result
+              result.each_hash{|h| ret << h }
+              log 'mysql result', ret
+              ret
+            when :update
+              result = @mysql.get_result
+              @mysql.affected_rows
+            when :insert
+              result = @mysql.get_result
+              @mysql.insert_id
+            else
+              result = @mysql.get_result
+              log 'got a result??', result if result
+              nil
+            end
+
+      @processing = false
+      # result.free if result.is_a? Mysql::Result
+      next_query
+      cblk.call(arg) if cblk
+    else
+      log 'readable, but nothing queued?! probably an ERROR state'
+      return close
+    end
+  rescue Mysql::Error => e
+    log 'mysql error', e.message
+    if e.message =~ /Deadlock/ and retries < MAX_RETRIES_ON_DEADLOCKS
+      @@queue << [response, sql, cblk, eblk, retries + 1]
+      @processing = false
+      next_query
+    elsif DisconnectErrors.include? e.message
+      @@queue << [response, sql, cblk, eblk, retries + 1]
+      return close
+    elsif cb = (eblk || @opts[:on_error])
+      cb.call(e)
+      @processing = false
+      next_query
+    else
+      raise e
+    end
+  # ensure
+  #   res.free if res.is_a? Mysql::Result
+  #   @processing = false
+  #   next_query
+  end
+
+  def unbind
+    log 'mysql disconnect', $!, *($! ? $!.backtrace[0..5] : [])
+    # cp = EventedMysql.instance_variable_get('@connection_pool') and cp.delete(self)
+    @connected = false
+
+    # XXX wait for the next tick until the current fd is removed completely from the reactor
+    #
+    # XXX in certain cases the new FD# (@mysql.socket) is the same as the old, since FDs are re-used
+    # XXX without next_tick in these cases, unbind will get fired on the newly attached signature as well
+    #
+    # XXX do _NOT_ use EM.next_tick here. if a bunch of sockets disconnect at the same time, we want
+    # XXX reconnects to happen after all the unbinds have been processed
+    EM.add_timer(0) do
+      log 'mysql reconnecting'
+      @processing = false
+      @mysql = EventedMysql._connect @opts
+      @fd = @mysql.socket
+
+      @signature = EM.attach_fd @mysql.socket, true
+      EM.set_notify_readable @signature, true
+      log 'mysql connected'
+      EM.instance_variable_get('@conns')[@signature] = self
+      @connected = true
+      make_socket_blocking
+      next_query
+    end
+  end
+
+  def execute sql, response = nil, cblk = nil, eblk = nil, retries = 0, &blk
+    cblk ||= blk
+
+    begin
+      unless @processing or !@connected
+        # begin
+        #   log 'mysql ping', @mysql.ping
+        #   # log 'mysql stat', @mysql.stat
+        #   # log 'mysql errno', @mysql.errno
+        # rescue
+        #   log 'mysql ping failed'
+        #   @@queue << [response, sql, blk]
+        #   return close
+        # end
+
+        @processing = true
+
+        log 'mysql sending', sql
+        @mysql.send_query(sql)
+      else
+        @@queue << [response, sql, cblk, eblk, retries]
+        return
+      end
+    rescue Mysql::Error => e
+      log 'mysql error', e.message
+      if DisconnectErrors.include? e.message
+        @@queue << [response, sql, cblk, eblk, retries]
+        return close
+      else
+        raise e
+      end
+    end
+
+    log 'queuing', response, sql
+    @current = [Time.now, response, sql, cblk, eblk, retries]
+  end
+  
+  def close
+    @connected = false
+    fd = detach
+    log 'detached fd', fd
+  end
+
+  private
+
+  def next_query
+    if @connected and !@processing and pending = @@queue.shift
+      response, sql, cblk, eblk = pending
+      execute(sql, response, cblk, eblk)
+    end
+  end
+  
+  def log *args
+    return unless @opts[:logging]
+    p [Time.now, @fd, (@signature[-4..-1] if @signature), *args]
+  end
+
+  public
+
+  def self.connect opts
+    unless EM.respond_to?(:watch) and Mysql.method_defined?(:socket)
+      raise RuntimeError, 'mysqlplus and EM.watch are required for EventedMysql'
+    end
+    
+    opts = servers_opts.pop
+    opts[:failover] = servers_opts
+    if conn = _connect(opts)
+      EM.watch conn.socket, self, conn, opts
+    else
+      EM.add_timer(5){ connect opts }
+    end
+  end
+
+  self::Mysql = ::Mysql unless defined? self::Mysql
+
+  # stolen from sequel
+  def self._connect opts
+    opts = settings.merge(opts)
+
+    conn = Mysql.init
+
+    # set encoding _before_ connecting
+    if charset = opts[:charset] || opts[:encoding]
+      conn.options(Mysql::SET_CHARSET_NAME, charset)
+    end
+
+    conn.options(Mysql::OPT_LOCAL_INFILE, 'client')
+
+    conn.real_connect(
+      opts[:host] || 'localhost',
+      opts[:user] || 'root',
+      opts[:password],
+      opts[:database],
+      opts[:port],
+      opts[:socket],
+      0 +
+      # XXX multi results require multiple callbacks to parse
+      # Mysql::CLIENT_MULTI_RESULTS +
+      # Mysql::CLIENT_MULTI_STATEMENTS +
+      (opts[:compress] == false ? 0 : Mysql::CLIENT_COMPRESS)
+    )
+    
+    # increase timeout so mysql server doesn't disconnect us
+    # this is especially bad if we're disconnected while EM.attach is
+    # still in progress, because by the time it gets to EM, the FD is
+    # no longer valid, and it throws a c++ 'bad file descriptor' error
+    # (do not use a timeout of -1 for unlimited, it does not work on mysqld > 5.0.60)
+    conn.query("set @@wait_timeout = #{opts[:timeout] || 2592000}")
+
+    # we handle reconnecting (and reattaching the new fd to EM)
+    conn.reconnect = false
+
+    # By default, MySQL 'where id is null' selects the last inserted id
+    # Turn this off. http://dev.rubyonrails.org/ticket/6778
+    conn.query("set SQL_AUTO_IS_NULL=0")
+
+    # get results for queries
+    conn.query_with_result = true
+
+    conn
+  rescue Mysql::Error => e
+    if cb = opts[:on_error]
+      cb.call(e)
+      nil
+    elsif opts[:failover] 
+      connect(opts[:failover])
+    else
+      raise e
+    end
+  end
+end
+
+class EventedMysql
+  def self.settings
+    @settings ||= { :connections => 4, :logging => false }
+  end
+
+  def self.execute query, type = nil, cblk = nil, eblk = nil, &blk
+    unless nil#connection = connection_pool.find{|c| not c.processing and c.connected }
+      @n ||= 0
+      connection = connection_pool[@n]
+      @n = 0 if (@n+=1) >= connection_pool.size
+    end
+
+    connection.execute(query, type, cblk, eblk, &blk)
+  end
+
+  %w[ select insert update raw ].each do |type| class_eval %[
+
+    def self.#{type} query, cblk = nil, eblk = nil, &blk
+      execute query, :#{type}, cblk, eblk, &blk
+    end
+
+  ] end
+
+  def self.all query, type = nil, &blk
+    responses = 0
+    connection_pool.each do |c|
+      c.execute(query, type) do
+        responses += 1
+        blk.call if blk and responses == @connection_pool.size
+      end
+    end
+  end
+
+  def self.connection_pool
+    @connection_pool ||= (1..settings[:connections]).map{ EventedMysql.connect(settings) }
+    # p ['connpool', settings[:connections], @connection_pool.size]
+    # (1..(settings[:connections]-@connection_pool.size)).each do
+    #   @connection_pool << EventedMysql.connect(settings)
+    # end unless settings[:connections] == @connection_pool.size
+    # @connection_pool
+  end
+
+  def self.reset!
+    @connection_pool.each do |c|
+      c.close
+    end
+    @connection_pool = nil
+  end
+end
+

data/lib/sequel/async.rb

@@ -0,0 +1,184 @@
+# async sequel extensions, for use with em-mysql
+#
+#   require 'em/mysql'
+#   DB = Sequel.connect(:adapter => 'mysql', :user => 'root', :database => 'test', ...)
+#   EventedMysql.settings.update(..., :on_error => proc{|e| log 'error', e })
+#
+#   def log *args
+#     p [Time.now, *args]
+#   end
+#
+#   DB[:table].where(:id < 100).async_update(:field => 'new value') do |num_updated|
+#     log "done updating #{num_updated} rows"
+#   end
+#
+#   DB[:table].async_insert(:field => 'value') do |insert_id|
+#     log "inserted row #{insert_id}"
+#   end
+#
+#   DB[:table].async_multi_insert([:field], [ ['one'], ['two'], ['three'] ]) do
+#     log "done inserting 3 rows"
+#   end
+#
+#   DB[:table].limit(10).async_each do |row|
+#     log "got a row", row
+#   end; log "this will be printed before the query returns"
+#
+#   DB[:table].async_all do |rows|
+#     DB[:table].async_multi_insert([:field], rows.map{|r| "new_#{r[:field]}" })
+#   end
+#
+#   DB[:table].async_all do |rows|
+#     num = rows.size
+#
+#     rows.each{ |r|
+#       DB[:table].where(:id => r[:id]).async_update(:field => rand(10000).to_s) do
+#         num = num-1
+#         if num == 0
+#           log "last update completed"
+#         end
+#       end
+#     }
+#   end
+#
+#   DB[:table].async_count do |num_rows|
+#     log "table has #{num_rows} rows"
+#   end
+
+require 'sequel'
+raise 'need Sequel >= 3.2.0' unless Sequel::MAJOR == 3 and Sequel::MINOR >= 2
+
+module Sequel
+  class Dataset
+    def async_insert *args, &cb
+      EventedMysql.insert insert_sql(*args), &cb
+      nil
+    end
+
+    def async_insert_ignore *args, &cb
+      EventedMysql.insert insert_ignore.insert_sql(*args), &cb
+      nil
+    end
+
+    def async_update *args, &cb
+      EventedMysql.update update_sql(*args), &cb
+      nil
+    end
+
+    def async_delete &cb
+      EventedMysql.execute delete_sql, &cb
+      nil
+    end
+
+    def async_multi_insert *args, &cb
+      EventedMysql.execute multi_insert_sql(*args).first, &cb
+      nil
+    end
+
+    def async_multi_insert_ignore *args, &cb
+      EventedMysql.execute insert_ignore.multi_insert_sql(*args).first, &cb
+      nil
+    end
+
+    def async_fetch_rows sql, iter = :each
+      EventedMysql.raw(sql) do |m|
+        r = m.result
+
+        i = -1
+        cols = r.fetch_fields.map{|f| [output_identifier(f.name), Sequel::MySQL::MYSQL_TYPES[f.type], i+=1]}
+        @columns = cols.map{|c| c.first}
+        rows = []
+        while row = r.fetch_row
+          h = {}
+          cols.each{|n, p, i| v = row[i]; h[n] = (v && p) ? p.call(v) : v}
+          if iter == :each
+            yield h
+          else
+            rows << h
+          end
+        end
+        yield rows if iter == :all
+      end
+      nil
+    end
+
+    def async_each
+      async_fetch_rows(select_sql, :each) do |r|
+        if row_proc = @row_proc
+          yield row_proc.call(r)
+        else
+          yield r
+        end
+      end
+      nil
+    end
+
+    def async_all
+      async_fetch_rows(sql, :all) do |rows|
+        if row_proc = @row_proc
+          yield(rows.map{|r| row_proc.call(r) })
+        else
+          yield(rows)
+        end
+      end
+      nil
+    end
+
+    def async_count &cb
+      if options_overlap(COUNT_FROM_SELF_OPTS)
+        from_self.async_count(&cb)
+      else
+        clone(STOCK_COUNT_OPTS).async_each{|r|
+          yield r.is_a?(Hash) ? r.values.first.to_i : r.values.values.first.to_i
+        }
+      end
+      nil
+    end
+  end
+
+  class Model
+    def async_update *args, &cb
+      this.async_update(*args, &cb)
+      set(*args)
+      self
+    end
+
+    def async_delete &cb
+      this.async_delete(&cb)
+      nil
+    end
+
+    class << self
+      [ :async_insert,
+        :async_insert_ignore,
+        :async_multi_insert,
+        :async_multi_insert_ignore,
+        :async_each,
+        :async_all,
+        :async_update,
+        :async_count ].each do |method|
+        class_eval %[
+          def #{method} *args, &cb
+            dataset.#{method}(*args, &cb)
+          end
+        ]
+      end
+
+      # async version of Model#[]
+      def async_lookup args
+        unless Hash === args
+          args = primary_key_hash(args)
+        end
+
+        dataset.where(args).limit(1).async_all{ |rows|
+          if rows.any?
+            yield rows.first
+          else
+            yield nil
+          end
+        }
+        nil
+      end
+    end
+  end
+end

data/test.rb

@@ -0,0 +1,59 @@
+require 'lib/em/mysql'
+
+# EM.kqueue
+# EM.epoll
+EM.run{
+  EM.start_server '127.0.0.1', 12345 do |c|
+    def c.receive_data data
+      p 'sending http response'
+      send_data "hello"
+      close_connection_after_writing
+    end
+  end
+
+  SQL = EventedMysql
+  def SQL(query, &blk) SQL.select(query, &blk) end
+
+  if false
+
+    SQL.settings.update :logging => true,
+                        :database => 'test',
+                        :connections => 1
+
+    SQL.execute('select 1+2')
+
+    EM.add_timer(1){
+      3.times do SQL.select('select sleep(0.5)+1'){|r| p(r) } end
+    }
+
+  elsif false
+
+    SQL.settings.update :logging => true,
+                        :database => 'test',
+                        :connections => 10
+
+    EM.add_timer(2.5){ SQL.all('use test') }
+
+  else
+
+    SQL.settings.update :logging => true,
+                        :database => 'test',
+                        :connections => 10,
+                        :timeout => 1
+
+    n = 0
+
+    SQL.execute('drop table if exists testingabc'){
+      SQL.execute('create table testingabc (a int, b int, c int)'){
+        EM.add_periodic_timer(0.2) do
+          cur_num = n+=1
+          SQL.execute("insert into testingabc values (1,2,#{cur_num})"){
+            SQL("select * from testingabc where c = #{cur_num} limit 1"){ |res| puts;puts }
+          }
+        end
+      }
+    }
+
+  end
+
+}

metadata

@@ -0,0 +1,68 @@
+--- !ruby/object:Gem::Specification 
+name: superfeedr-em-mysql
+version: !ruby/object:Gem::Version 
+  version: 0.4.0
+platform: ruby
+authors: 
+- Aman Gupta
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-06-23 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: eventmachine
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.12.9
+    version: 
+description: Async MySQL client API for Ruby/EventMachine
+email: em-mysql@tmm1.net
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- README
+- em-mysql.gemspec
+- lib/em/mysql.rb
+- lib/sequel/async.rb
+- test.rb
+has_rdoc: true
+homepage: http://github.com/tmm1/em-mysql
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Async MySQL client API for Ruby/EventMachine
+test_files: []
+