rmplayer 1.0

data/README

@@ -0,0 +1,10 @@
+= RMPlayer =
+
+Remote MPlayer. VLC HTTP interface implementation for MPlayer.
+
+Tested using VLC Remote Android app.
+
+= Usage =
+
+rmplayer [mplayer options] file_name
+

data/Rakefile

@@ -0,0 +1,66 @@
+require 'rake'
+require 'rake/gempackagetask'
+require 'rake/testtask'
+require 'rake/clean'
+
+PKG_NAME = 'rmplayer'
+PKG_VERSION = "1.0"
+
+PKG_FILES = FileList[
+  '[A-Z]*',
+  'bin/**/*', 
+  'lib/**/*', 
+]
+
+CLEAN.include('build')
+
+task :default => :package
+
+spec = Gem::Specification.new do |s|
+	s.name = PKG_NAME
+	s.version = PKG_VERSION
+	s.summary = "Remote control interface for MPlayer"
+	s.description = <<-EOF
+	#{PKG_NAME} implements HTTP protocol used by Vlc to control MPlayer.
+	More to the point, I just wanted to use VLC remote android app to control MPlayer.
+	EOF
+
+	s.files = PKG_FILES.to_a
+
+	s.bindir = "bin"
+	s.executables = ["rmplayer"]
+	s.default_executable = "rmplayer"
+	
+	s.require_path = 'lib'
+
+	s.add_dependency 'builder'
+
+	s.has_rdoc = false
+
+	s.author = "Peter Severin"
+	s.email = "peter_p_s@users.sourceforge.net"
+end
+
+Rake::GemPackageTask.new(spec) do |p|
+	p.need_tar = true
+	p.gem_spec = spec
+end
+
+desc "Run all the tests"
+Rake::TestTask.new do |t|
+    t.test_files = FileList['test/test_*.rb', 'test/*_test.rb']
+    t.verbose = true
+end
+
+
+desc "Install the gem package"
+task :install => :package do |t|
+	gem_file = Dir.glob("pkg/#{PKG_NAME}-*.gem").last
+	`gem install -l #{gem_file}`
+end
+
+desc "Uninstall the gem package"
+task :uninstall do |t|
+	`echo 'y' | gem uninstall #{PKG_NAME}`
+end
+

data/bin/rmplayer

@@ -0,0 +1,12 @@
+#!/usr/bin/env ruby
+
+require 'rmplayer'
+
+if ARGV.empty?
+	puts "Remote MPlayer. VLC Http interface for MPlayer."
+	puts "Usage: #$0 [mplayer options] file_name"
+	exit 1
+end
+
+RMPlayer::App.new.run(ARGV)
+

data/lib/rmplayer.rb

@@ -0,0 +1 @@
+require 'rmplayer/app'

data/lib/rmplayer/app.rb

@@ -0,0 +1,145 @@
+require 'webrick'
+require 'builder'
+require 'rmplayer/mplayer'
+
+module RMPlayer
+	DEBUG = false
+
+class NullLogger
+	def method_missing(*args)
+	end
+end
+
+class App
+	def run(args)
+		@mplayer = MPlayer.new(args)
+
+		s = ::WEBrick::HTTPServer.new(:Port => 8080,
+					      :MaxClients => 5,
+					      :DoNotReverseLookup => true,
+					      :ShutdownSocketWithoutClose => true,
+					      :Logger => DEBUG ? nil : NullLogger.new)
+
+		s.mount_proc('/requests/status.xml') do |req, resp|
+			begin
+				command = req.query['command'] || 'status'
+
+				puts "Executing #{command}" if DEBUG
+
+				case command
+				when 'in_play'
+					file = req.query['input']
+					if @mplayer
+						@mplayer.load_file file
+					else
+						@mplayer = MPlayer.new file
+					end
+				when 'fullscreen'
+					@mplayer.toggle_fullscreen
+				when 'seek'
+					val = req.query['val'].to_i
+					@mplayer.seek(val)
+				when 'volume'
+					val = req.query['val'].to_i
+					@mplayer.volume = ((val * 100.0) / 1024).to_i
+				when 'pl_next'
+				when 'pl_previous'
+				when 'pl_pause', 'pl_play'
+					@mplayer.pause
+				when 'pl_stop'
+					quit_mplayer
+				end
+
+				resp.status = 200
+				resp['Content-Type'] = 'text/xml'
+				resp.body = status
+			rescue Errno::EPIPE => ex
+				quit_mplayer
+				resp.status = 500
+			end
+		end
+
+		s.mount_proc('/requests/browse.xml') do |req, resp|
+			dir = req.query['dir']
+
+			resp.status = 200
+			resp['Content-Type'] = 'text/xml'
+			resp.body = browse(dir)
+		end
+
+		trap("INT") do
+			quit_mplayer
+			s.shutdown
+		end
+
+		Socket.do_not_reverse_lookup = true
+
+		s.start
+	end
+
+	def quit_mplayer
+		if @mplayer
+			begin
+				@mplayer.quit
+				@mplayer = nil
+			rescue Exception => ignore
+			ensure
+				@mplayer = nil
+			end
+		end
+	end
+
+	def status
+		xml = Builder::XmlMarkup.new
+		xml.root do
+			xml.volume @mplayer ? ((@mplayer.volume.to_i * 1024.0) / 100).to_i : 256
+			xml.length @mplayer ? @mplayer.time_length.to_i : 0
+			xml.time @mplayer ? @mplayer.time_pos.to_i : 0
+			xml.state @mplayer ? (@mplayer.paused? ? 'paused' : 'playing') : 'stop'
+			xml.position @mplayer ? @mplayer.percent_pos.to_i : 0
+			xml.fullscreen
+			xml.loop 0
+			xml.repeat 0
+			xml.information do
+				xml.tag! :'meta-information' do
+					xml.title @mplayer ? @mplayer.file_name : ''
+				end
+			end
+		end
+
+		puts xml.target! if DEBUG
+		xml.target!
+	end
+
+	def browse(dir)
+		base = File.expand_path(dir)
+		files = Dir.new(base).entries.sort
+
+		xml = Builder::XmlMarkup.new
+		xml.root do
+			files.each do |name|
+				f = "#{base}/#{name}"
+
+				next unless show_file?(f, name)
+
+				xml.element :type => (File.directory?(f) ? 'directory' : 'file'),
+					:size => File.size(f),
+					:date => File.mtime(f),
+					:path => f,
+					:name => File.basename(f),
+					:extension => File.extname(f)
+			end
+		end
+
+		puts xml.target! if DEBUG
+		xml.target!
+	end
+
+	def show_file?(file, name)
+		return true if name == '..'
+		return false if name[0, 1] == '.'
+		return true if File.directory?(file)
+		return %w(.avi .mpg .mpeg .mk4 .mov .ogg .mp3).include?(File.extname(name))
+	end
+end
+end

data/lib/rmplayer/mplayer.rb

@@ -0,0 +1,118 @@
+require 'thread'
+
+module RMPlayer
+
+class MPlayer
+	def initialize(args)
+		@mutex = Mutex.new
+
+		pstdin, pstdout, pstderr = IO.pipe, IO.pipe, IO.pipe
+
+		command = %w(/usr/bin/mplayer -slave -quiet) + args
+		fork do
+			STDIN.reopen pstdin.first
+			pstdin.last.close
+
+			STDERR.reopen pstderr.last
+			pstderr.first.close
+
+			STDOUT.reopen pstdout.last
+			pstdout.first.close
+
+			STDERR.sync = true
+			STDOUT.sync = true
+
+			exec(*command)
+		end
+
+		pstdin.first.close
+		pstderr.last.close
+		pstdout.last.close
+
+		@stdin, @stdout, @stderr = pstdin.last, pstdout.first, pstderr.first
+
+		STDERR.sync = true
+		STDOUT.sync = true
+
+		sleep 2
+	end
+
+	def paused?
+		get_property('pause') == 'yes'
+	end
+
+	def get_property(property)
+		cmd = "pausing_keep_force get_property #{property}"
+		match = "ANS_#{property.to_s}"
+		rex = /#{match}=(.+)/
+		response = send(cmd, rex)
+		response[rex, 1]
+	end
+
+	def get(property)
+		cmd = "pausing_keep_force get_#{property}"
+		match = case property
+				when "time_pos" then 'ANS_TIME_POSITION'
+				when "percent_pos" then 'ANS_PERCENT_POSITION'
+				when "time_length" then 'ANS_LENGTH'
+				when "file_name" then 'ANS_FILENAME'
+				else "ANS_#{property.to_s.upcase}"
+				end
+		rex = /#{match}=(.+)/
+		response = send(cmd, rex)
+		response[rex, 1]
+	end
+
+	%w(time_pos time_length file_name percent_pos vo_fullscreen).each do |field|
+		define_method(field.to_sym) { get(field) }
+	end
+	
+	def pause
+		send('pause')
+	end
+
+	def quit
+		send('quit')
+	end
+
+	def seek(value)
+		send("seek #{value} 2")
+	end
+
+	def volume=(value)
+		send("volume #{value} 1")
+	end
+
+	def volume
+		get_property('volume')
+	end
+
+	def load_file(file)
+		send("loadfile #{file}")
+	end
+
+	def toggle_fullscreen
+		send('vo_fullscreen')
+	end
+
+	def send(cmd, match = nil)
+		@mutex.synchronize do
+			puts "Sending #{cmd}. Looking for #{match}" if DEBUG
+			@stdin.puts(cmd)
+			
+			return nil if match.nil?
+
+			response = @stdout.gets
+			puts "Resp: #{response}. Looking for #{match}" if DEBUG
+			until response =~ match
+				response = @stdout.gets
+				puts "Resp: #{response}. Looking for #{match} in loop" if DEBUG
+			end
+			puts "Matched response: #{response}" if DEBUG
+			response
+		end
+	end
+end
+
+end
+

metadata

@@ -0,0 +1,70 @@
+--- !ruby/object:Gem::Specification 
+name: rmplayer
+version: !ruby/object:Gem::Version 
+  version: "1.0"
+platform: ruby
+authors: 
+- Peter Severin
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-10-27 00:00:00 +03:00
+default_executable: rmplayer
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: builder
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: "\trmplayer implements HTTP protocol used by Vlc to control MPlayer.\n\
+  \tMore to the point, I just wanted to use VLC remote android app to control MPlayer.\n"
+email: peter_p_s@users.sourceforge.net
+executables: 
+- rmplayer
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- README
+- Rakefile
+- bin/rmplayer
+- lib/rmplayer/app.rb
+- lib/rmplayer/mplayer.rb
+- lib/rmplayer.rb
+has_rdoc: true
+homepage: 
+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: Remote control interface for MPlayer
+test_files: []
+