Gecko [ beriskala.com ]

Name	Size	Permission	Date
bigdecimal	[ DIR ]	drwxr-xr-x	2026-05-01 04:24
cgi	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
date	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
digest	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
dl	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
drb	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
fiddle	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
io	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
irb	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
json	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
matrix	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
minitest	[ DIR ]	drwxr-xr-x	2026-05-01 04:24
net	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
openssl	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
optparse	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
psych	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
racc	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
rake	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
rbconfig	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
rdoc	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
rexml	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
rinda	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
ripper	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
rss	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
rubygems	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
shell	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
syslog	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
test	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
tk	[ DIR ]	drwxr-xr-x	2026-05-01 04:23
tkextlib	[ DIR ]	drwxr-xr-x	2026-05-01 04:23
uri	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
webrick	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
x86_64-linux	[ DIR ]	drwxr-xr-x	2026-05-01 04:24
xmlrpc	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
yaml	[ DIR ]	drwxr-xr-x	2026-04-30 23:44
English.rb	6.44 KB	-rw-r--r--	2013-02-04 06:20
abbrev.rb	3.31 KB	-rw-r--r--	2013-02-21 21:05
base64.rb	2.63 KB	-rw-r--r--	2013-05-19 07:40
benchmark.rb	17.95 KB	-rw-r--r--	2013-09-20 20:35
cgi.rb	9.84 KB	-rw-r--r--	2013-07-18 18:20
cmath.rb	8.93 KB	-rw-r--r--	2015-07-03 13:42
complex.rb	380 B	-rw-r--r--	2009-08-16 20:04
csv.rb	81.68 KB	-rw-r--r--	2014-09-14 19:55
date.rb	946 B	-rw-r--r--	2023-07-26 17:52
debug.rb	29.08 KB	-rw-r--r--	2013-12-14 18:18
delegate.rb	11.13 KB	-rw-r--r--	2014-02-02 17:16
digest.rb	2.34 KB	-rw-r--r--	2023-07-26 17:52
dl.rb	280 B	-rw-r--r--	2023-07-26 17:52
drb.rb	19 B	-rw-r--r--	2009-10-02 14:15
e2mmap.rb	3.89 KB	-rw-r--r--	2013-12-17 14:50
erb.rb	26.07 KB	-rw-r--r--	2014-08-11 19:25
expect.rb	2.14 KB	-rw-r--r--	2023-07-26 17:52
fiddle.rb	1.65 KB	-rw-r--r--	2023-07-26 17:52
fileutils.rb	47.17 KB	-rw-r--r--	2015-04-28 09:46
find.rb	2.36 KB	-rw-r--r--	2014-10-15 19:01
forwardable.rb	7.86 KB	-rw-r--r--	2013-05-24 02:16
getoptlong.rb	15.38 KB	-rw-r--r--	2013-05-19 19:20
gserver.rb	8.86 KB	-rw-r--r--	2014-07-06 18:27
ipaddr.rb	17.05 KB	-rw-r--r--	2015-10-29 18:06
irb.rb	20.03 KB	-rw-r--r--	2016-03-25 12:52
json.rb	1.74 KB	-rw-r--r--	2023-07-26 17:52
kconv.rb	5.74 KB	-rw-r--r--	2023-07-26 17:52
logger.rb	22.37 KB	-rw-r--r--	2016-02-25 14:34
mathn.rb	6.52 KB	-rw-r--r--	2011-08-27 02:52
matrix.rb	45.43 KB	-rw-r--r--	2014-07-11 18:38
mkmf.rb	80.5 KB	-rw-r--r--	2023-07-26 17:49
monitor.rb	6.93 KB	-rw-r--r--	2012-11-16 20:25
multi-tk.rb	98.4 KB	-rw-r--r--	2023-07-26 17:52
mutex_m.rb	2 KB	-rw-r--r--	2013-02-20 06:21
observer.rb	5.81 KB	-rw-r--r--	2013-11-21 08:14
open-uri.rb	24.27 KB	-rw-r--r--	2014-02-22 12:24
open3.rb	20.37 KB	-rw-r--r--	2013-12-01 06:43
openssl.rb	528 B	-rw-r--r--	2023-07-26 17:52
optparse.rb	50.8 KB	-rw-r--r--	2013-11-28 11:04
ostruct.rb	7.7 KB	-rw-r--r--	2013-10-23 18:44
pathname.rb	15.3 KB	-rw-r--r--	2023-07-26 17:52
pp.rb	14.1 KB	-rw-r--r--	2013-10-22 12:59
prettyprint.rb	16.33 KB	-rw-r--r--	2013-05-19 07:40
prime.rb	13.2 KB	-rw-r--r--	2013-07-15 08:51
profile.rb	205 B	-rw-r--r--	2009-10-02 14:15
profiler.rb	4.51 KB	-rw-r--r--	2013-05-20 03:34
pstore.rb	14.85 KB	-rw-r--r--	2012-11-11 07:53
psych.rb	14.88 KB	-rw-r--r--	2023-07-26 17:52
rake.rb	2.12 KB	-rw-r--r--	2013-10-12 01:05
rational.rb	308 B	-rw-r--r--	2009-09-24 04:12
rdoc.rb	4.92 KB	-rw-r--r--	2013-12-22 13:55
remote-tk.rb	14.11 KB	-rw-r--r--	2023-07-26 17:52
resolv-replace.rb	1.73 KB	-rw-r--r--	2013-03-11 17:17
resolv.rb	72.31 KB	-rw-r--r--	2015-05-13 10:03
ripper.rb	2.53 KB	-rw-r--r--	2023-07-26 17:52
rss.rb	2.84 KB	-rw-r--r--	2011-05-11 14:52
rubygems.rb	30.97 KB	-rw-r--r--	2023-07-26 17:49
scanf.rb	23.54 KB	-rw-r--r--	2013-12-14 06:25
securerandom.rb	8.49 KB	-rw-r--r--	2013-11-07 21:34
set.rb	18.7 KB	-rw-r--r--	2013-11-23 03:20
shell.rb	10.3 KB	-rw-r--r--	2013-05-19 07:40
shellwords.rb	5.94 KB	-rw-r--r--	2013-12-14 21:56
singleton.rb	4.02 KB	-rw-r--r--	2011-05-18 18:39
socket.rb	25.6 KB	-rw-r--r--	2023-07-26 17:52
sync.rb	7.25 KB	-rw-r--r--	2013-05-19 07:40
tcltk.rb	10.06 KB	-rw-r--r--	2023-07-26 17:52
tempfile.rb	11.4 KB	-rw-r--r--	2013-11-21 12:58
thwait.rb	3.38 KB	-rw-r--r--	2013-11-07 20:32
time.rb	21.32 KB	-rw-r--r--	2015-08-17 12:11
timeout.rb	3.7 KB	-rw-r--r--	2015-08-17 12:25
tk.rb	163.72 KB	-rw-r--r--	2023-07-26 17:52
tkafter.rb	57 B	-rw-r--r--	2023-07-26 17:52
tkbgerror.rb	63 B	-rw-r--r--	2023-07-26 17:52
tkcanvas.rb	60 B	-rw-r--r--	2023-07-26 17:52
tkclass.rb	950 B	-rw-r--r--	2023-07-26 17:52
tkconsole.rb	63 B	-rw-r--r--	2023-07-26 17:52
tkdialog.rb	60 B	-rw-r--r--	2023-07-26 17:52
tkentry.rb	57 B	-rw-r--r--	2023-07-26 17:52
tkfont.rb	54 B	-rw-r--r--	2023-07-26 17:52
tkmacpkg.rb	60 B	-rw-r--r--	2023-07-26 17:52
tkmenubar.rb	63 B	-rw-r--r--	2023-07-26 17:52
tkmngfocus.rb	66 B	-rw-r--r--	2023-07-26 17:52
tkpalette.rb	63 B	-rw-r--r--	2023-07-26 17:52
tkscrollbox.rb	69 B	-rw-r--r--	2023-07-26 17:52
tktext.rb	54 B	-rw-r--r--	2023-07-26 17:52
tkvirtevent.rb	69 B	-rw-r--r--	2023-07-26 17:52
tkwinpkg.rb	60 B	-rw-r--r--	2023-07-26 17:52
tmpdir.rb	4.15 KB	-rw-r--r--	2013-05-19 07:40
tracer.rb	6.4 KB	-rw-r--r--	2013-07-18 18:20
tsort.rb	14.14 KB	-rw-r--r--	2013-10-17 19:29
ubygems.rb	268 B	-rw-r--r--	2009-10-02 14:15
un.rb	8.87 KB	-rw-r--r--	2013-07-05 18:13
uri.rb	3.07 KB	-rw-r--r--	2011-05-14 00:33
weakref.rb	3.23 KB	-rw-r--r--	2013-11-10 02:12
webrick.rb	6.69 KB	-rw-r--r--	2013-10-06 03:09
xmlrpc.rb	8.49 KB	-rw-r--r--	2013-12-12 06:39
yaml.rb	2.31 KB	-rw-r--r--	2013-08-12 08:19

Rename

#
# Copyright (C) 2001 John W. Small All Rights Reserved
#
# Author::        John W. Small
# Documentation:: Gavin Sinclair
# Licence::       Ruby License

require "socket"
require "thread"

#
# GServer implements a generic server, featuring thread pool management,
# simple logging, and multi-server management.  See HttpServer in
# <tt>xmlrpc/httpserver.rb</tt> in the Ruby standard library for an example of
# GServer in action.
#
# Any kind of application-level server can be implemented using this class.
# It accepts multiple simultaneous connections from clients, up to an optional
# maximum number.  Several _services_ (i.e. one service per TCP port) can be
# run simultaneously, and stopped at any time through the class method
# <tt>GServer.stop(port)</tt>.  All the threading issues are handled, saving
# you the effort.  All events are optionally logged, but you can provide your
# own event handlers if you wish.
#
# == Example
#
# Using GServer is simple.  Below we implement a simple time server, run it,
# query it, and shut it down.  Try this code in +irb+:
#
#   require 'gserver'
#
#   #
#   # A server that returns the time in seconds since 1970.
#   #
#   class TimeServer < GServer
#     def initialize(port=10001, *args)
#       super(port, *args)
#     end
#     def serve(io)
#       io.puts(Time.now.to_i)
#     end
#   end
#
#   # Run the server with logging enabled (it's a separate thread).
#   server = TimeServer.new
#   server.audit = true                  # Turn logging on.
#   server.start
#
#   # *** Now point your browser to http://localhost:10001 to see it working ***
#
#   # See if it's still running.
#   GServer.in_service?(10001)           # -> true
#   server.stopped?                      # -> false
#
#   # Shut the server down gracefully.
#   server.shutdown
#
#   # Alternatively, stop it immediately.
#   GServer.stop(10001)
#   # or, of course, "server.stop".
#
# All the business of accepting connections and exception handling is taken
# care of.  All we have to do is implement the method that actually serves the
# client.
#
# === Advanced
#
# As the example above shows, the way to use GServer is to subclass it to
# create a specific server, overriding the +serve+ method.  You can override
# other methods as well if you wish, perhaps to collect statistics, or emit
# more detailed logging.
#
# * #connecting
# * #disconnecting
# * #starting
# * #stopping
#
# The above methods are only called if auditing is enabled, via #audit=.
#
# You can also override #log and #error if, for example, you wish to use a
# more sophisticated logging system.
#
class GServer

DEFAULT_HOST = "127.0.0.1"

def serve(io)
  end

@@services = {}   # Hash of opened ports, i.e. services
  @@servicesMutex = Mutex.new

# Stop the server running on the given port, bound to the given host
  #
  # +port+:: port, as a Fixnum, of the server to stop
  # +host+:: host on which to find the server to stop
  def GServer.stop(port, host = DEFAULT_HOST)
    @@servicesMutex.synchronize {
      @@services[host][port].stop
    }
  end

# Check if a server is running on the given port and host
  #
  # +port+:: port, as a Fixnum, of the server to check
  # +host+:: host on which to find the server to check
  #
  # Returns true if a server is running on that port and host.
  def GServer.in_service?(port, host = DEFAULT_HOST)
    @@services.has_key?(host) and
      @@services[host].has_key?(port)
  end

# Stop the server
  def stop
    @connectionsMutex.synchronize  {
      if @tcpServerThread
        @tcpServerThread.raise "stop"
      end
    }
  end

# Returns true if the server has stopped.
  def stopped?
    @tcpServerThread == nil
  end

# Schedule a shutdown for the server
  def shutdown
    @shutdown = true
  end

# Return the current number of connected clients
  def connections
    @connections.size
  end

# Join with the server thread
  def join
    @tcpServerThread.join if @tcpServerThread
  end

# Port on which to listen, as a Fixnum
  attr_reader :port
  # Host on which to bind, as a String
  attr_reader :host
  # Maximum number of connections to accept at a time, as a Fixnum
  attr_reader :maxConnections
  # IO Device on which log messages should be written
  attr_accessor :stdlog
  # Set to true to cause the callbacks #connecting, #disconnecting, #starting,
  # and #stopping to be called during the server's lifecycle
  attr_accessor :audit
  # Set to true to show more detailed logging
  attr_accessor :debug

# Called when a client connects, if auditing is enabled.
  #
  # +client+:: a TCPSocket instance representing the client that connected
  #
  # Return true to allow this client to connect, false to prevent it.
  def connecting(client)
    addr = client.peeraddr
    log("#{self.class.to_s} #{@host}:#{@port} client:#{addr[1]} " +
        "#{addr[2]}<#{addr[3]}> connect")
    true
  end

# Called when a client disconnects, if audition is enabled.
  #
  # +clientPort+:: the port of the client that is connecting
  def disconnecting(clientPort)
    log("#{self.class.to_s} #{@host}:#{@port} " +
      "client:#{clientPort} disconnect")
  end

protected :connecting, :disconnecting

# Called when the server is starting up, if auditing is enabled.
  def starting()
    log("#{self.class.to_s} #{@host}:#{@port} start")
  end

# Called when the server is shutting down, if auditing is enabled.
  def stopping()
    log("#{self.class.to_s} #{@host}:#{@port} stop")
  end

protected :starting, :stopping

# Called if #debug is true whenever an unhandled exception is raised.
  # This implementation simply logs the backtrace.
  #
  # +detail+:: the Exception that was caught
  def error(detail)
    log(detail.backtrace.join("\n"))
  end

# Log a message to #stdlog, if it's defined.  This implementation
  # outputs the timestamp and message to the log.
  #
  # +msg+:: the message to log
  def log(msg)
    if @stdlog
      @stdlog.puts("[#{Time.new.ctime}] %s" % msg)
      @stdlog.flush
    end
  end

protected :error, :log

# Create a new server
  #
  # +port+:: the port, as a Fixnum, on which to listen
  # +host+:: the host to bind to
  # +maxConnections+:: the maximum number of simultaneous connections to
  #                    accept
  # +stdlog+:: IO device on which to log messages
  # +audit+:: if true, lifecycle callbacks will be called.  See #audit
  # +debug+:: if true, error messages are logged.  See #debug
  def initialize(port, host = DEFAULT_HOST, maxConnections = 4,
    stdlog = $stderr, audit = false, debug = false)
    @tcpServerThread = nil
    @port = port
    @host = host
    @maxConnections = maxConnections
    @connections = []
    @connectionsMutex = Mutex.new
    @connectionsCV = ConditionVariable.new
    @stdlog = stdlog
    @audit = audit
    @debug = debug
  end

# Start the server if it isn't already running
  #
  # +maxConnections+::
  #   override +maxConnections+ given to the constructor.  A negative
  #   value indicates that the value from the constructor should be used.
  def start(maxConnections = -1)
    raise "server is already running" if !stopped?
    @shutdown = false
    @maxConnections = maxConnections if maxConnections > 0
    @@servicesMutex.synchronize  {
      if GServer.in_service?(@port,@host)
        raise "Port already in use: #{host}:#{@port}!"
      end
      @tcpServer = TCPServer.new(@host,@port)
      @port = @tcpServer.addr[1]
      @@services[@host] = {} unless @@services.has_key?(@host)
      @@services[@host][@port] = self;
    }
    @tcpServerThread = Thread.new {
      begin
        starting if @audit
        while !@shutdown
          @connectionsMutex.synchronize  {
             while @connections.size >= @maxConnections
               @connectionsCV.wait(@connectionsMutex)
             end
          }
          client = @tcpServer.accept
          Thread.new(client)  { |myClient|
            @connections << Thread.current
            begin
              myPort = myClient.peeraddr[1]
              serve(myClient) if !@audit or connecting(myClient)
            rescue => detail
              error(detail) if @debug
            ensure
              begin
                myClient.close
              rescue
              end
              @connectionsMutex.synchronize {
                @connections.delete(Thread.current)
                @connectionsCV.signal
              }
              disconnecting(myPort) if @audit
            end
          }
        end
      rescue => detail
        error(detail) if @debug
      ensure
        begin
          @tcpServer.close
        rescue
        end
        if @shutdown
          @connectionsMutex.synchronize  {
             while @connections.size > 0
               @connectionsCV.wait(@connectionsMutex)
             end
          }
        else
          @connections.each { |c| c.raise "stop" }
        end
        @tcpServerThread = nil
        @@servicesMutex.synchronize  {
          @@services[@host].delete(@port)
        }
        stopping if @audit
      end
    }
    self
  end

end