torchat 0.0.1.rc.1

data/lib/torchat/protocol/broadcast.rb

@@ -0,0 +1,40 @@
+#--
+# Copyleft meh. [http://meh.paranoid.pk | meh@paranoici.org]
+#
+# This file is part of torchat for ruby.
+#
+# torchat for ruby is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published
+# by the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# torchat for ruby is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with torchat for ruby. If not, see <http://www.gnu.org/licenses/>.
+#++
+
+class Torchat; module Protocol
+
+define_extension :broadcast do
+	define_packet :message do
+		define_unpacker_for 1 do |data|
+			data.force_encoding('UTF-8')
+		end
+
+		def pack
+			super(@internal.encode('UTF-8'))
+		end
+
+		def to_s
+			@internal
+		end
+
+		alias to_str to_s
+	end
+end
+
+end; end

data/lib/torchat/protocol/groupchat.rb

@@ -0,0 +1,197 @@
+#--
+# Copyleft meh. [http://meh.paranoid.pk | meh@paranoici.org]
+#
+# This file is part of torchat for ruby.
+#
+# torchat for ruby is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published
+# by the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# torchat for ruby is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with torchat for ruby. If not, see <http://www.gnu.org/licenses/>.
+#++
+
+class Torchat; module Protocol
+
+define_extension :groupchat do
+	define_packet :invite do
+		define_unpacker_for 1 .. -1
+
+		attr_reader :id, :modes
+
+		def initialize (id = nil, *modes)
+			@id    = id || Torchat.new_cookie
+			@modes = modes.flatten.compact.uniq.map(&:to_sym)
+		end
+
+		def pack
+			super("#{id}#{" #{modes.join ' '}" unless modes.empty?}")
+		end
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id})#{": #{modes.join ' '}" unless modes.empty?}>"
+		end
+	end
+
+	define_packet :participants do
+		define_unpacker_for 1 .. -1
+
+		attr_accessor :id
+
+		def initialize (id, *participants)
+			@id       = id
+			@internal = participants.flatten.compact.uniq
+		end
+
+		def method_missing (id, *args, &block)
+			return @internal.__send__ id, *args, &block if @internal.respond_to? id
+
+			super
+		end
+
+		def respond_to_missing? (id, include_private = false)
+			@internal.respond_to? id, include_private
+		end
+
+		def pack
+			super("#{id}#{" #{join ' '}" unless empty?}")
+		end
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id})#{": #{join ' '}" unless empty?}>"
+		end
+	end
+
+	define_packet :is_participanting do
+		define_unpacker_for 1
+
+		def id
+			@internal
+		end
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id})>"
+		end
+	end
+
+	define_packet :participating do
+		define_unpacker_for 1
+
+		def id
+			@internal
+		end
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id})>"
+		end
+	end
+
+	define_packet :not_participating do
+		define_unpacker_for 1
+
+		def id
+			@internal
+		end
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id})>"
+		end
+	end
+
+	define_packet :join do
+		define_unpacker_for 1
+
+		def id
+			@internal
+		end
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id})>"
+		end
+	end
+
+	define_packet :leave do
+		define_unpacker_for 1 .. 2 do |data|
+			id, data = data.split ' ', 2
+
+			[id, data && !data.empty? ? data.force_encoding('UTF-8') : nil]
+		end
+
+		attr_accessor :id, :reason
+
+		def initialize (id, reason = nil)
+			@id     = id
+			@reason = reason
+		end
+
+		def pack
+			super("#{id}#{" #{reason.encode('UTF-8')}" if reason}")
+		end
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id})#{": #{reason.inspect}" if reason}>"
+		end
+	end
+
+	define_packet :invited do
+		define_unpacker_for 2
+
+		attr_accessor :id, :buddy
+
+		def initialize (id, buddy)
+			@id    = id
+			@buddy = buddy
+		end
+
+		def pack
+			super("#{id} #{to_s}")
+		end
+
+		def to_s
+			@buddy
+		end
+
+		alias to_str to_s
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id}): #{to_s}>"
+		end
+	end
+
+	define_packet :message do
+		define_unpacker_for 2 do |data|
+			id, data = data.split ' ', 2
+
+			[id, data.force_encoding('UTF-8')]
+		end
+
+		attr_accessor :id, :content
+
+		def initialize (id, content)
+			@id      = id
+			@content = content
+		end
+
+		def pack
+			super("#{id} #{to_s.encode('UTF-8')}")
+		end
+
+		def to_s
+			@content
+		end
+
+		alias to_str to_s
+
+		def inspect
+			"#<Torchat::Packet[#{"#{extension}_" if extension}#{type}](#{id}): #{to_s.inspect}>"
+		end
+	end
+end
+
+end; end

data/lib/torchat/protocol/latency.rb

@@ -0,0 +1,44 @@
+#--
+# Copyleft meh. [http://meh.paranoid.pk | meh@paranoici.org]
+#
+# This file is part of torchat for ruby.
+#
+# torchat for ruby is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published
+# by the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# torchat for ruby is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with torchat for ruby. If not, see <http://www.gnu.org/licenses/>.
+#++
+
+class Torchat; module Protocol
+
+define_extension :latency do
+	define_packet :ping do
+		define_unpacker_for 1
+
+		def initialize (id = Torchat.new_cookie)
+			@internal = id
+		end
+
+		def id
+			@internal
+		end
+	end
+
+	define_packet :pong do
+		define_unpacker_for 1
+
+		def id
+			@internal
+		end
+	end
+end
+
+end; end

data/lib/torchat/protocol/standard.rb

@@ -0,0 +1,367 @@
+#--
+# Copyleft meh. [http://meh.paranoid.pk | meh@paranoici.org]
+#
+# This file is part of torchat for ruby.
+#
+# torchat for ruby is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published
+# by the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# torchat for ruby is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with torchat for ruby. If not, see <http://www.gnu.org/licenses/>.
+#++
+
+require 'digest/md5'
+
+class Torchat; module Protocol
+
+define_packet :not_implemented do
+	define_unpacker_for 0 .. 1
+
+	def command
+		@internal
+	end
+end
+
+define_packet :ping do
+	define_unpacker_for 2
+
+	attr_reader   :id, :address
+	attr_accessor :cookie
+
+	def initialize (address, cookie = nil)
+		self.address = address
+		self.cookie  = cookie || Torchat.new_cookie
+	end
+
+	def id= (value)
+		@id      = value[/^(.*?)(\.onion)?$/, 1]
+		@address = "#{@id}.onion"
+	end
+
+	alias address= id=
+
+	def valid?
+		Torchat.valid_id? @id
+	end
+
+	def pack
+		super("#{id} #{cookie}")
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}]#{"(#{from.inspect})" if from}: #{id} #{cookie}>"
+	end
+end
+
+define_packet :pong do
+	define_unpacker_for 1
+
+	def cookie
+		@internal
+	end
+end
+
+define_packet :client do
+	define_unpacker_for 0 .. 1
+
+	def nil?
+		@internal.nil?
+	end
+
+	def name
+		@internal
+	end
+
+	alias to_s   name
+	alias to_str name
+end
+
+define_packet :version do
+	define_unpacker_for 0 .. 1
+
+	def nil?
+		@internal.nil?
+	end
+
+	def to_s
+		@internal
+	end
+
+	alias to_str to_s
+end
+
+define_packet :supports do
+	define_unpacker_for 0 .. -1
+
+	def initialize (*supports)
+		@internal = supports.flatten.compact.map(&:downcase).map(&:to_sym).uniq
+	end
+
+	def method_missing (id, *args, &block)
+		return @internal.__send__ id, *args, &block if @internal.respond_to? id
+
+		super
+	end
+
+	def pack
+		super(join ' ')
+	end
+end
+
+define_packet :status do
+	def self.valid? (name)
+		%w(available away xa).include?(name.to_s.downcase)
+	end
+
+	define_unpacker_for 1
+
+	def initialize (name)
+		unless Protocol[:status].valid?(name)
+			raise ArgumentError, "#{name} is not a valid status"
+		end
+
+		@internal = name.to_sym.downcase
+	end
+
+	def available?
+		@internal == :available
+	end
+
+	def away?
+		@internal == :away
+	end
+
+	def extended_away?
+		@internal == :xa
+	end
+
+	def to_sym
+		@internal
+	end
+
+	def to_s
+		to_sym.to_s
+	end
+end
+
+define_packet :profile_name do
+	define_unpacker_for 0 .. 1 do |data|
+		data.force_encoding('UTF-8') if data
+	end
+
+	def pack
+		super(@internal ? @internal.encode('UTF-8') : nil)
+	end
+
+	def to_s
+		@internal
+	end
+
+	alias to_str to_s
+end
+
+define_packet :profile_text do
+	define_unpacker_for 0 .. 1 do |data|
+		data.force_encoding('UTF-8') if data
+	end
+
+	def pack
+		super(@internal ? @internal.encode('UTF-8') : nil)
+	end
+
+	def to_s
+		@internal
+	end
+
+	alias to_str to_s
+end
+
+define_packet :profile_avatar_alpha do
+	define_unpacker_for 0 .. 1 do |data|
+		data if data && (data.empty? || data.bytesize != 4096)
+	end
+
+	def data
+		@internal
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}]>"
+	end
+end
+
+define_packet :profile_avatar do
+	define_unpacker_for 0 .. 1 do |data|
+		data if data && (data.empty? || data.bytesize == 12288)
+	end
+
+	def data
+		@internal
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}]>"
+	end
+end
+
+define_packet :add_me do
+	define_unpacker_for 0
+end
+
+define_packet :remove_me do
+	define_unpacker_for 0
+end
+
+define_packet :message do
+	define_unpacker_for 1 do |data|
+		data.force_encoding('UTF-8')
+	end
+
+	def pack
+		super(@internal.encode('UTF-8'))
+	end
+
+	def to_s
+		@internal
+	end
+
+	alias to_str to_s
+end
+
+define_packet :filename do
+	define_unpacker do |data|
+		id, size, block_size, name = data.split ' ', 4
+
+		[name, size, block_size, id]
+	end
+
+	attr_accessor :id, :name, :size, :block_size
+
+	def initialize (name, size, block_size = 4096, id = nil)
+		@name       = name
+		@size       = size.to_i
+		@block_size = block_size.to_i
+		@id         = id || Torchat.new_cookie
+	end
+
+	alias length   size
+	alias bytesize size
+
+	def pack
+		super("#{id} #{size} #{block_size} #{name}")
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}](#{id}): #{name} #{size} #{block_size}>"
+	end
+end
+
+define_packet :filedata do
+	define_unpacker do |data|
+		id, offset, md5, data = data.split ' ', 4
+
+		[id, offset, data, md5]
+	end
+
+	attr_reader   :data, :md5
+	attr_accessor :id, :offset
+
+	def initialize (id, offset, data, md5 = nil)
+		@id     = id
+		@offset = offset.to_i
+		@data   = data.force_encoding('BINARY')
+		@md5    = md5 || Digest::MD5.hexdigest(@data)
+	end
+
+	def data= (value)
+		@data = value.to_s.force_encoding('BINARY')
+		@md5  = Digest::MD5.hexdigest(@data)
+	end
+
+	def valid?
+		Digest::MD5.hexdigest(data) == md5
+	end
+
+	def pack
+		super("#{id} #{offset} #{md5} #{data}")
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}](#{id}): #{offset} #{data.size}>"
+	end
+end
+
+define_packet :filedata_ok do
+	define_unpacker do |data|
+		data.split ' '
+	end
+
+	attr_accessor :id, :offset
+
+	def initialize (id, offset)
+		@id     = id
+		@offset = offset.to_i
+	end
+
+	def pack
+		super("#{id} #{offset}")
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}](#{id}): #{offset}>"
+	end
+end
+
+define_packet :filedata_error do
+	define_unpacker do |data|
+		data.split ' '
+	end
+
+	attr_accessor :id, :offset
+
+	def initialize (id, offset)
+		@id     = id
+		@offset = offset.to_i
+	end
+
+	def pack
+		super("#{id} #{offset}")
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}](#{id}): #{offset}>"
+	end
+end
+
+define_packet :file_stop_sending do
+	define_unpacker_for 1
+
+	def id
+		@internal
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}](#{id})>"
+	end
+end
+
+define_packet :file_stop_receiving do
+	define_unpacker_for 1
+
+	def id
+		@internal
+	end
+
+	def inspect
+		"#<Torchat::Packet[#{type}](#{id})>"
+	end
+end
+
+end; end