h4oflashsdk 1.0.0

data/test/fixtures/sdk/fdb

@@ -0,0 +1,90 @@
+#!/usr/bin/env ruby
+
+class FakeFDB
+
+  def initialize
+    str = "Adobe fdb (Flash Player Debugger) [build 16076]\n"
+    str << "Copyright (c) 2004-2007 Adobe, Inc. All rights reserved.\n"
+    str << "(fdb) "
+    printf str
+    gather_input
+  end
+
+  def gather_input
+    $stdout.flush
+    command = $stdin.gets.chomp!
+    parts = command.split(' ')
+    name = parts.shift
+
+    case name
+    when "run"
+      handle_run parts
+    when "break"
+      handle_break parts
+    when "continue"
+      handle_continue parts
+    when "kill"
+      handle_kill parts
+    when "y"
+      handle_confirmation parts
+    when "quit"
+      handle_quit parts
+    when "run_with_error"
+      handle_run_with_error parts
+    else
+      puts "FAKE FDB doesn't know how to respond to #{command}"
+      exit 1
+    end
+
+    gather_input
+  end
+
+  def handle_run args
+    str = "Waiting for Player to connect\n"
+    str << "Player connected; session starting.\n"
+    str << "Set breakpoints and then type 'continue' to resume the session.\n"
+    str = "[SWF] Users:lbayes:Projects:AsUnit-P2:asunit-4.0:bin:AsUnitRunner.swf - 226,833 bytes after decompression\n"
+    str << "(fdb) "
+    printf str
+  end
+
+  def handle_break args
+    str = "Breakpoint 1, AsUnitRunner() at AsUnitRunner.as:12\n"
+    str << "12                core = new TextCore();\n"
+    str << "(fdb) "
+    printf str
+  end
+
+  def handle_continue args
+    str = "Continuing now\n"
+    str << "(fdb) "
+    printf str
+  end
+
+  def handle_kill args
+    printf "Kill the program being debugged? (y or n) "
+  end
+
+  def handle_confirmation args
+    str = "Confirmation accepted\n"
+    str << "(fdb) "
+    printf str
+  end
+
+  def handle_run_with_error args
+    str = "This is an error!\n"
+    str << "This is more details about the error!\n"
+    str << "Here are even more details!\n"
+    $stderr.printf str
+    printf "(fdb) "
+  end
+
+  def handle_quit args
+    puts ">> EXITING NOW!\n"
+    exit! 0
+  end
+
+end
+
+fake_fdb = FakeFDB.new
+

data/test/fixtures/sdk/mxmlc

@@ -0,0 +1,56 @@
+#!/usr/bin/env ruby
+
+##
+# This is a Fake MXMLC executable that should
+# support our test cases by performing exactly 
+# the same tasks that MXMLC performs, but much
+# faster. 
+#
+# This executable should be easily swapped with
+# the real MXMLC binary for any test.
+class FakeMXMLC
+
+  def initialize args
+    #puts ">> ARGS: #{args.inspect}"
+    if(args.size == 2 && 
+       args[0].include?('SomeFile.swf') &&
+       args[1].include?('SomeFile.as'))
+      compile_simple_swf args
+    elsif args == ["-output=test/fixtures/air/simple/bin/SomeProject.swf", "test/fixtures/air/simple/SomeProject.as"]
+      compile_amxmlc_swf args
+    else
+      raise "Unexpected args sent to mxmlc stub #{args.join(', ')}"
+    end
+  end
+
+  private
+
+  def compile_amxmlc_swf args
+    path = args[0].split('=').pop
+    compile_swf path
+  end
+
+  ##
+  # /Users/lbayes/Library/Sprouts/1.0/cache/flex4/4.1.0.16076/bin/mxmlc -static-link-runtime-shared-libraries test/fixtures/mxmlc/simple/SomeFile.as
+  # Loading configuration file /Users/lbayes/Library/Sprouts/1.0/cache/flex4/4.1.0.16076/frameworks/flex-config.xml
+  # /Users/lbayes/Projects/Sprouts/flashsdk/test/fixtures/mxmlc/simple/SomeFile.swf (558 bytes)
+  def compile_simple_swf args
+    path = File.expand_path(args[0].gsub(/-output=/, ''))
+    compile_swf path
+  end
+
+  def compile_swf path
+    File.open path, 'wb+' do |f|
+      f.write swf_bytes
+    end
+    puts "#{File.expand_path(path)} (#{swf_bytes.size})"
+  end
+
+  def swf_bytes
+    @swf_bytes ||= File.read 'test/fixtures/air/simple/SomeProject.swf'
+  end
+
+end
+
+mxmlc = FakeMXMLC.new ARGV
+

data/test/unit/acompc_test.rb

@@ -0,0 +1,37 @@
+require 'test_helper'
+
+class ACOMPCTest < Test::Unit::TestCase
+  include Sprout::TestHelper
+
+  context "An ACOMPC tool" do
+
+    setup do
+      @fixture         = File.join 'test', 'fixtures', 'acompc', 'simple'
+      @input           = File.join @fixture, 'SomeAirFile.as'
+      @expected_output = File.join @fixture, 'SomeAirFile.swc'
+    end
+
+    teardown do
+      remove_file @expected_output
+    end
+
+    should "accept input" do
+      as_a_unix_system do
+        compc = FlashSDK::ACOMPC.new
+        compc.output = @expected_output
+        compc.include_sources << @fixture
+        assert_equal '--output=test/fixtures/acompc/simple/SomeAirFile.swc --include-sources+=test/fixtures/acompc/simple', compc.to_shell
+      end
+    end
+
+    should "compile a swc" do
+      compc = FlashSDK::ACOMPC.new
+      compc.include_sources << @fixture
+      compc.output = @expected_output
+      compc.execute
+      assert_file @expected_output
+    end
+
+  end
+end
+

data/test/unit/adl_test.rb

@@ -0,0 +1,32 @@
+require 'test_helper'
+
+class ADLTest < Test::Unit::TestCase
+  include Sprout::TestHelper
+
+  context "An ADL tool" do
+
+    setup do
+      @fixture    = File.join 'test', 'fixtures', 'air', 'simple'
+      @app_desc   = File.join @fixture, 'SomeProject.xml'
+      @profile    = 'mobileDevice'
+      @screensize = 'NexusOne'
+    end
+
+    teardown do
+    end
+
+    should "accept input" do
+      adl            = FlashSDK::ADL.new
+      adl.app_desc   = @app_desc
+      adl.root_dir   = Dir.pwd
+      adl.screensize = @screensize
+      adl.profile    = @profile
+      assert_equal "-profile #{@profile} -screensize #{@screensize} #{@app_desc} #{Dir.pwd}", adl.to_shell
+      # Uncomment to actually launch
+      # the AIR application:
+      #adl.execute
+    end
+
+  end
+end
+

data/test/unit/adt_test.rb

@@ -0,0 +1,185 @@
+require 'test_helper'
+
+class ADTTest < Test::Unit::TestCase
+  include Sprout::TestHelper
+
+  context "An ADT tool" do
+
+    setup do
+      @fixture              = File.join 'test', 'fixtures', 'air', 'simple'
+      @application_xml      = File.join @fixture, 'SomeProject.xml'
+      @expected_output      = File.join @fixture, 'SomeProject.air'
+      @apk_input            = File.join @fixture, 'SomeProject.apk'
+      @ipa_output           = File.join @fixture, 'SomeProject.ipa'
+      @swf_input            = File.join @fixture, 'SomeProject.swf'
+      @swf_main             = File.join @fixture, 'SomeProject.mxml'
+      @certificate          = File.join @fixture, 'SomeProject.pfx'
+      @ipa_cert             = File.join @fixture, 'SomeProject.p12'
+      @provisioning_profile = File.join @fixture, 'Profile.mobileprovision'
+      @platform             = 'android'
+      @target               = 'apk-debug'
+      @appid                = 'com.foo.bar.SomeProject'
+      @cert_password        = 'samplePassword'
+    end
+
+    teardown do
+      clear_tasks
+      remove_file @expected_output
+    end
+
+    should "package a SWF with an application.xml" do
+      as_a_unix_system do
+        t = adt @expected_output do |t|
+          t.package        = true
+          t.target         = @target
+          t.package_input  = @application_xml
+          t.package_output = @expected_output
+          t.storetype      = 'PKCS12'
+          t.keystore       = @certificate
+          t.storepass      = @cert_password
+          t.included_files << @swf_input
+        end
+
+        assert_equal "-package -storetype PKCS12 -keystore #{@certificate} " +
+            "-storepass #{@cert_password} -target #{@target} " +
+            "test/fixtures/air/simple/SomeProject.air " +
+            "test/fixtures/air/simple/SomeProject.xml " +
+            "test/fixtures/air/simple/SomeProject.swf", t.to_shell
+
+        # Uncomment to actually run adt (much slower)
+        #t.execute
+        #assert_file @expected_output
+      end
+    end
+    
+    should "package a SWF and complex assets with an application.xml" do
+      as_a_unix_system do
+        t = adt @expected_output do |t|
+          t.package        = true
+          t.target         = @target
+          t.package_input  = @application_xml
+          t.package_output = @expected_output
+          t.storetype      = 'PKCS12'
+          t.keystore       = @certificate
+          t.storepass      = @cert_password
+          t.included_files << @swf_input
+          t.file_options << 'bin path/to/asset.xml'
+        end
+
+        assert_equal "-package -storetype PKCS12 -keystore #{@certificate} " +
+            "-storepass #{@cert_password} -target #{@target} " +
+            "test/fixtures/air/simple/SomeProject.air " +
+            "test/fixtures/air/simple/SomeProject.xml " +
+            "test/fixtures/air/simple/SomeProject.swf " +
+            "-C bin path/to/asset.xml", t.to_shell
+
+        # Uncomment to actually run adt (much slower)
+        #t.execute
+        #assert_file @expected_output
+      end
+    end
+
+    should "package an iOS swf with a provisioning profile" do
+      as_a_unix_system do
+        t = adt @ipa_output do |t|
+          t.package        = true
+          t.target         = 'ipa-test'
+          t.package_input  = @application_xml
+          t.package_output = @ipa_output
+          t.storetype      = 'PKCS12'
+          t.keystore       = @ipa_cert
+          t.storepass      = @cert_password
+          t.provisioning_profile = @provisioning_profile
+          t.included_files << @swf_input
+        end
+
+        assert_equal "-package -storetype PKCS12 -keystore #{@ipa_cert} " +
+            "-storepass #{@cert_password} -provisioning-profile " +
+            "#{@provisioning_profile} -target ipa-test " +
+            "test/fixtures/air/simple/SomeProject.ipa " +
+            "test/fixtures/air/simple/SomeProject.xml " +
+            "test/fixtures/air/simple/SomeProject.swf", t.to_shell
+
+        # Uncomment to actually run adt (much slower)
+        #t.execute
+        #assert_file @expected_output
+      end
+    end
+
+    should "install an APK" do
+      as_a_unix_system do
+        t = adt @expected_output do |t|
+          t.installApp    = true
+          t.platform      = @platform
+          t.package       = true
+          t.package_input = @apk_input
+        end
+
+        assert_equal "-installApp -platform #{@platform} -package #{@apk_input}", t.to_shell
+
+        # Uncomment to actually run adt (much slower)
+        #t.execute
+        #assert_file @expected_output
+      end
+    end
+
+    should "uninstall an APK" do
+      as_a_unix_system do
+        t = adt @expected_output do |t|
+          t.uninstallApp = true
+          t.platform     = @platform
+          t.appid        = @appid
+        end
+
+        assert_equal "-uninstallApp -platform #{@platform} -appid #{@appid}", t.to_shell
+
+        # Uncomment to actually run adt (much slower)
+        #t.execute
+        #assert_file @expected_output
+      end
+    end
+
+    should "launch an app" do
+      as_a_unix_system do
+        t = adt @expected_output do |t|
+          t.launchApp = true
+          t.platform  = @platform
+          t.appid     = @appid
+        end
+
+        assert_equal "-launchApp -platform #{@platform} -appid #{@appid}", t.to_shell
+
+        # Uncomment to actually run adt (much slower)
+        #t.execute
+        #assert_file @expected_output
+      end
+    end
+
+    should "create a self-signed certificate" do
+      as_a_unix_system do
+        t = adt(@certificate) do |t|
+          t.certificate = true
+          t.cn          = 'SelfCertificate'
+          t.key_type    = '2048-RSA'
+          t.pfx_file    = @certificate
+          t.password    = @cert_password
+        end
+
+        assert_equal '-certificate -cn SelfCertificate 2048-RSA test/fixtures/air/simple/SomeProject.pfx samplePassword', t.to_shell
+
+        # Uncomment to actually run adt (much slower)
+        #t.execute
+        #assert_file @certificate
+      end
+    end
+
+    # USE THIS METHOD TO CREATE THE INPUT SWF:
+    #should "create an input swf" do
+      #t = amxmlc @swf_input do |t|
+        #t.input = @swf_main
+      #end
+      #t.execute
+    #end
+  end
+end
+

data/test/unit/amxmlc_test.rb

@@ -0,0 +1,55 @@
+require 'test_helper'
+
+class AMXMLCTest < Test::Unit::TestCase
+  include Sprout::TestHelper
+
+  context "An AMXMLC tool" do
+
+    setup do
+      @fixture         = File.join 'test', 'fixtures', 'air', 'simple'
+      @input           = File.join @fixture, 'SomeProject.as'
+      @expected_output = File.join @fixture, 'bin', 'SomeProject.swf'
+    end
+
+    teardown do
+      remove_file File.join(@fixture, 'bin')
+    end
+
+    should "accept input" do
+      as_a_unix_system do
+        amxmlc = FlashSDK::AMXMLC.new
+        amxmlc.input = @input
+        amxmlc.source_path << @fixture
+        assert_equal '-source-path+=test/fixtures/air/simple test/fixtures/air/simple/SomeProject.as', amxmlc.to_shell
+      end
+    end
+
+    should "compile a swf" do
+      FileUtils.mkdir_p File.dirname(@expected_output)
+
+      amxmlc        = FlashSDK::AMXMLC.new
+      amxmlc.binary_path = File.join fixtures, 'sdk', 'mxmlc'
+      amxmlc.input  = @input
+      amxmlc.output = @expected_output
+      amxmlc.execute
+      assert_file @expected_output
+    end
+    
+
+    should "assign default-size" do
+      amxmlc = FlashSDK::AMXMLC.new
+      amxmlc.default_size = '800,500'
+      assert_equal '-default-size=800,500', amxmlc.to_shell
+    end
+
+    should "assign simple output" do
+      as_a_unix_system do
+        t = amxmlc 'bin/SomeProject.swf' do |t|
+          t.input = @input
+        end
+        assert_equal '-output=bin/SomeProject.swf test/fixtures/air/simple/SomeProject.as', t.to_shell
+      end
+    end
+  end
+end
+

data/test/unit/asdoc_test.rb

@@ -0,0 +1,45 @@
+require 'test_helper'
+
+class AsDocTest < Test::Unit::TestCase
+  include Sprout::TestHelper
+
+  context "An AsDoc tool" do
+
+    setup do
+      @original_use_fcsh_value = ENV['USE_FCSH']
+      @fixture                 = File.join fixtures, 'asdoc'
+      @source_path             = File.join @fixture, 'src'
+      @lib_path                = File.join @fixture, 'lib'
+      @doc_output              = File.join @fixture, 'docs'
+
+      @swf_input               = File.join @fixture, 'src', 'SomeFile.as'
+      @swf_output              = File.join @fixture, 'bin', 'SomeFile.swf'
+    end
+
+    teardown do
+      remove_file @doc_output
+    end
+
+    should "generate simple documentation" do
+      t = FlashSDK::AsDoc.new
+      t.doc_sources << @source_path
+      t.doc_sources << @lib_path
+      t.output = @doc_output
+      t.execute
+
+      assert_file File.join(@doc_output, 'index.html')
+    end
+
+=begin
+    should "work with a rake task too" do
+      exe = asdoc @doc_output do |t|
+        t.doc_sources << @source_path
+        t.doc_sources << @lib_path
+      end
+      exe.execute
+    end
+=end
+
+  end
+end
+

data/test/unit/class_generator_test.rb

@@ -0,0 +1,56 @@
+require 'test_helper'
+
+class ClassGeneratorTest < Test::Unit::TestCase
+  include Sprout::TestHelper
+
+  context "a new class generator" do
+
+    setup do
+      @temp = File.join(fixtures, 'generators', 'tmp')
+      FileUtils.mkdir_p @temp
+      @generator = FlashSDK::ClassGenerator.new
+      @generator.path = @temp
+      @generator.logger = StringIO.new
+
+      Sprout::Generator.register FlashSDK::ClassGenerator
+      Sprout::Generator.register FlashSDK::TestClassGenerator
+    end
+
+    teardown do
+      remove_file @temp
+    end
+
+    should "work with a simple class" do
+      @generator.input = 'utils.MathUtil'
+      @generator.execute
+      assert_file File.join(@temp, 'src', 'utils', 'MathUtil.as')
+    end
+
+    should "work with no package" do
+      @generator.input = 'MathUtil'
+      @generator.execute
+      assert_file File.join(@temp, 'src', 'MathUtil.as')
+    end
+
+    should "work with directory instead of dots" do
+      @generator.input = 'src/utils/MathUtil.as'
+      @generator.execute
+      assert_file File.join(@temp, 'src', 'utils', 'MathUtil.as')
+    end
+
+    should "work with directory but no source" do
+      @generator.input = 'utils/MathUtil.as'
+      @generator.execute
+      assert_file File.join(@temp, 'src', 'utils', 'MathUtil.as')
+    end
+
+    should "not call TestGenerator when no_test" do
+      FlashSDK::TestClassGenerator.any_instance.expects(:manifest).never
+      @generator.input = 'utils.MathUtil'
+      @generator.test_class = false
+      @generator.execute
+    end
+  end
+
+end
+

data/test/unit/compc_test.rb

@@ -0,0 +1,37 @@
+require 'test_helper'
+
+class COMPCTest < Test::Unit::TestCase
+  include Sprout::TestHelper
+
+  context "An COMPC tool" do
+
+    setup do
+      @fixture         = File.join 'test', 'fixtures', 'compc', 'simple'
+      @input           = File.join @fixture, 'SomeFile.as'
+      @expected_output = File.join @fixture, 'SomeFile.swc'
+    end
+
+    teardown do
+      remove_file @expected_output
+    end
+
+    should "accept input" do
+      as_a_unix_system do
+        compc = FlashSDK::COMPC.new
+        compc.output = @expected_output
+        compc.include_sources << @fixture
+        assert_equal '--output=test/fixtures/compc/simple/SomeFile.swc --include-sources+=test/fixtures/compc/simple', compc.to_shell
+      end
+    end
+
+    should "compile a swc" do
+      compc = FlashSDK::COMPC.new
+      compc.include_sources << @fixture
+      compc.output = @expected_output
+      compc.execute
+      assert_file @expected_output
+    end
+
+  end
+end
+

data/test/unit/fake_flashplayer_system.rb

@@ -0,0 +1,11 @@
+
+class FakeFlashPlayerSystem
+
+  def clean_path path
+    path
+  end
+
+  def open_flashplayer_with player, swf
+  end
+end
+

data/test/unit/fcsh_socket_test.rb

@@ -0,0 +1,53 @@
+require 'test_helper'
+
+class FCSHSocketTest < Test::Unit::TestCase
+  include Sprout::TestHelper
+
+  context "a new fcsh server" do
+
+    setup do
+      # Uncomment to see output:
+      #Sprout.stdout = $stdout
+      #Sprout.stderr = $stderr
+
+      @input = File.join(fixtures, 'mxmlc', 'simple', 'SomeFile.as')
+      @test_port = 12543
+    end
+
+    teardown do
+      clear_tasks
+    end
+
+    should "be instantiable" do
+      service_ready = false
+      # Create the remote side of the connection:
+      t = Thread.new do
+        Thread.current.abort_on_exception = true
+        server = FlashSDK::FCSHSocket.new
+        server.port = @test_port
+        service_ready = true
+        server.listen
+      end
+
+      # Wait for the remote connection to exist
+      while !service_ready
+        sleep 0.1
+      end
+
+      sleep 2.0
+
+      mxmlc = FlashSDK::MXMLC.new
+      mxmlc.input = @input
+
+      client = FlashSDK::FCSHSocket.new
+      client.port = @test_port
+      client.execute "mxmlc #{mxmlc.to_shell}"
+      FileUtils.touch @input
+      client.execute "mxmlc #{mxmlc.to_shell}"
+      client.execute "quit"
+
+      t.join
+    end
+  end
+end
+