summaryrefslogtreecommitdiff
path: root/sample/drb/dchatc.rb
blob: 2b8ddbf4cc649b97deed4ea3fa021c7502c3b586 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
=begin
 distributed Ruby --- chat client
 	Copyright (c) 1999-2000 Masatoshi SEKI
=end

require 'drb/drb'

class ChatClient
  include DRbUndumped

  def initialize(name)
    @name = name
    @key = nil
  end
  attr_reader(:name)
  attr_accessor(:key)

  def message(there, str)
    raise 'invalid key' unless @key == there
    puts str
  end
end

if __FILE__ == $0
  begin
    there = ARGV.shift
    name = ARGV.shift
    raise "usage" unless (there and name)
  rescue
    $stderr.puts("usage: #{$0} <server_uri> <your_name>")
    exit 1
  end
  DRb.start_service
  ro = DRbObject.new(nil, there)

  chat = ChatClient.new(name)
  entry = ro.add_member(chat)
  while gets
    entry.say($_)
  end
end