quicktime-player-mac 0.0.1

data/History.txt

@@ -0,0 +1,4 @@
+=== 0.0.1 2010-10-08
+
+* start project
+  * current_time, play, stop, speed

data/Manifest.txt

@@ -0,0 +1,13 @@
+History.txt
+Manifest.txt
+README.rdoc
+Rakefile
+lib/quicktime-player-mac.rb
+lib/quicktime-player-mac/quicktime.rb
+script/console
+script/destroy
+script/generate
+spec/mac-quicktime-player_spec.rb
+spec/spec.opts
+spec/spec_helper.rb
+tasks/rspec.rake

data/README.rdoc

@@ -0,0 +1,56 @@
+= quicktime-player-mac
+
+* http://github.com/shokai/quicktime-player-mac
+
+== DESCRIPTION:
+
+control QuickTime Player on Mac.
+
+
+== SYNOPSIS:
+
+    require 'rubygems'
+    require 'quicktime-player-mac'
+    q = QuickTime.new
+    q.play unless q.playing?
+    q.speed = 13.5
+    loop do
+      if q.current_time > 60
+        q.speed = 1
+        q.current_time = 10
+        break
+      end
+    end
+
+== REQUIREMENTS:
+
+* applescript (rubygems)
+
+== INSTALL:
+
+* gem install quicktime-player-mac
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2010 Sho Hashimoto
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,25 @@
+require 'rubygems'
+gem 'hoe', '>= 2.1.0'
+require 'hoe'
+require 'fileutils'
+require './lib/quicktime-player-mac'
+
+Hoe.plugin :newgem
+# Hoe.plugin :website
+# Hoe.plugin :cucumberfeatures
+
+# Generate all the Rake tasks
+# Run 'rake -T' to see list of generated tasks (from gem root directory)
+$hoe = Hoe.spec 'quicktime-player-mac' do
+  self.developer 'Sho Hashimoto', 'hashimoto@shokai.org'
+  self.rubyforge_name       = self.name # TODO this is default value
+  self.extra_deps         = [['applescript']]
+
+end
+
+require 'newgem/tasks'
+Dir['tasks/**/*.rake'].each { |t| load t }
+
+# TODO - want other tests/tasks run by default? Add them to the list
+# remove_task :default
+# task :default => [:spec, :features]

data/lib/quicktime-player-mac.rb

@@ -0,0 +1,10 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+Dir.glob(File.dirname(__FILE__)+'/quicktime-player-mac/*.rb').each{|lib|
+  require lib
+}
+
+module QuicktimePlayerMac
+  VERSION = '0.0.1'
+end

data/lib/quicktime-player-mac/quicktime.rb

@@ -0,0 +1,101 @@
+require 'rubygems'
+require 'applescript'
+
+class QuickTime
+
+  class Error < Exception
+  end
+
+  attr_accessor :movie_index
+
+  def initialize(movie_index=1)
+    @movie_index = movie_index
+  end
+
+  def speed=(speed)
+    raise ArgumentError.new('speed should be Number') if speed.class != Fixnum and speed.class != Float
+    @speed = speed
+    script = 
+"tell application 'QuickTime Player'
+  set preferred rate of document 1 to #{speed}
+  tell movie #{@movie_index}
+    if playing then
+      play
+    end if
+  end tell
+end tell".gsub(/'/,'"')
+    AppleScript.execute(script)
+  end
+
+  def speed
+    script = 
+"tell application 'QuickTime Player'
+  get preferred rate of document 1
+end tell".gsub(/'/,'"')
+    AppleScript.execute(script).to_f
+  end
+
+  def stop
+    script = 
+"tell application 'QuickTime Player'
+  tell movie #{@movie_index}
+    stop
+  end tell
+end tell".gsub(/'/,'"')
+    AppleScript.execute(script)
+  end
+
+  def play
+    script = 
+"tell application 'QuickTime Player'
+  tell movie #{@movie_index}
+    play
+  end tell
+end tell".gsub(/'/,'"')
+    AppleScript.execute(script)
+  end
+
+  def playing?
+    script =
+"tell application 'QuickTime Player'
+  tell movie #{@movie_index}
+    playing
+  end tell
+end tell".gsub(/'/,'"')
+    res = AppleScript.execute(script)
+    return true if res =~ /^true/
+    return false if res =~ /^false/
+    raise Error.new("couldn't get playing status")
+  end
+
+  def current_time
+    script =
+"tell application 'QuickTime Player'
+  tell movie #{@movie_index}
+    get current time
+  end tell
+end tell".gsub(/'/,'"')
+    res = AppleScript.execute(script)
+    res.to_f/600
+  end
+
+  def current_time=(sec)
+    sec = sec*600
+    script = 
+"tell application 'QuickTime Player'
+  tell movie #{@movie_index}
+    set current time to #{sec}
+  end tell
+end tell".gsub(/'/, '"')
+    res = AppleScript.execute(script)
+  end
+
+  def movies
+    script =
+"tell application 'QuickTime Player'
+  get documents
+end tell".gsub(/'/,'"')
+    res = AppleScript.execute(script)
+  end
+
+end

data/script/console

@@ -0,0 +1,10 @@
+#!/usr/bin/env ruby
+# File: script/console
+irb = RUBY_PLATFORM =~ /(:?mswin|mingw)/ ? 'irb.bat' : 'irb'
+
+libs =  " -r irb/completion"
+# Perhaps use a console_lib to store any extra methods I may want available in the cosole
+# libs << " -r #{File.dirname(__FILE__) + '/../lib/console_lib/console_logger.rb'}"
+libs <<  " -r #{File.dirname(__FILE__) + '/../lib/mac-quicktime-player.rb'}"
+puts "Loading mac-quicktime-player gem"
+exec "#{irb} #{libs} --simple-prompt"

data/script/destroy

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/destroy'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:rubygems, :newgem, :newgem_theme, :test_unit]
+RubiGen::Scripts::Destroy.new.run(ARGV)

data/script/generate

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/generate'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:rubygems, :newgem, :newgem_theme, :test_unit]
+RubiGen::Scripts::Generate.new.run(ARGV)

data/spec/mac-quicktime-player_spec.rb

@@ -0,0 +1,11 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+# Time to add your specs!
+# http://rspec.info/
+describe "Place your specs here" do
+  
+  it "find this spec in spec directory" do
+    # violated "Be sure to write your specs"
+  end
+  
+end

data/spec/spec.opts

@@ -0,0 +1 @@
+--colour

data/spec/spec_helper.rb

@@ -0,0 +1,10 @@
+begin
+  require 'spec'
+rescue LoadError
+  require 'rubygems' unless ENV['NO_RUBYGEMS']
+  gem 'rspec'
+  require 'spec'
+end
+
+$:.unshift(File.dirname(__FILE__) + '/../lib')
+require 'mac-quicktime-player'

data/tasks/rspec.rake

@@ -0,0 +1,21 @@
+begin
+  require 'spec'
+rescue LoadError
+  require 'rubygems' unless ENV['NO_RUBYGEMS']
+  require 'spec'
+end
+begin
+  require 'spec/rake/spectask'
+rescue LoadError
+  puts <<-EOS
+To use rspec for testing you must install rspec gem:
+    gem install rspec
+EOS
+  exit(0)
+end
+
+desc "Run the specs under spec/models"
+Spec::Rake::SpecTask.new do |t|
+  t.spec_opts = ['--options', "spec/spec.opts"]
+  t.spec_files = FileList['spec/**/*_spec.rb']
+end

metadata

@@ -0,0 +1,127 @@
+--- !ruby/object:Gem::Specification 
+name: quicktime-player-mac
+version: !ruby/object:Gem::Version 
+  hash: 29
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Sho Hashimoto
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-10-09 00:00:00 +09:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: applescript
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rubyforge
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 7
+        segments: 
+        - 2
+        - 0
+        - 4
+        version: 2.0.4
+  type: :development
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  prerelease: false
+  requirement: &id003 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 21
+        segments: 
+        - 2
+        - 6
+        - 1
+        version: 2.6.1
+  type: :development
+  version_requirements: *id003
+description: control QuickTime Player on Mac.
+email: 
+- hashimoto@shokai.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+files: 
+- History.txt
+- Manifest.txt
+- README.rdoc
+- Rakefile
+- lib/quicktime-player-mac.rb
+- lib/quicktime-player-mac/quicktime.rb
+- script/console
+- script/destroy
+- script/generate
+- spec/mac-quicktime-player_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb
+- tasks/rspec.rake
+has_rdoc: true
+homepage: http://github.com/shokai/quicktime-player-mac
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --main
+- README.rdoc
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: quicktime-player-mac
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: control QuickTime Player on Mac.
+test_files: []
+